我有一些数据可以用来创建带线的图。每个样本的值均符合温度(例如“ C300cum”)。
我尝试将“轴”放置在不同的时间间隔。
plot(t(as.matrix(RC_means_DF[c("D2Aa"),14:18])),type="l, xaxt = 'n')
axis(1, at = c(1,2, 2.5,4,7), labels = c("300", "400", "450", "600",
"900"))
但是我不知道如何在绘图函数中执行此操作,因此x值会调整到该位置。我在这里也找不到答案。
C300cum C400cum C450cum C600cum C900cum
D2Aa 0.3900000 0.9753333 1.2246667 1.6066667 1.693667
D2Ab 0.5470000 1.2103333 1.4473333 1.9603333 2.065667
D2Ac 0.4660000 1.0146667 1.2213333 1.6906667 1.807667
D2Ba 0.4646667 1.0573333 1.2920000 1.9376667 2.069333
D2Bb 0.4810000 1.1026667 1.3450000 1.9210000 2.115667
plot(t(as.matrix(RC_means_DF[c("D2Aa"),14:18])),type="l"
, ylim = c(0.4,2.5), xaxt = 'n')
lines(t(as.matrix(RC_means_DF["D2Aab",1:5])))
lines(t(as.matrix(RC_means_DF["D2Ac",1:5])))
lines(t(as.matrix(RC_means_DF["D2Ba",1:5])))
lines(t(as.matrix(RC_means_DF["D2Bb",1:5])))
我希望各个样本值之间的间隔符合温度刻度的真实间隔,即300至450之间的间隔小于例如450-500。
最终,我希望在x轴上有不规则的间隔
答案 0 :(得分:0)
我找到了答案...只是通过“级联”数字来解释各个值...
plot(t(as.matrix(RC_means_DF[c("D2Aa"),14:18]))~ c(1,2,2.5,4,7),type="l"
, ylim = c(0.4,2.5), ylab = "%C burned",
xlab = "temperature °C", xaxt = 'n')
axis(1, at = c(1,2,2.5, 4,7), labels = c("300", "400", "450", "600", "900"))
lines(t(as.matrix(RC_means_DF["D3Aa",14:18]))~ c(1,2,2.5,4,7))
lines(t(as.matrix(RC_means_DF["D5sAa",14:18]))~ c(1,2,2.5,4,7))
lines(t(as.matrix(RC_means_DF["D9nAa",14:18]))~ c(1,2,2.5,4,7))
为我提供了具有所需间距的图(这些值与原始文章中的值不同)。