如果满足某些条件,则绘制 R 图
R plot if certain conditions are met
嘿嘿
我想创建数据的散点图。我有一个数据框,其中包括(不仅)一年中的四分之一、温度、降水量和一个物种的 gam_indices 作为列。
现在我想根据 gam_index (x) 绘制温度 (y),但前提是四分位数为 1。
到目前为止,我有基本的散点图公式
plot(Archon_noduplicate$regional_gam, Archon_noduplicate$prev.temp, main="Archon_noduplicate",
xlab="logAUC", ylab="prev.temp", pch=19)
但不是关于包含条件的简短通知方式的想法。当然会有一种方法可以首先创建一个新列,其中只包含四分之一的温度值,然后绘制它,但是由于我有很多物种和很多变量,所以最好能找到一些不那么乏味的东西.
如果您需要一些示例,我的数据如下所示:
transect_id year day month LST precipitation Quarter SumPre average.temp MinTemp MaxTemp
1 TR001 2011 1 1 15.70134 0.000000 1 161.9494290 14.69150 10.28747 18.95994
2 TR001 2011 91 4 19.53845 1.858437 2 106.3809708 23.56554 16.58574 29.81955
3 TR001 2011 182 7 28.96053 0.000000 3 0.9290609 29.62564 26.22075 31.78875
4 TR001 2011 274 10 26.46966 0.000000 4 66.1280496 18.84587 12.18172 29.72368
5 TR001 2012 1 1 13.17917 2.534553 1 154.5095844 13.38382 10.64767 17.80582
6 TR001 2012 92 4 17.18347 0.000000 2 9.4365772 24.77507 17.18347 30.88236
prev.temp prev.Precip species regional_gam prop_pheno_sampled
1 16.22194 0 Archon apollinus 1.780317 0.4154008
2 24.81180 0 Archon apollinus 1.780317 0.4154008
3 30.78058 0 Archon apollinus 1.780317 0.4154008
4 22.72036 0 Archon apollinus 1.780317 0.4154008
5 14.69150 0 Archon apollinus 1.103804 0.4413598
6 23.56554 0 Archon apollinus 1.103804 0.4413598
我有点卡在这里,所以我很感谢你的意见!
谢谢!
尝试:
with(Archon_noduplicate[Archon_noduplicate$Quarter==1,], plot(regional_gam, prev.temp, main="Archon_noduplicate", xlab="logAUC", ylab="prev.temp", pch=19))
嘿嘿 我想创建数据的散点图。我有一个数据框,其中包括(不仅)一年中的四分之一、温度、降水量和一个物种的 gam_indices 作为列。 现在我想根据 gam_index (x) 绘制温度 (y),但前提是四分位数为 1。 到目前为止,我有基本的散点图公式
plot(Archon_noduplicate$regional_gam, Archon_noduplicate$prev.temp, main="Archon_noduplicate",
xlab="logAUC", ylab="prev.temp", pch=19)
但不是关于包含条件的简短通知方式的想法。当然会有一种方法可以首先创建一个新列,其中只包含四分之一的温度值,然后绘制它,但是由于我有很多物种和很多变量,所以最好能找到一些不那么乏味的东西. 如果您需要一些示例,我的数据如下所示:
transect_id year day month LST precipitation Quarter SumPre average.temp MinTemp MaxTemp
1 TR001 2011 1 1 15.70134 0.000000 1 161.9494290 14.69150 10.28747 18.95994
2 TR001 2011 91 4 19.53845 1.858437 2 106.3809708 23.56554 16.58574 29.81955
3 TR001 2011 182 7 28.96053 0.000000 3 0.9290609 29.62564 26.22075 31.78875
4 TR001 2011 274 10 26.46966 0.000000 4 66.1280496 18.84587 12.18172 29.72368
5 TR001 2012 1 1 13.17917 2.534553 1 154.5095844 13.38382 10.64767 17.80582
6 TR001 2012 92 4 17.18347 0.000000 2 9.4365772 24.77507 17.18347 30.88236
prev.temp prev.Precip species regional_gam prop_pheno_sampled
1 16.22194 0 Archon apollinus 1.780317 0.4154008
2 24.81180 0 Archon apollinus 1.780317 0.4154008
3 30.78058 0 Archon apollinus 1.780317 0.4154008
4 22.72036 0 Archon apollinus 1.780317 0.4154008
5 14.69150 0 Archon apollinus 1.103804 0.4413598
6 23.56554 0 Archon apollinus 1.103804 0.4413598
我有点卡在这里,所以我很感谢你的意见! 谢谢!
尝试:
with(Archon_noduplicate[Archon_noduplicate$Quarter==1,], plot(regional_gam, prev.temp, main="Archon_noduplicate", xlab="logAUC", ylab="prev.temp", pch=19))