使用格子R包重置線框圖中的邊距

Question

我正在嘗試使用wireframe在格子中繪製3D圖形。我想重置3D圖和R窗口之間的邊距，

頂部邊距太大，當我將它轉換爲postscript文件時，這會浪費大量空間。我正在努力減少利潤。

我嘗試以下R代碼裏面par(mar=c(4,3,3,1)+0.1).

但是什麼也沒有發生。

Answer 1

試試這個片段，改編自https://stat.ethz.ch/pipermail/r-help/2007-January/123556.html。它爲我工作。

library(lattice) 
theme.novpadding <- list(
    layout.heights = list(
     top.padding = 0, 
     main.key.padding = 0, 
     key.axis.padding = 0, 
     axis.xlab.padding = 0, 
     xlab.key.padding = 0, 
     key.sub.padding = 0, 
     bottom.padding = 0 
    ), 
    layout.widths = list(
     left.padding = 0, 
     key.ylab.padding = 0, 
     ylab.axis.padding = 0, 
     axis.key.padding = 0, 
     right.padding = 0 
    ) 
) 
wireframe(volcano, shade = TRUE, 
      aspect = c(61/87, 0.4), 
      #par.settings = theme.novpadding, # uncomment this 
      light.source = c(10,0,10))