2016-08-27 50 views
-3

我想行插入每個beighboring行,例如,像這樣的原單數據幀:ř追加一個新行的每一行

ID x y z value 
1 1 1 1 2 
2 4 7 9 3 
3 9 2 5 8 
4 8 6 1 4 
5 7 3 5 9 

和插入行之後,數據幀應該是像這樣:

ID x y z value 
1 1 1 1 2 
3 5 NA NA NA 
2 4 7 9 3 
8 1 NA NA NA 
3 9 2 5 8 
6 3 NA NA NA 
4 8 6 1 4 
9 7 NA NA NA 
5 7 3 5 9 
10 8 NA NA NA 

我得到兩個選擇,第一是直接追加新行的每一行,第二個是兩列添加到數據幀,再拆一排爲兩行。 那麼如何處理這種情況呢?先謝謝你!

+0

a。爲什麼,和b。 「x」值來自哪裏? – alistaire

+0

嗨,請將新行的ID和x值設置爲任何整數。 –

+1

你還沒有回答,所以我很確定我正在啓用一個真正可惡的行爲,但是在這裏你去:''''''''''''''' .frame(rbind(x,c(rpois(2,5),rep(NA,3))))}))' – alistaire

回答

0

我無法理解您在哪裏獲取要插入數據框的數據。所以,我製作了一套虛擬套裝data2。請參閱下面的代碼,應該爲你需要的工作。

data <- read.table(text= "ID x y z value 
        1 1 1 1 2 
        2 4 7 9 3 
        3 9 2 5 8 
        4 8 6 1 4 
        5 7 3 5 9", header=T) 

data2 <- data.frame(matrix(rnorm(2*nrow(data)),nrow(data))) 
names(data2) <- names(data)[1:ncol(data2)] 

combined <- plyr::rbind.fill(data,data2) 
n <- nrow(data) 
combined[kronecker(1:n, c(0, n), "+"),]