返回介绍

R

发布于 2025-02-25 23:44:07 字数 1136 浏览 0 评论 0 收藏 0

install.packages("plyr", repos="http://cran.us.r-project.org")
The downloaded binary packages are in
    /var/folders/bh/x038t1s943qftp7jzrnkg1vm0000gn/T//Rtmpa5E0hb/downloaded_packages
d <- data.frame(year = round(runif(10, 2000, 2005)), count = round(runif(10, 0, 10)))

library(plyr)
ddply(d, 'year', mutate, mu=mean(count), sigma=sd(count), cv=mu/sigma)
   year count       mu    sigma       cv
1  2001     4 2.333333 1.527525 1.527525
2  2001     1 2.333333 1.527525 1.527525
3  2001     2 2.333333 1.527525 1.527525
4  2003     6 4.250000 3.947573 1.076611
5  2003     9 4.250000 3.947573 1.076611
6  2003     1 4.250000 3.947573 1.076611
7  2003     1 4.250000 3.947573 1.076611
8  2004     3 5.000000 2.828427 1.767767
9  2004     7 5.000000 2.828427 1.767767
10 2005     2 2.000000       NA       NA
par(mfrow=c(2,(1+length(unique(d$year)))/2), mar = c(3,3,1,1), oma=c(3,3,0,0))
d_ply(d, 'year', transform, plot(count, main=unique(year), type='o'))

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文