2016-07-26 229 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

頁邊距設置爲零將削減關閉你的刻度標籤。