我正在尝试使用wireframe
在格子中绘制3D图形。我想重置3d绘图和R窗口之间的边距,
顶部边距太大,当我将其转换为postscript文件时,这会浪费大量空间。我正在努力降低利润率。
我尝试了以下R代码par(mar=c(4,3,3,1)+0.1).
但是没有发生任何事情。
答案 0 :(得分:0)
尝试使用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))