2016-07-26 241 views
2

我指定了绘图的宽度,高度和分辨率,然后删除边距,如下面的代码所示,并绘制了一个图。如何摆脱边距

但我仍然有利润。我有和par命令一样的情节。上传的图像从7000 * 5000减少到1400 * 1000,减少到2MB以下。

enter image description here

library(scatterplot3d) 

parwd = 7000 
parht = 5000 
parres = 1000 

par(oma = c(0,0,0,0), mar = c(0,0,0,0)) 

jpeg(filename="CC_1_fo.jpg", width = parwd, height = parht, res = parres) 
scatterplot3d(1:10, 1:10, 1:10, 
       cex.symbol = 0.2, 
       xlab = expression(T[1]), 
       ylab = expression(T[2]), 
       zlab = expression(tau)) 
dev.off() 

如何我真的能去除利润率?

+3

你可以添加一个[可重现的例子](http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example/5963610)? – Jaap

+1

@ProcrastinatusMaximus我不明白你为什么要求可重复的例子,因为这个问题中的数据并不重要。无论如何,我编辑了问题 – user67275

+7

我要求提供数据,因为这使得其他人更容易重现您的问题,从而更容易帮助您。 – Jaap

回答

4

我猜3D绘图有点时髦,一些par参数不能按预期工作。具体而言,如果您想要设置利润为mar,则必须使用的实际mar参数scatterplot3d

这在帮助(?scatterplot3d)笔记指出:

一些图形参数只能在 scatterplot3d但不是在以前par()电话被设置为参数。其中之一是 mar(...)

使用:

scatterplot3d(1:10, 1:10, 1:10, 
       cex.symbol = 0.2, 
       xlab = expression(T[1]), 
       ylab = expression(T[2]), 
       zlab = expression(tau), 
       mar = c(0,0,0,0)) 

将导致无边距一个情节:

enter image description here

页边距设置为零将削减关闭你的刻度标签。