Cody

Solution 112067

Submitted on 13 Jul 2012 by James
This solution is locked. To view this solution, you need to provide a solution of the same size or smaller.

Test Suite

Test Status Code Input and Output
1   Pass
%% pts=[0 3 2;1 -1 1;2 1 0;5 1 3]; % c(2 1 3) r=3 y_correct = 3; assert(isequal(Sphere_radius(pts),y_correct))

A = 2 -8 -2 4 -4 -4 10 -4 2 B = -10 -8 22 C = 2.0000 1.0000 3.0000 r = 3

2   Pass
%% pts=[1 0 0;0 1 0;0 0 1;-1 0 0]; % c(0 0 0) r=1 y_correct = 1; assert(isequal(Sphere_radius(pts),y_correct))

A = -2 2 0 -2 0 2 -4 0 0 B = 0 0 0 C = 0 0 0 r = 1

3   Pass
%% pts=[1 0 -1;0 1 -1;0 0 0;-1 0 -1]; % c(0 0 -1) r=1 y_correct = 1; assert(isequal(Sphere_radius(pts),y_correct))

A = -2 2 0 -2 0 2 -4 0 0 B = 0 -2 0 C = 0 0 -1 r = 1

4   Pass
%% pts=[2 0 -2;0 2 -2;0 0 0;-2 0 -2]; % c(0 0 -2) r=2 y_correct = 2; assert(isequal(Sphere_radius(pts),y_correct))

A = -4 4 0 -4 0 4 -8 0 0 B = 0 -8 0 C = 0 0 -2 r = 2

5   Pass
%% pts=[-5 -1 -3;1 -1 -3;-2 -4 -3;-2 -1 0]; % c(-2 -1 -3) r=3 y_correct = 3; assert(isequal(Sphere_radius(pts),y_correct))

A = 12 0 0 6 -6 0 6 0 6 B = -24 -6 -30 C = -2 -1 -3 r = 3