Cody

# Problem 636. Spherical radius given four points

Solution 1976751

Submitted on 15 Oct 2019 by Cao Van Cuong
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 = 0 6 4 -1 13 2 -2 2 -1 3 4 2 0 -1 5 10 2 6 -1 35 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 0 0 -1 1 0 2 0 -1 1 0 0 2 -1 1 -2 0 0 -1 1 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 0 -2 -1 2 0 2 -2 -1 2 0 0 0 -1 0 -2 0 -2 -1 2 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 0 -4 -1 8 0 4 -4 -1 8 0 0 0 -1 0 -4 0 -4 -1 8 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 = -10 -2 -6 -1 35 2 -2 -6 -1 11 -4 -8 -6 -1 29 -4 -2 0 -1 5 r = 3