| Mathematica でグラフを描いてみる |
a = 1; t0 = 0; T = 1;
gMalthus = Plot[
Evaluate[Table[x0 Exp[t - t0], {x0, 0, 1.6, 0.2}]], {t, t0, T},
PlotLegends -> "Expressions", AxesLabel -> Automatic]
Export["malthus.pdf", gMalthus]
(Evaluate[] は省略できるが、そうすると曲線の色がみな同じになる。)
|
ゼミで gnuplot で描いた人がいた。 gnuplot> に対して
plot [0:2] 0.2*exp(x) replot [0:2] 0.4*exp(x) replot [0:2] 0.6*exp(x) replot [0:2] 0.8*exp(x) replot [0:2] 1*exp(x) replot [0:2] 1.2*exp(x) replot [0:2] 1.4*exp(x) replot [0:2] 1.6*exp(x) replot [0:2] 1.8*exp(x) replot [0:2] 2*exp(x) |
plot [0:2] 0.2*exp(x) replot for [i=2:10] 0.2*i*exp(x) |
(2022/4/16追記) 解決策を見つけた。 title に sprintf() で作った文字列を指定する。
plot [0:2] for [i=1:10] 0.2*i*exp(x) title sprintf("%.1f*exp(x)", i*0.2)
|