[ Djomloun @ 22.03.2007. 01:45 ] @
Ukratko imam def f-ju p[s,n] i imam print te f-je ovakav:

Code:

Plot[Evaluate[Table[p[s, n], {s, 2, 10, 0.5}]], {n, 2, 10}]


i to izgleda ovako:

[att_img]


Q: Kako da pored svake krive stoji ime serije tj s=2 ; s=2,5 ; s=3 itd ?

[ milnen @ 26.03.2007. 19:35 ] @
Mislim da ovo ne moze, jer Plot ne zna koliko je bilo s u trenutku kada vrednost funkcije stigne do njega.
Cak i kada bi moglo, nisam siguran da bi bilo previse pregledno da se nalepe onolike oznake na grafik.
Po meni, najbolje je da svaka linijia bude drugacija, a da pored grafika stoji legenda. Exportujes vrednosti funkcije iz Mathematice, ubacis ih u Origin i za par sekundi imas grafik.
[ Djomloun @ 27.03.2007. 23:27 ] @
Ja sam mislio da to uradim iz 'dva koraka'. Da mi pored krive pisxe txt i da tu uradim neki Do... koji bi mi ponovo izgeverisao vrednosti s.
tnx na tipu probacu tako kao sxto si rekao export u Origin.
[ Djomloun @ 12.04.2007. 15:17 ] @
Resxenje je u dodatnom paketu:

Code:

<<Graphics`MultipleListPlot`