Чтобы изменить перспективу, мы используем
screen = list(z = 0, x = 0, y = 0)
и меняем значения z, x и y в соответствии с тем, что нам нужно.
Этот код где z = 90, x = -45, y = 0
library(latticeExtra)
heisenberg <- read.csv(file="C:/Users/tiago/Desktop/VIS/DATA/4/sample_1000.csv")
x <- heisenberg[[1]]
y <- heisenberg[[2]]
z <- heisenberg[[3]]
cloud(z~x+y, heisenberg, panel.3d.cloud=panel.3dbars, col.facet='green',
xbase=0.4, ybase=0.4,scales=list(arrows=FALSE, col=1),
screen = list(z = 90, x = -45, y=0),
par.settings = list(axis.line = list(col = "transparent")))
Дает этот график