[問題] 迴圈加速
sav = 0; iter = 10000000;
For[i = 1, i <= iter, i++,
If[Random[]^2 < 1/2, sav = sav + 1;]
] // Timing
2 sav/iter // N
這樣居然也算了23秒，覺得有點太久，請問要怎樣寫才會快呢?
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.26.112.191
※ 文章網址: http://www.ptt.cc/bbs/Mathematica/M.1419092852.A.941.html
※ 編輯: Serenede (114.26.112.191), 12/21/2014 00:39:59
→
12/21 00:57, , 1F
12/21 00:57, 1F
推
12/21 07:02, , 2F
12/21 07:02, 2F
→
12/21 07:02, , 3F
12/21 07:02, 3F
推
12/21 07:36, , 4F
12/21 07:36, 4F
→
12/21 07:36, , 5F
12/21 07:36, 5F
討論串 (同標題文章)
Mathematica 近期熱門文章
PTT數位生活區 即時熱門文章
