2016-07-26 62 views
0

我有一個數據框,我試圖強制插入使用arules包進行分析的事務對象。這裏是我的問題的一個可重複的例子:將擴展事務信息添加到arules事務對象中

df <- data.frame(
    case_number = c("1001", "1001", "1002", "1002", "1003"), 
    date = as.Date(c("2016-04-19", "2016-04-21", "2016-05-21", "2016-05-25", 
    "2016-06-14")), 
    happy = factor(c("Yes", "No", "Yes", "No", "No")), 
    food = ordered(
    c(1, 2, 1, 3, 1), 
    levels = c(1, 2, 3), 
    labels = c("A lot", "Some", "None") 
), 
    stringsAsFactors = FALSE 
) 

df 

    case_number  date happy food 
1  1001 2016-04-19 Yes A lot 
2  1001 2016-04-21 No Some 
3  1002 2016-05-21 Yes A lot 
4  1002 2016-05-25 No None 
5  1003 2016-06-14 No A lot 

我沒有困難強迫,如果我放下case_numer和日期。然而,在introduction to arules,例如1,EPUB的交易對象的總結包括以下內容:

includes extended transaction information - examples: 
     transactionID   TimeStamp 
10792 session_4795 2003-01-01 19:59:00 
10793 session_4797 2003-01-02 06:46:01 
10794 session_479a 2003-01-02 09:50:38 

您可以自己使用下面的代碼創建此:

library(arules) 
data(Epub) 
summary(Epub) 

我的問題是,怎麼辦如上所述,我加case_numberdate作爲擴展交易信息。我已經瀏覽了arules文檔和這個SO post

回答

0

交易信息可以通過方法transactionInfo(請參閱? transactions)進行訪問。它包含一個data.frame,每個事務有一行。