[問題] 繪製事件圖

看板R_Language作者 (Neisseria)時間8年前 (2017/05/02 23:13), 8年前編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/2 (看更多)
[問題類型]: 程式諮詢(我想用R 做某件事情,但是我不知道要怎麼用R 寫出來) [軟體熟悉度]: 入門(寫過其他程式,只是對語法不熟悉) [問題敘述]: 現在有一個亂數程式,每次會從 1 至 48 中任意挑選不重覆的六個數字 我們假設我們選了 100 次,程式如下: mx <- NULL for (i in 1:100) { mx <- rbind(mx, sample(1:48, 6, replace = FALSE))} df <- NULL for (i in 1:dim(mx)[1]) { col <- NULL for (j in 1:48) { if (any(mx[i, ] %in% j)) { col <- cbind(col, j) } else { col <- cbind(col, NA) } } df <- rbind(df, col) } 我現在想畫以下的圖: 48 | 47 | --- ------ 46 | ... 5 | -------- 4 | 3 | 2 | ----- 1 | --- ---------------... ------- 1 2 3 4 5 6 7 99 100 簡單地說,若該數字出現,則畫水平線,若未出現,則不畫線 如果各位覺得這整個事件很像某個生活中發生的事,那純屬巧合 XD [程式範例]: 本來想用 ggplot 畫,但現在已經不要求了,有圖就好 如果有一些比較基本的繪圖函式,可以自行組合也不錯 因為 R 的函數包得太好了,要自已畫一些其他類型的圖反而不知怎麼畫 [環境敘述]: 對本題無明顯幫助 [關鍵字]: -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 112.105.250.50 ※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1493738014.A.1F4.html ※ 編輯: Neisseria (112.105.250.50), 05/02/2017 23:16:07 ※ 編輯: Neisseria (112.105.250.50), 05/02/2017 23:18:06
文章代碼(AID): #1P2A8U7q (R_Language)
文章代碼(AID): #1P2A8U7q (R_Language)