level 9
通顺且顽强丶喜鹊v
楼主
下面两个程序应该是相同的,无非是第二个程序把下标明确提取出来,但第二个程序能够得到正确结果,第一个却不行,为什么?
SeedRandom[1234];
xs = {0, 0};
While[Min[xs] < 2, xs[[RandomInteger[{1, 2}]]]++; Print@xs];
得到:
{0,1}
{2,1}
{3,1}
{4,1}
{4,5}
SeedRandom[1234];
xs = {0, 0};
While[Min[xs] < 2, pos = RandomInteger[{1, 2}]; xs[[pos]]++;
Print@xs];
得到:
{0,1}
{0,2}
{0,3}
{1,3}
{2,3}
2015年01月09日 08点01分
1
SeedRandom[1234];
xs = {0, 0};
While[Min[xs] < 2, xs[[RandomInteger[{1, 2}]]]++; Print@xs];
得到:
{0,1}
{2,1}
{3,1}
{4,1}
{4,5}
SeedRandom[1234];
xs = {0, 0};
While[Min[xs] < 2, pos = RandomInteger[{1, 2}]; xs[[pos]]++;
Print@xs];
得到:
{0,1}
{0,2}
{0,3}
{1,3}
{2,3}