求问数据的拆分与还原

天欣。

1547

收藏 2018-09-18

请问各位大神，
我现在有这样一组数据

姓名	年龄	爱好
张三	16	足球；摄影
李四	16	篮球；滑冰；攀岩

如何能变成如下的数据

姓名	年龄	爱好
张三	16	足球
张三	16	摄影
李四	16	篮球
李四	16	滑冰
李四	16	攀岩

先在这里谢过各位大神了。

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

cheetahfly

2018-9-18 21:43:33

tidyr::separate() + tidyr::gather()

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

天欣。

2018-9-19 08:31:23

cheetahfly 发表于 2018-9-18 21:43
tidyr::separate() + tidyr::gather()

先谢谢您今天上班的时候试试看

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zzbb2266

2018-9-19 09:16:15

还有一个稍微麻烦的做法：
stringr::str_split(data$'爱好', ";") #拆分
拆出来apply一下就行

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

ntsean

2018-9-20 11:16:28

tidytext 包有个很好的函数

library(tidytext)

data %>% unnest_tokens(爱好, 爱好)

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群