[问题] 请教为何打印不出结果

楼主: shingai (shingai)   2018-11-28 21:27:14
[问题类型]:
循环问题
[软件熟悉度]:
入门(写过其他程式,只是对语法不熟悉)
[问题叙述]:
涂色问题,我只是想打印出所有在2*3格子中,左右不同色且上下不同色的列举。
Run下去,完全没有动静,想请教如何排除障碍
[程式范例]:
m<-gtools::permutations(5,3,1:5,rep=FALSE);
for(i in 1:5)
{
if(j==1)
{
if(m[i,1]!=m[j,1])
{
if(m[i,2]!=m[j,2])
{
if(m[i,3]!=m[j,3])
{
print(rbind(m[i,],m[j,]))
}
}
}
}
}
[环境叙述]:
compiler_3.4.3 tools_3.4.3 gtools_3.8.1
作者: andrew43 (讨厌有好心推文后删文者)   2018-11-28 21:47:00
code不完整我不是很懂题意,猜你少了一层给j的for loop
楼主: shingai (shingai)   2018-11-28 21:59:00
我在测试j==1时跑不跑得出来...
作者: andrew43 (讨厌有好心推文后删文者)   2018-11-28 22:16:00
参考 https://ideone.com/tHKiZpri如果不懂就先看看combn(1:5, 2)是什么结果上下列全不等的判断不用检查3次,用all(上列 != 下列)
楼主: shingai (shingai)   2018-11-28 22:41:00
ri真是关键!谢谢!! 我意会到我的码有好多洞了!all(c(1,2,3)!=c(2,3,1)) 竟然是TRUE,这边好像怪怪的没事...XD
作者: andrew43 (讨厌有好心推文后删文者)   2018-11-29 07:53:00
每列5抽3不放回可能和题意不符,例如某列1 2 1看来也符合题意。我只是照你的写法往下写。另外ri只是组合,使得成果的上列与下列对调不能被区分https://ideone.com/ZVizRL 这是没有上述限制的code
楼主: shingai (shingai)   2018-11-29 12:55:00
谢谢,我搞错囉,不是涂色问题!

Links booklink

Contact Us: admin [ a t ] ucptt.com