grafic3.asv

来自「implementation of a formula」· ASV 代码 · 共 25 行

SUBPLOT('position',[.05 .3 .6 .6]);
set(h6,'String','1');
eta=0:0.2:1;
lambda=0:0.2:1;
a=1.24;
index=1;
for 
R=(str2num(get(h6,'String'))*eta*lambda)/a;
polar(R,lambda,eta);
title('Responsivitate');grid;

eta=0:0.2:1;
q=1.6*10^-19;
h=6.625*10^-34;
%niu=0:0.2:2;
index=1;
for niu=0.2:0.2:2,
R(index,:)=(str2num(get(h6,'String')).*eta.*q)/(h.*niu);
index=index+1;
end

for index=1:length(eta),
plot([0:0.2:1],R(index,:));
hold on
end