作者piggood (成为有品味的男人)
看板R_Language
标题Re: [问题]用回圈整理同个ID的看病次数
时间Sat Jun 9 17:54:13 2018
※ 引述《ntpuisbest (阿龙)》之铭言：
: library(COUNT)
: data(rwm5yr)
: medical<-rwm5yr
: https://imgur.com/xLr3I5j
: 我的目的是像这样
: 同个id是同个人
: 我想要把资料整理成
: 去计算同个人的 总共 的看病次数
: 其他的column 就用 同个id最後的 资讯
: 最後要整理成
: id docvis age
: 1 1 56
: 2 4 48
: 3 13 62
: 请问有套件可以做到这件事情吗
: 还是怎麽写这个回圈呢
目前想到的方式
但也不是很简洁
不过还能用
# 先建立一个 medical1 ，除了 docvis 和 hhninc 之外，都取最後一笔观察值的资料
medical1 <- medical %>%
group_by(id) %>%
summarise_at(vars(-docvis,-hhninc), last)
# 再建 medical2 专门处理 docvis 跟 hhninc 的各别需求
medical2 <- medical %>%
group_by(id) %>%
summarise(sum(docvis), mean(hhninc))
# 合并在一起
medical3 <- data.frame(medical2,medical1)
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 114.42.48.230
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1528538057.A.4F4.html
1F：推 locka: 可以请问一下p大 summarise_all() 跟 summarise_at() 的差 06/09 20:44
2F：→ locka: 别吗？ 06/09 20:44
3F：→ piggood: summarise_at 可以指定哪些栏位要执行後面的 function 06/10 00:33
4F：→ piggood: all 的话，就是全部栏位都执行。这个例子用 all 也可以 06/10 00:34
5F：→ piggood: 只是会多出一些用不到的栏位 06/10 00:35
6F：推 ntpuisbest: 非常感谢大大 06/10 21:57