在R中的3dplots中更改轴标题和标签的方向?
我有一个问题,对于一个擅长R情节的人来说可能很容易。我需要在R中绘制3D图。我的数据如下:在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)
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=" ")