将二维代码/绘图转换为三维代码/绘图。
%---2D working code
clear all,clf reset,tic,clc, close all,
S=[15.3039,10.3612,7.9153,6.3793,5.3019,4.4955,3.8656,3.3584,2.9405,2.5903,2.2926,2.0367,1.8146,1.6204,1.4496,1.2983,1.1638,1.04377,.93622,.83959,.75256,.67401,.603,.53871,.48045,.42762,.37969,.33619,.29673,.26094,.22852,.19917,.17265,.14874,.12722,.10791,.090664,.075316,.061733,.049793,.039383,.030399,.0227475,.0163414,.0111008,.0069525,.0038286,.0016664,.0004081];
x = linspace(0,1,100);
T = 1.12;
for bb = 1:length(S)
y1=exp(log(1-x.^(S(1,bb)*T))/(S(1,bb)*T)); %right to left top to bottom
hold on
plot(x,y1,'r')
end
我尝试使用网格网格的代码,但它不是三维的,曲线图案也不再存在。
%---3D non-working code
clear all,clf reset,tic,clc, close all,
S=[15.3039,10.3612,7.9153,6.3793,5.3019,4.4955,3.8656,3.3584,2.9405,2.5903,2.2926,2.0367,1.8146,1.6204,1.4496,1.2983,1.1638,1.04377,.93622,.83959,.75256,.67401,.603,.53871,.48045,.42762,.37969,.33619,.29673,.26094,.22852,.19917,.17265,.14874,.12722,.10791,.090664,.075316,.061733,.049793,.039383,.030399,.0227475,.0163414,.0111008,.0069525,.0038286,.0016664,.0004081];
x = linspace(0,1,10);
T = 1.12;
[SS,xx]=meshgrid(S,x); %create meshgrid data
for bb = 1:length(S)
z=exp(log(1-xx.^(SS*T))/(SS*T)); %right to left top to bottom
hold on
plot(xx,SS,z,'r')
end
生成错误的3D图像代码