2017-02-21 60 views
0

水平的變量我有這樣一個數據幀:dcast數據有id.vars不等長度

date_time   id  Temp 
2012-02-27 00:12:30 | Sens_1 | 25.2 
2012-02-27 00:13:00 | Sens_1 | 25.5 
2012-02-27 00:13:30 | Sens_1 | 26.3 
2012-02-27 00:14:00 | Sens_1 | 26.3 
2012-02-27 00:14:30 | Sens_1 | 26.3 
      :    :   : 
2012-02-27 00:12:30 | Sens_2 | 35.4 
2012-02-27 00:13:00 | Sens_2 | 36.5 
2012-02-27 00:13:30 | Sens_2 | 38.8 
2012-02-27 00:14:30 | Sens_2 | 36.3 
      :     :   : 
2012-02-27 00:12:30 | Sens_3 | 15.4 
2012-02-27 00:13:00 | Sens_3 | 15.5 
2012-02-27 00:13:30 | Sens_3 | 16.8 
2012-02-27 00:14:30 | Sens_3 | 16.3 
      :     :   : 

我想另一個數據幀,看起來像這樣:

 date_time   Sens_1 | Sens_2 | Sens_3 
2012-02-27 00:12:30 | 25.2 | 35.4 | 15.4 
2012-02-27 00:13:00 | 25.5 | 36.5 | 15.5 
2012-02-27 00:13:30 | 26.3 | 38.8 | 16.8 
2012-02-27 00:14:00 | 26.3 | NA  | NA 
2012-02-27 00:14:30 | 26.3 | 36.3 | 16.3 
      :    :   :   : 

我該如何實現這一目標?儘管如此,在上面的df中,我把所有三個變量的值都設置爲相同的「date_time」值(並且在大多數情況下也是如此),但某些行中的任何子變量都可以具有某個「date_time」值,並且其餘的不會。

+0

可以使用擴展函數從dplyr。 – thisisrg

回答

0

這裏是一個班輪:

library('data.table') 
setDT(df1) # convert data frame to data table by reference 
dcast(df1, date_time ~ id, value.var = 'Temp', fun = function(x) x, fill = NA_real_) 
#    date_time Sens_1 Sens_2 Sens_3 
# 1: 2012-02-27 00:11:00 23.0 34.6 14.6 
# 2: 2012-02-27 00:11:30 23.4 33.4 14.4 
# 3: 2012-02-27 00:12:00 34.6  NA 13.6 
# 4: 2012-02-27 00:12:30 35.4  NA 15.4 
# 5: 2012-02-27 00:13:00 25.5 36.5 15.5 
# 6: 2012-02-27 00:13:30 26.3 38.8 16.8 

數據:

df1 <- structure(list(date_time = c("2012-02-27 00:11:00", "2012-02-27 00:11:30", 
            "2012-02-27 00:12:00", "2012-02-27 00:12:30", "2012-02-27 00:13:00", 
            "2012-02-27 00:13:30", "2012-02-27 00:11:00", "2012-02-27 00:11:30", 
            "2012-02-27 00:12:00", "2012-02-27 00:12:30", "2012-02-27 00:13:00", 
            "2012-02-27 00:13:30", "2012-02-27 00:11:00", "2012-02-27 00:11:30", 
            "2012-02-27 00:12:00", "2012-02-27 00:12:30", "2012-02-27 00:13:00", 
            "2012-02-27 00:13:30"), 
         id = c("Sens_1", "Sens_1", "Sens_1", "Sens_1", "Sens_1", "Sens_1", "Sens_2", "Sens_2", 
          "Sens_1", "Sens_1", "Sens_2", "Sens_2", "Sens_3", "Sens_3", "Sens_3", "Sens_3", 
          "Sens_3", "Sens_3"), 
         Temp = c(23, 23.4, 24.6, 25.2, 25.5, 26.3, 34.6, 33.4, 34.6, 35.4, 36.5, 38.8, 14.6, 
           14.4, 13.6, 15.4, 15.5, 16.8)), .Names = c("date_time", "id", "Temp"), 
       row.names = c(NA, -18L), class = "data.frame") 
+0

感謝您的回答@Sathish 雖然我仍然有同樣的問題。當我第一次發佈這個問題時,我可能不夠具體,但是我的疑問是,當我在某一行中得到的值不是所有新列都會進行測量,因此每個列都不會有相同的長度,希望得到我的問題重新排列或創建一個新的數據框。 – NewUser

+0

請用你的疑惑編輯你的問題。我會建議編輯標題,例如「重新整理具有不同長度級別的'value.vars'變量的數據」。我不知道是否有人會用現有的答案給你貼上標籤,並重新做一次。它不在我身上。我發佈了一個編輯好的解請看一下。 – Sathish

+0

標題像「具有'id.vars'具有不等長度級別的變量的dcast數據」。 - 更具體 – Sathish