Question

是否可以将大量信息压缩到R中的单个命令中，例如graph 1？我已经提供了我希望缩小的信息，但是由于单独的功能，例如点和传说，我发现很难。

plot(temp.a~Response,data=sst.brazil.bleach,pch=15, col="red", ylim=c(0,6),xlim=c(0,30), main="Fig. 1. The effect of anomalous levels of sea surface temperature on coral bleaching",xlab="Bleaching response index",ylab=" Total annual sea surface temperature anomalies\n(°C)")
points(temp.a~Response,data=sst.seychelles.bleach,pch=16, col="blue")
points(temp.a~Response,data=sst.indo.bleach,pch=17, col="orange") 
legend("bottomright", bty= "n", c("Brazil","Seychelles","Indonesia"),col=c('red', 'blue', 'orange'),pch=c(15,16,17))

任何帮助都会非常感激！

Answer 1

您可以指定一个只使用一个命令myplot()绘制绘图的函数：

myPlot <- function(myTitle="Fig. 1. The effect of anomalous levels of sea surface temperature on coral bleaching") {
  plot(temp.a~Response,data=sst.brazil.bleach,pch=15, col="red", ylim=c(0,6),xlim=c(0,30), 
       main=mytitle,
       xlab="Bleaching response index",ylab=" Total annual sea surface temperature anomalies\n(°C)") 
  points(temp.a~Response,data=sst.seychelles.bleach,pch=16, col="blue") 
  points(temp.a~Response,data=sst.indo.bleach,pch=17, col="orange") 
  legend("bottomright", bty= "n", c("Brazil","Seychelles","Indonesia"),
         col=c('red', 'blue', 'orange'),
         pch=c(15,16,17))
}

myplot()
myPlot("I want another title for this one")

或者也可以将绘图命令保存到单独的文件中，例如myplot.r，并使用

进行调用

source("myplot.r")

文章Designing projects帮助我在R中更有条理。也许它对你有帮助。

单个绘图命令

1 个答案: