- 820 名前:132人目の素数さん mailto:sage [05/02/19 22:46:20 ]
- >>818
これじゃだめかい?だめだろうねぇ。 t = Table[Subscript[a, i, j], {i, 5}, {j, 5}]; DisplayForm[FrameBox[GridBox[t, RowLines -> True, ColumnLines -> True]]] >>819 Table[Plot[Sin[i x], {x, 0, 2π}, PlotLabel -> "i=" <> ToString[i]], {i, 3}]
|

|