楼主: aassdfgg12
2183 5

[问答] 新手菜鸟R语言计算 [推广有奖]

  • 0关注
  • 0粉丝

学前班

40%

还不是VIP/贵宾

-

威望
0
论坛币
0 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
20 点
帖子
1
精华
0
在线时间
0 小时
注册时间
2016-1-4
最后登录
2016-4-9

楼主
aassdfgg12 发表于 2016-1-5 15:19:38 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
2003 8 月北京城区测得的 PM2.5 的质量浓度日变化(数据来源:Chan et al., 2005. Atmospheric Environment 39, no. 28 : 5113-5124), 0 时到 23 依次是97, 80, 64, 91, 87, 100, 128, 144, 150, 150, 150, 106, 78, 68, 62, 46, 55, 68, 84, 92, 95, 108, 128, 138 微克每立方米。计算 PM2.5 早高峰(6时到10时)时段占全天的比例。这个怎么计算啊   还有如何求最大值的时间?
二维码

扫码加我 拉你入群

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

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

关键词:R语言 environment Atmospheric Iron CHAN 最大值 北京 高峰 如何

沙发
监狱的小单间 发表于 2016-1-6 10:30:06
PM2.5<-c(97, 80, 64, 91, 87, 100, 128, 144, 150, 150, 150, 106, 78, 68, 62, 46, 55, 68, 84, 92, 95, 108, 128, 138) #PM2.5值
time<-c(0:23) #时间值
Z<-cbind(time,PM2.5) #合并矩阵
time[c(which(PM2.5==max(PM2.5)))] #求得pm2.5最高的时间
maxPM2.5<-sum(PM2.5[c(which(PM2.5==max(PM2.5)))]) #求得PM2.5最高的和 并给maxPM2.5
maxPM2.5/sum(PM2.5) #求占比
plot(Z,type="l",ylim=c(0,180)) #画时间与PM2.5的图 用线画 规定Y轴的范围

藤椅
监狱的小单间 发表于 2016-1-6 10:32:00
我也是刚开始学R 所以有问题随时交流

板凳
jiangbeilu 学生认证  发表于 2016-1-6 11:06:49
计算 PM2.5 早高峰(6时到10时)时段占全天的比例
这个问题,似乎有点问题:浓度是不能直接加总的,所以说占一天的比例,就有点不妥了吧。

建议跟平均值比较,在平均值之上或者之下。

求最大值的时间,可以用which.max()函数,直接返回序号

报纸
监狱的小单间 发表于 2016-1-6 14:24:56
jiangbeilu 发表于 2016-1-6 11:06
计算 PM2.5 早高峰(6时到10时)时段占全天的比例
这个问题,似乎有点问题:浓度是不能直接加总的,所以说 ...
之前我也用了which.max 但是只返回了一个最大值 从数据上面看 上面有多个最大值150 which.max有办法吗?

地板
jiangbeilu 学生认证  发表于 2016-1-6 14:39:22
监狱的小单间 发表于 2016-1-6 14:24
之前我也用了which.max 但是只返回了一个最大值 从数据上面看 上面有多个最大值150 which.max有办法吗?
如果有多个的话,which.max是没办法的。这个一般适用于连续型变量吧。还是回归到最原始的which的判断问题吧。

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2026-1-4 05:24