我有一个数据集3D点(x,y,z)。我用plot3Drgl绘制了这个数据集,我希望保存一个文件,以便将这个文件与一些3D图形软件一起使用并显示给我的同事
library(plot3Drgl)
data <- data.frame(x=c(23,45,12,67,89,45,32,56,78,32),y=c(89,54,32,67,78,56,44,28,97,65),z=c(1,5,4,3,7,6,3,8,9))
plot3d(z = data$z , x = data$x , y = data$y, pch=21,cex = 0.1,aspect = F,box = F,axes = F)
答案 0 :(得分:3)
我不知道你到底想要什么。您可以输出交互式HTML文件
library(rgl)
browseURL(paste("file://", writeWebGL(dir=file.path(tempdir(), "webGL"), width=500), sep=""))
或者您可以将数据保存到csv以在另一个应用中加载和处理它:
write.csv(data, tf <- tempfile(fileext = ".csv"))
cat(tf)
# C:\Windows\TEMP\RtmpApi4a2\file26dc359447f.csv