- 925 名前：１３２人目の素数さん mailto:sage [2020/09/07(月) 14:12:07.49 ID:UDU7Cw0X.net]
- foo[x_,a_] := Sin[x-a];
n = 10;
With[ {tbl = Table[ Plot[ foo[x, 2π(k-1)/n], {x,0, 2π} ], {k,n} ]},
Manipulate[ tbl[[k]], {k,1,n,1} ]]
回りくどいが Withで見かけ上の局所変数を導入するとプロットできるようになった。
これが ModuleやBlockだと上手くいかない。どういう理屈なのかは分からない。
