2012-07-19 200 views
1

如何將矢量拆分爲兩部分,以便爲每個新矢量選擇一個隨機樣本。但我總是想分成兩半。例如將矢量拆分爲兩部分

x <- 1:10 
obj <- splitMyVector(x) 

obj$a 
> 5 3 9 7 10 
obj$b 
> 8 4 1 6 2 

注意:這樣做的目的是做一半的可靠性。

回答

4
split(sample(x),letters[seq(length(x))%%2+1]) 
$a 
[1] 9 7 10 4 2 

$b 
[1] 6 1 8 3 5 
+1

不錯。您應該指出,如果用戶總是將他的因素使用'a'和'b',那麼'字母'計算並不是絕對必要的。 (除非我沒有注意細節:-() – 2012-07-19 15:18:53

+0

出於好奇,請問雙'%%'操作符有什麼作用?我試圖Google,但找不到任何相關結果。 – 719016 2012-07-20 12:54:03

+0

@ 130490868091234它給出了整數除法的其餘部分 – James 2012-07-20 13:39:59