作者celestialgod (攸蓝)
看板R_Language
标题Re: [问题] 有关append的问题
时间Wed Apr 22 09:55:37 2015
※ 引述《lambking (BB)》之铭言：
: [问题类型]:
: 程式谘询(我想用R 做某件事情，但是我不知道要怎麽用R 写出来)
: [软体熟悉度]:
: 入门(写过其他程式，只是对语法不熟悉)
: [问题叙述]:
: 原始资料如下:
: customer productID
: A 1
: B 3
: C 2
: A 2
: B 2
: 想整理成以下形式
: customer purchaseList
: A 1,2
: B 3,2
: C 2
: 请问有没有什麽建议的方法呢?
: 谢谢
後来用一下gather，发现不适用，我用data.table还有dplyr做的
另外提供用tapply的作法
library(data.table)
library(dplyr)
library(magrittr)
dat = data.frame(customer = LETTERS[c(1:3, 1:2)], productID = c(1,3,rep(2,3)))
dat %>% tbl_dt() %>% group_by(customer) %>%
summarise(x = paste(productID, collapse = ","))
# tapply
y = tapply(dat$productID, dat$customer, paste, collapse = ",")
data.frame(names(y), y)
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 123.205.27.107
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1429667739.A.C69.html
※ 编辑: celestialgod (123.205.27.107), 04/22/2015 09:55:58
※ 编辑: celestialgod (111.83.212.122), 04/22/2015 18:49:09