2013-10-25 33 views
2

例如:如何設置默認par.settings主題晶格

mytheme <- trellis.par.get() 
mytheme$strip.border$col = 'grey80' 
mytheme$strip.background$col = 'grey80' 
mytheme$axis.line$col = 'grey80' 
mytheme$axis.text$col = 'grey60' 
mytheme$plot.symbol$pch = 20 
mytheme$plot.symbol$cex = .5 
mytheme$plot.symbol$col = '#7AC5CD' 
mytheme$plot.symbol$alpha = .8 

l.sc <- update(scatter.lattice, par.settings = mytheme, 
       layout = c(3, 2), 
       between = list(x = 0.3, y = 0.3)) 
print(l.sc) 

我怎樣才能設置par.settings默認是mytheme


在書中格多元數據可視化有R,131頁,作者給出了這樣的例子:

lattice.options(lattice.theme = standard.theme("pdf")) 

但我不明白如何使其適應當前的情況。我試過了:

lattice.options(lattice.theme = mytheme) 

它不起作用。

+0

有一個latticeOptions函數,可能不是那個確切的拼寫。 –

+0

是的,它是lattice.options,但是manpage根本不清楚。 – qed

+0

通過查看'lattice.options()'的輸出,它主要與佈局有關。 – qed

回答

3

主題可以持續使用trellis.par.set()功能進行設置(即,直到指定了新的 設定它們會影響所有後續地塊):

trellis.par.set(mytheme) ## mythme is a named list with settings parameters 

其中mytheme的是一個列表(不需要調用網格.par.get()):

mytheme <- list() 
mytheme$strip.border$col = 'grey80' 
mytheme$strip.background$col = 'grey80' 
mytheme$axis.line$col = 'grey80' 
mytheme$axis.text$col = 'grey60' 
mytheme$plot.symbol$pch = 20 
mytheme$plot.symbol$cex = .5 
mytheme$plot.symbol$col = '#7AC5CD' 
mytheme$plot.symbol$alpha = .8 

要臨時設置的主題,您可以設置網格 繪圖功能的 「par.settings」 的說法。例如,這是latticeExtra如何設置ggplot2像主題:

library(latticeExtra) 
xyplot(exp(1:10) ~ 1:10, type = "b", 
     par.settings = ggplot2like()) 
+0

很酷。我試圖將它添加到.Rprofile中,但是'trellis.par.get()'函數在每次調用時觸發一個窗口,以任何方式抑制它? – qed

+0

@qed不需要調用'trellis.par.get()',看我的編輯。 – agstudy

+0

'trellis.par.set(mytheme)'也會彈出一個窗口。 – qed