[問題] 請問如何多次複製1筆資料? (求救)

看板R_Language作者 (就是要問!!!)時間1月前 (2024/11/10 14:26), 1月前編輯推噓1(106)
留言7則, 2人參與, 2周前最新討論串1/1
[問題類型]: 請把以下不需要的部份刪除 意見調查(我對R 有個很棒的想法,想問問大家的意見) 程式諮詢(我想用R 做某件事情,但是我不知道要怎麼用R 寫出來) 效能諮詢(我想讓R 跑更快) 經驗諮詢(我想用R 連接某些資料庫,請問大家的經驗) [軟體熟悉度]:新手 請把以下不需要的部份刪除 新手(沒寫過程式,R 是我的第一次) 入門(寫過其他程式,只是對語法不熟悉) 使用者(已經有用R 做過不少作品) 開發者(有撰寫R 的套件經驗) [問題敘述]:小弟希望把一整筆資料x2 (例如35列3行)做N次的複製,不知道該怎麼做? 狀況如下: V1 V2 V3 1 1 1 1 2 1 1 2 3 1 1 8 .... 35 10 10 10 #x2的生成方式如下: 就是取1,2,8,9,10這5筆 做重複組合 共35組 x2 <- gtools::combinations(5,3,c1,rep=T) x2 <- as.data.frame(x2) #我自己使用到 assign 和 get,程式碼如下 #1 先把35列都抓出來 dim(x2)[1] #就是35列 n <- dim(x2)[1] for (i in 1:n) { assign(paste0("d",i),x2[i,]) } #2 但接下來我希望把d1~d35複製N次 , 假設N=100 不知道怎麼做? 我不知道該怎麼寫 迴圈 能夠幫忙我嗎? 我知道要用get 取得資料來合併 但不知道怎麼把d1~d35用get複製100次 (就是d1~d35為1次 有100個d1~d35 共3500列) 請簡略描述你所要做的事情,或是這個程式的目的 [程式範例]: #x2的生成方式如下: 就是取1,2,8,9,10這5筆 做重複組合 共35組 x2 <- gtools::combinations(5,3,c1,rep=T) x2 <- as.data.frame(x2) 我自己使用到 assign 和 get,程式碼如下 #1 先把35列都抓出來 dim(x2)[1] #就是35列 n <- dim(x2)[1] for (i in 1:n) { assign(paste0("d",i),x2[i,]) } #2 不會寫QQ [環境敘述]: R4.4.2 請提供 sessionInfo() 的輸出結果, 裡面含有所有你使用的作業系統、R 的版本和套件版本資訊, 讓版友更容易找出錯誤 [關鍵字]:assign、get、for -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 123.194.168.241 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1731220009.A.703.html ※ 編輯: askpeople (123.194.168.241 臺灣), 11/10/2024 14:27:23 ※ 編輯: askpeople (123.194.168.241 臺灣), 11/10/2024 14:27:51 ※ 編輯: askpeople (123.194.168.241 臺灣), 11/10/2024 14:45:16 ※ 編輯: askpeople (123.194.168.241 臺灣), 11/10/2024 14:45:43 ※ 編輯: askpeople (123.194.168.241 臺灣), 11/10/2024 14:51:20

11/10 15:19, 1月前 , 1F
假設你的35筆資料是取名叫x2,可以試試以下
11/10 15:19, 1F

11/10 15:19, 1月前 , 2F
x2[rep(1:35, length.out = 100),]
11/10 15:19, 2F

12/05 04:58, 2周前 , 3F
假設你的資料格式是data.frame ,然後重複資料打算上下重
12/05 04:58, 3F

12/05 04:58, 2周前 , 4F
複合併100次
12/05 04:58, 4F

12/05 04:58, 2周前 , 5F
result <- Reduce(rbind, replicate(100, df, simplify
12/05 04:58, 5F

12/05 04:58, 2周前 , 6F
= FALSE)
12/05 04:58, 6F

12/05 04:59, 2周前 , 7F
df 放你的數據
12/05 04:59, 7F
文章代碼(AID): #1dC58fS3 (R_Language)
文章代碼(AID): #1dC58fS3 (R_Language)