作者andrew43 (讨厌有好心推文後删文者)
看板R_Language
标题Re: [问题] 有关append的问题
时间Wed Apr 22 07:19:41 2015
以下用 for loop 硬干，但我相信会有更聪明的做法。
# 建资料
cus <- c("A","B","C","A","B")
pro <- c(1,3,2,2,2)
lt <- list()
for (i in 1:length(unique(cus))){
lt[[i]] <- pro[which(cus == unique(cus)[i])]
}
names(lt) <- unique(cus) # 如果 unique(cus) 不适合当 list tag，这列不要用
# lt 为所求
# 看看以下内容
lt
lt$B
lt[[2]]
as.matrix(lapply(lt, paste, sep="", collapse=","))
※ 引述《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
: 请问有没有什麽建议的方法呢?
: 谢谢
--
「在PowerPoint用什麽字型就代表了你是什麽样的人……
如果你用Times New Roman，表示你是个懒鬼…」
—Don McMillan
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 125.230.77.34
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1429658384.A.327.html
※ 编辑: andrew43 (125.230.77.34), 04/22/2015 07:23:00
※ 编辑: andrew43 (125.230.77.34), 04/22/2015 07:24:08
※ 编辑: andrew43 (125.230.77.34), 04/22/2015 07:25:39