如何在R中为所有plot.default,plot或line调用默认设置颜色

Question

为了简化我的每日R互动,我想为我的所有情节设置默认颜色.例如,假设我想要用红线制作所有图(如gnuplot ...... :-))

到目前为止,这是我的.Rprofile的片段

setHook(packageEvent("grDevices", "onLoad"), 
    function(...) 
        grDevices::X11.options(width = 14, height = 8, type = "Xlib", xpos = 600,     ypos = 30, canvas = "grey87"))

suppressPackageStartupMessages( require(Defaults) )
suppressPackageStartupMessages( require(utils) )
suppressPackageStartupMessages( require(graphics) )

setDefaults("plot.default",frame.plot=FALSE, type='l', col=2)

我在这里做的是:当grDevices加载包时(通过加载graphics包),我X11.options用我喜欢的参数调用:更宽的框,浅灰色背景,xlib调用(因为我正在做远程调用,而cairo in我当前的环境太慢了(另一个需要解决的问题))然后我默默加载3个包Defaults,utils和graphics.需要第二个来避免find功能错误消息.

最后,魔术功能setDefaults设置3个参数到散点图函数plot.default.第3个参数col不是函数的参数plot.default而是一个参数par().

但是,setDefaults打电话par也不起作用.

欢迎任何解决方案......

Answer 1

每次打开新的图形框架时,您都可以使用"plot.new"钩子设置默认par值.(钩子的工作记录在?plot.new和?setHook)

在您的情况下,只需将此行添加到.Rprofile:

setHook("plot.new", function() par(col = "red"))