如何解决将plot3D,plotly和ggplot可视化相结合
我们可以结合多种类型的3d视觉效果吗? 我想结合 使用plot3d软件包的3d散点图 使用plotly包的3D散点图 使用ggplot软件包的3d散点图
library(plotly)
mtcars$am[which(mtcars$am == 0)] <- 'Automatic'
mtcars$am[which(mtcars$am == 1)] <- 'Manual'
mtcars$am <- as.factor(mtcars$am)
pltly <- plot_ly(mtcars,x = ~wt,y = ~hp,z = ~qsec,color = ~am,colors = c('#BF382A','#0C4B8E'))
pltly <- pltly %>% add_markers()
pltly <- pltly %>% layout(scene = list(xaxis = list(title = 'Weight'),yaxis = list(title = 'Gross horsepower'),zaxis = list(title = '1/4 mile time')))
pltly
x <- sep.l <- iris$Sepal.Length
y <- pet.l <- iris$Petal.Length
z <- sep.w <- iris$Sepal.Width
s3d <-scatter3D(x,y,z,clab = c("Sepal","Width (cm)"))
gg <- ggplot(mtcars,aes(x = mpg,y = drat)) +
geom_point(aes(color = factor(gear)))
#I want to combine all 3.
这三个都可以单独渲染,但合并时会失败。 任何帮助/指导将不胜感激。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。