Хм, набирал код, чтобы построить график и точечки для сравнения
Код:
g1 := ListLogLogPlot[{{1, 10}, {20, 10^-9}, {2, 0.05}, {3,
0.0009}, {4, 0.00005}, {5, 0.000006}, {6, 0.0000012}, {7,
0.0000004}, {8, 0.00000014}, {9, 0.000000025}, {10, 0.000000018}},
Ticks -> {Table[{0.9, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 20}],
Table[10.0^(-n), {n, 9, 0, -1}]}, AxesOrigin -> {0.9, 10^-9},
AspectRatio -> 1/1, PlotStyle -> {Hue[0.6], PointSize[0.02]}]
g2 := ListLogLogPlot[Table[3.7 n^-8.3, {n, 1, 20}], Joined -> True]
Show [g1,g2]
все работало. Картинка такая же, только без зеленых точек. Перешел на 9 часть, вроде удобная. Однако код работать отказывается, то есть ошибки не выдает, но и графики тоже.... совсем кривые. Подскажите, пожалуйста, в чем дело?
11.02.2013, 20:45 