Как объединить 3D-графики в R, используя par (mfrow = c (2,2))

Question

Я хотел бы построить 2 или 3 3D-графика в R, используя

par(mfrow=c(2,2).Однако Rstudio строит их отдельно.

Вот мой код:

library(Vinecopula)
par(mfrow=c(2,1))
plot(BiCop(5,5), main="copula with \theta = 5")
plot(BiCop(5,-5), main="copula with \theta = -5")