在R中的3dplots中更改轴标题和标签的方向?

在R中的3dplots中更改轴标题和标签的方向?,r,plot,scatter-plot,scatter3d,R,Plot,Scatter Plot,Scatter3d,我有一个问题,对于一个擅长R情节的人来说可能很容易。我需要在R中绘制3D图。我的数据如下: df <- data.frame(a1 = c(489.4, 505.8, 525.8, 550.2, 576.6), a2 = c(197.8, 301, 389.8, 502, 571.2), b1 = c(546.8, 552.6, 558.4, 566.4, 575), b2 = c(287.2, 305.8, 305.2, 334.4, 348.6)

我有一个问题,对于一个擅长R情节的人来说可能很容易。我需要在R中绘制3D图。我的数据如下:

df <- data.frame(a1 = c(489.4,  505.8,  525.8,  550.2,  576.6),
a2 = c(197.8,  301,    389.8,  502,    571.2),
b1 = c(546.8,  552.6,  558.4,  566.4,  575),
b2 = c(287.2,  305.8,  305.2,  334.4,  348.6), c1 = c(599.6,  611.4,  
623.6,  658,    657.4), c2 = c(318.8,  423.2,  510.8,  662.4,  656),
d1 = c(616,    606.8,  600.2,  595.6,  595),
  d2 = c(242.4,  292.8,  329.2,  378,    397.2),
e1 = c(582.4,  580,    579,    579,    579),
e2 = c(214,    255.4,  281.8,  303.8,  353.8))

colnames(df) <- rep(c("V1", "V2"), 5)
df.new <- rbind(df[, c(1, 2)],df[, c(3, 4)],df[, c(5, 6)],               
df[, c(7, 8)],df[, c(9, 10)])
df.new$Group <- factor(rep(c("a","b","c","d","e"), each = 5))
df.new$Class <- rep(c(1:5), 5)
现在我想做两个修改。一个是使这些轴的垂直标题水平,下一个是为x值放置标签,例如为x值中的1放置标签“第一间隔”,如此类推。我该怎么做

此外,我如何使点线性或平面,而不是点

一种是使这些轴的垂直标题水平

为此,您需要隐藏当前标签,并使用text()函数在正确的位置添加旋转标签;如本文所述

例如,为x值中的1加上标签“第一个间隔”,以此类推。我该怎么做

从文件中— 使用x.ticklabs属性,例如:

xlabs <- c("first interval", "second", "third", "fourth", "this is 5")
scatterplot3d(x,y,z, pch =16,main="3D V1 v.s V2",xlab = "Class",ylab = "V1", zlab = "V2", x.ticklabs=xlabs)
scatterplot3d(x,y,z , type="l", lwd=5, pch=" ")
#or
scatterplot3d(x,y,z , type="h", lwd=5, pch=" ")

你的答案似乎很完美,除了当我尝试绘制线性图时,它只使用一种颜色绘制,而忽略了其他颜色?是否可以为每种颜色绘制一个平面?
xlabs <- c("first interval", "second", "third", "fourth", "this is 5")
scatterplot3d(x,y,z, pch =16,main="3D V1 v.s V2",xlab = "Class",ylab = "V1", zlab = "V2", x.ticklabs=xlabs)
scatterplot3d(x,y,z , type="l", lwd=5, pch=" ")
#or
scatterplot3d(x,y,z , type="h", lwd=5, pch=" ")