| Author |
Comment/Response |
roescu
|
 05/08/08 06:03am
There is a function running on two parameters which i collect from an array. In the end I want to plot on the same graph the curves for all values of these parameters. I have tried to adapt an older code but I get nothing working. Can somebody clue me what to do and where is the mistake?
here is the code:
aa = 1;
bb = 2;
nn = {0, 1, 2, 3, 4, 5, 6}
ll = {0, -7, -8, 10, 12, 200, 4}
functia[B_, ii_, jj_] := 2 B + nae + lae
pipi = Array[pp, {6, 7}];
For[ii = 1, ii <= 6 , ii++,
For[jj = 1, jj <= 7, jj++,
DO[ nae = Extract[nn, ii]; lae = Extract[ll, jj]; Print[nae, lae]]
pipi[[ii, jj]] = Evaluate[functia[B, ii, jj];]]]
imagine =
Plot[Evaluate[pipi], {B, 0, 10}, PlotPoints -> 50,
PlotRange -> {{0, 10}, Automatic}]
URL: , |
|
