karmarkar内点法

function [x] = chushineidian（ cAbs ）
%UNtitleD3 Summary of this function goes here
%   Detailed explanation goes here
λ

% 转化为对偶问题
d=c;
c=b;
b=d;
A=A‘;
M=10000;
N=10000;
% 求初始内点
x0=（sqrt（dot（bb））/sqrt（dot（A*c‘A*c‘）））*c;
v=b-（A*x0‘）‘;
[valueindex]=min（v）;
if value<=0
    [valueindex]=min（v）;
    xa=abs（value）+0.0001;
    x00=[x0 xa];
    c=[c -M];
    [mn]=size（A）;
    e1=linspace（-1-1m）;
    A=[A e1‘];
    for p=1:N
        v=b-（A*x00‘）‘;
        D=diag（v）;
        D=inv（D）;