單繪圖命令

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.有組織也許它可以幫助你。