r - R中的反向轴

Question

我试图绘制这样的简单图片，使用 3 个值 - 从文本文件加载的 xyz。

现在我需要 X 轴从最大数字到最小数字（现在是右边的最大数字，我需要它们在左边），以便两个零在同一个角落相遇。我正在使用这个简单的代码：

xyz <- read.table("excel")
scatterplot3d(xyz,xlim = c(0, 100000))
xyz

我试过“rev”但没有成功。图片看起来总是一样的。帮助将不胜感激。

存储在名为“excel”的文件中的示例数据：

8884    20964   2
8928    5   1
9033    6   2
9261    61307   1
9435    64914   3
9605    5   2
9626    7   3
9718    5   3
10117   48941   7
10599   399 9
20834   5802    10
21337   3   8
21479   556 8

我希望我的 0,0,0 点位于右前下角。

Answer 1

您可以选择 >90 到 <270 之间的角度

   scatterplot3d(xyz,xlim = c(0, 100000),angle=ang)

例如：

z <- seq(-10, 10, 0.01)
x <- cos(z)+1
y <- sin(z)+1
scatterplot3d(x, y, z, highlight.3d=TRUE, col.axis="blue",angle=120,
              col.grid="lightblue", main="scatterplot3d - 1", pch=20)

Answer 2

如果您不介意使用 lattice 包中的云函数，那么您可以简单地将 xlim 的参数以相反的顺序排列：

require(lattice)

xyz <- read.table( text = 
"0 1 2
1 2 3
2 3 4
3 4 5")

cloud(V3~V1*V2,data = xyz, scales = list(arrows = FALSE), drape = T, xlim = c(3,0))

您可以使用参数旋转轴screen以使其看起来像您喜欢的方式。