PTT數位生活區 / R_Language

[問題] 請教為何列印不出結果

看板R_Language作者 (吸收正能量)時間6年前 (2018/11/28 21:27), 編輯推噓0(0推 0噓 14→)
留言14則, 2人參與, 6年前最新討論串1/1
[問題類型]: 迴圈問題 [軟體熟悉度]: 入門(寫過其他程式，只是對語法不熟悉) [問題敘述]: 塗色問題，我只是想列印出所有在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 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.40.139.244 ※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1543411636.A.21C.html
→
11/28 21:47, 6年前 , 1F
code不完整
11/28 21:47, 1F
→
11/28 21:55, 6年前 , 2F
我不是很懂題意，猜你少了一層給j的for loop
11/28 21:55, 2F
→
11/28 21:59, 6年前 , 3F
我在測試j==1時跑不跑得出來...
11/28 21:59, 3F
→
11/28 22:16, 6年前 , 4F
11/28 22:16, 4F
→
11/28 22:18, 6年前 , 5F
ri如果不懂就先看看combn(1:5, 2)是什麼結果
11/28 22:18, 5F
→
11/28 22:20, 6年前 , 6F
上下列全不等的判斷不用檢查3次，用all(上列 != 下列)
11/28 22:20, 6F
→
11/28 22:41, 6年前 , 7F
ri真是關鍵！謝謝!! 我意會到我的碼有好多洞了！
11/28 22:41, 7F
→
11/28 22:45, 6年前 , 8F
all(c(1,2,3)!=c(2,3,1)) 竟然是TRUE，這邊好像怪怪的
11/28 22:45, 8F
→
11/28 22:49, 6年前 , 9F
沒事...XD
11/28 22:49, 9F
→
11/29 07:53, 6年前 , 10F
每列5抽3不放回可能和題意不符，例如某列1 2 1看來也符
11/29 07:53, 10F
→
11/29 07:53, 6年前 , 11F
合題意。我只是照你的寫法往下寫。
11/29 07:53, 11F
→
11/29 10:45, 6年前 , 12F
另外ri只是組合，使得成果的上列與下列對調不能被區分
11/29 10:45, 12F
→
11/29 11:15, 6年前 , 13F
https://ideone.com/ZVizRL 這是沒有上述限制的code
11/29 11:15, 13F
→
11/29 12:55, 6年前 , 14F
謝謝，我搞錯囉，不是塗色問題!
11/29 12:55, 14F
‣ 更多 shingai 的文章
文章代碼(AID): #1R_fUq8S (R_Language)
R_Language 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 shingai 的文章
文章代碼(AID): #1R_fUq8S (R_Language)