|
参考下
Kb=0:0.0001:0.001; RootSol=zeros(length(Kb),5); hold on;
for ii=1:length(Kb),Kb1=Kb(ii);
pp=[1, (1256-7.749671104454708*10^5*Kb1), (591576-5.684635405*10^8*Kb1-9.693981882*10^10*Kb1^2), ...
(123836576-7.704071183*10^10*Kb1-1.940165734*10^14*Kb1^2), ...
(9721171216+2.379385322*10^13*Kb1-9.316877299*10^16*Kb1^2-1.586584154*10^19*Kb1^3), ....
Kb1*(5.001619293*10^15-1.312691046*10^19*Kb1-4.981874242*10^21*Kb1^2)];
aaa=roots(pp); RootSol(ii,:)=aaa';
plot(aaa,'o'); pause(1);
end; hold off
figure; plot(RootSol,'o'); |
|