r - 使用条件语句从现有的 for 循环中绘制绘图
问题描述
我有一个包含以下列的数据集:Site、Year、Date、count 和 SpeciesName。我有一个家庭作业问题,上面写着:“在某些年份,每个地点都进行了两次计数。对于那些年,找到每个地点的每个物种的平均计数(我们正在研究两个物种),并绘制那些意味着而不是原始计数。” 我写了这段代码(不包括情节代码):
species1=subset(channel_islands,SpeciesName=="Paralabrax clathratus, adult")
species2=subset(channel_islands,SpeciesName=="Hypsypops rubicundus, adult")
#subsets data for each species
species1_new=data.frame(Site=numeric(0),count=numeric(0),year=numeric(0),species=character(0))
for(i in unique(species1$Year)){
year=subset(species1,Year==i)
ag=aggregate(count~Site,data=year,mean)
ag$year=i
ag$species="Paralabrax clathratus,adult"
species1_new=rbind(species1_new,ag)
}
species2_new=data.frame(Site=numeric(0),count=numeric(0),year=numeric(0),species=character(0))
for(i in unique(species2$Year)){
year=subset(species2,Year==i)
ag=aggregate(count~Site,data=year,mean)
ag$year=i
ag$species="Hypsypops rubicundus,adult"
species2_new=rbind(species2_new,ag)
}
final=rbind(species1_new,species2_new)
我的下一个问题是:“此外,仅当这两个物种在当年至少 10 个地点同时出现(即,两者的丰度 > 0)时才绘制图。(我们对在大多数年份进行比较不感兴趣)的数据为零)”我的想法是否正确,我需要使用我上面写的相同的循环,但现在使用条件“if”语句来判断两个物种何时共存?感谢您的帮助,如果这是不正确的,我不想开始朝错误的方向工作。
解决方案
推荐阅读
- javascript - JS - 使用 preventDefault 调用启用幽灵元素效果
- mocha.js - 用
- neo4j - Neo4j Cypher 对具有多个重复项的列表的结果进行排序和添加
- sql-server - T-SQL 在更新触发器中动态使用 IF Update(fieldname)
- javascript - 我如何知道 Google 地图何时更改为全屏模式
- java - centos上使用yum命令安装open jdk 11
- python - 获取特定字符python之后的所有字符串
- javascript - Material Dialog vs. Bootstrap Modal:Angular 5、6
- java - 以编程方式访问自定义视图的元素
- python - 使用 tkinter 变量查询 MySQL 数据库