diff options
Diffstat (limited to 'templates/chebycenter.m')
-rwxr-xr-x | templates/chebycenter.m | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/templates/chebycenter.m b/templates/chebycenter.m deleted file mode 100755 index cbdce1c..0000000 --- a/templates/chebycenter.m +++ /dev/null @@ -1,20 +0,0 @@ -function [c,r] = chebycenter(A,b) -%CHEBYCENTER Compute Chebyshev center of polytope Ax <= b. -% The Chebyshev center of a polytope is the center of the largest -% hypersphere enclosed by the polytope. -% Requires optimization toolbox. - -[n,p] = size(A); -an = sqrt(sum(A.^2,2)); -A1 = zeros(n,p+1); -A1(:,1:p) = A; -A1(:,p+1) = an; -f = zeros(p+1,1); -f(p+1) = -1; - -options = optimset; -options = optimset(options,'Display', 'off'); -c = linprog(f,A1,b,[],[],[],[],[],options); -r = c(p+1); -c = c(1:p); -end |