如果我在R中有数据集,那么导出它的好方法是什么我可以将它用于像Shapeways这样的服务进行3D打印?
我没有任何“真正的”CAD软件,但我之前使用过Google Sketchup。
在我的例子中,对象可以通过两个表面图来描述,如下所示:
x <- y <- seq(0,1,by=0.01)
persp(x, y, outer(x, y, function(x,y) (x+y)^2))
persp(x, y, outer(x, y, function(x,y) rep(0,length(x))), zlim=c(-1,1))
...我希望一起出现作为一个要打印的对象。有什么想法吗?
答案 0 :(得分:8)
Shapeways表示可以从MeshLab获取输出:http://sourceforge.net/projects/meshlab/files/meshlab
MeshLab是一个开源,免费的啤酒项目,能够使用.asc
格式选项导入此文件:
dat <- data.frame(x=x, # will be recycled 101 times
y=rep(y, each=101),
z=as.vector(outer(x, y, function(x,y) (x+y)^2)))
write.table(dat, file="out.asc", row.names=FALSE, col.names=FALSE)
我可能应该做一个sos-search;
library(sos)
findFn("3d printing")
....确实调出了r2stl
包,其唯一的功能具有相同的名称。它还发现了其他凸包功能,这些功能可能对其他想要根据数据构建其他3D形状的人有用。
答案 1 :(得分:5)