delphi和matlab混合编程实现曲线平滑效果,可是程序老是报错!MatPutVariable('A', 2500,x1);
MatPutVariable('B',2500,y1);
MatEvalString(Pchar('x0=linspace(A(1,1),A(2500,1),20000);'));
MatEvalString(Pchar('x0=x0;'));
MatEvalString(Pchar('y0=interp1(A,B,x0,"spline");'));
MatGetVariable('x0', 20000,xx);
MatGetVariable('y0',20000,yy);
for m:=0 to 19999 do
begin
series1.addxy(xx[m],yy[m]);
end;
MatPutVariable('B',2500,y1);
MatEvalString(Pchar('x0=linspace(A(1,1),A(2500,1),20000);'));
MatEvalString(Pchar('x0=x0;'));
MatEvalString(Pchar('y0=interp1(A,B,x0,"spline");'));
MatGetVariable('x0', 20000,xx);
MatGetVariable('y0',20000,yy);
for m:=0 to 19999 do
begin
series1.addxy(xx[m],yy[m]);
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货