我正在嘗試創建一個由 500 個 10 個單詞組成的 5000 個單詞向量。一個塊是從固定的動物串列中進行抽樣并替換,這個塊是與固定的食物串列交替的。以下代碼產生了我需要的一個迭代:
anim<- data.frame(cbind(stim=list.sample(animals$WORD, 10, replace=T), cond="animal"))
food <- data.frame(cbind(stim=list.sample(foods$WORD, 10, replace=T), cond="food"))
both <- data.frame(rbind(anim, food))
這產生如下輸出:
我只是不知道如何再重復這個程序 499 次來創建我需要的總向量——我將在集群之間運行語意距離,以確定我是否可以自動分割食物和動物之間的邊界。我嘗試重復回圈無濟于事
感謝您的任何想法!
uj5u.com熱心網友回復:
由于您沒有提供任何可重復的資料,我們將假設它們LETTERS
是食物和letters
動物。這行代碼生成您指定的向量。這里我們只使用 5 個批次來說明這個程序:
result <- as.vector(replicate(5, c(sample(LETTERS, 5, replace=TRUE), sample(letters, 5, replace=TRUE))))
result
# [1] "H" "O" "T" "K" "J" "m" "c" "s" "u" "c" "P" "Y" "V" "U" "Y" "p" "u" "q" "k" "l" "B" "H" "U" "F" "K" "h" "v" "g"
# [29] "c" "d" "X" "F" "R" "N" "U" "v" "t" "u" "q" "x" "N" "E" "G" "Q" "L" "d" "a" "v" "e" "a"
轉載請註明出處,本文鏈接:https://www.uj5u.com/qiye/522284.html
標籤:r细绳采样