Срезание участка при использовании plot3D - PullRequest
0 голосов
/ 16 ноября 2018

Я пытаюсь построить простую гистограмму, используя Hist3D из пакета plot3D, используя следующий код:

library(tidyverse)
library(plot3D)
data(iris)
iris=as.tibble(iris)

x=c(1,2)
y=x
z=matrix(rnorm(4,sd=0.5,mean=1),ncol=2,nrow=2)

pmat<-hist3D(x,y,
       z,
       border="black",
       axes=TRUE,
       expand=0.4,
       theta=40,phi=30,
       zmin=-1,
       margin=c(10,10),
       mar=c(10, 1, 0, 2),
       ticktype = "detailed",col="green",box=TRUE)

Но гистограмма обрезается внизу:

enter image description here Итак, я ищу способ увеличить ширину или высоту холста для Hist3D ... Заранее спасибо.

1 Ответ

0 голосов
/ 16 ноября 2018

Вы можете использовать par(xpd = NA) перед вызовом hist3D, чтобы разрешить использовать весь регион устройства для печати. Это может быть недостаточно места; если нет, установите также большие поля. Например,

par(xpd = NA, mar = c(10,10,10,10))
hist3D(x,y,
   z,
   border="black",
   axes=TRUE,
   expand=0.4,
   theta=40,phi=30,
   zmin=-1,
   margin=c(20,20),
   mar=c(10, 1, 0, 2),
   ticktype = "detailed",col="green",box=TRUE)

производит это для меня:

screenshot

Это довольно уродливо, но этого следует ожидать от трехмерной гистограммы: -).

...