〓 Mathematica 2 〓
■ このスレッドは過去ログ倉庫に格納されています
0449132人目の素数さん
NGNGTable[If[PrimeQ[i], i, ""], {i, 2, 100}]
を実行すると、
{2, 3, , 5, , 7, , , }
が返るが、
list = {2};
Do[
If[PrimeQ[i], Append[list, i]],
{i, 3, 100}];
list
とやっても
{2}
となるだけ。
なんでなのでしょうか。
■ このスレッドは過去ログ倉庫に格納されています