经管之家App
让优质教育人人可得
立即打开
对Matlab的图形旋转功能很欣赏,
所以对R的三维作图一直不爽,想找有没有合适的包实现类似功能,
无奈英文功力还是低了些,现在还没有找到,就自己动手写了简短的程序段,
运行的时候只要插入image(),persp()前面略微能看到图形旋转,但想比较Matlab的功能还差老远.
不知大家有啥实现方法?交流一下,
x = seq(-10, 10, length= 30)
y =x
f = function(x,y) { r = sqrt(x^2+y^2); 10 * sin(r)/r }
z = outer(x, y, f)
z[is.na(z)] =1
###############################
phie=seq(0,180,9)
ther=seq(0,180,9)
par(ask=TRUE)
# 开始图形旋转设定:
for (i in 1:9)
######################
# 一个三维绘图函数
persp(x, y, z, theta = ther,phi = phie, expand = 0.5, col = "lightblue",
ltheta = 120, shade = 0.75, ticktype = "detailed",
xlab = "X", ylab = "Y", zlab = "Sinc( r )")
#
#
[此贴子已经被作者于2008-6-9 19:41:18编辑过]
R 果真很强大,这就是开源的力量吧.相信在全世界高手的不断努力下,R将会越来越完美.
"rgl" package的确强大,能使现三维旋转
.
感谢luzifer_li 提供这么有用的信息,
感谢Daniel Adler,Duncan Murdoch贡献"rgl" package,解决了的三维旋转的问题.
如果有包能解决R的海量数据处理问题,那么R可就近乎完美了,
期待R更加强大[em01]
对"rgl" package进行一些补充
这是作者发布rgl包的官方主页,又很多有用信息诸如rgl包的制作原理,函数的说明等等....
http://rgl.neoscientists.org/about.shtml
顺便引来rgl包做的三维图,很漂亮的.
rgl包使用的简短指导文档:
RGL: A R-library for 3D visualization with OpenGL, by Nenadic, O., Adler, D., Zucchini, W. |
| Interactive Visualization of multi-dimensional data in R using OpenGL, by Adler, D. Diplomarbeit (mini-thesis) RGL_MINITHESIS.pdf (645k) |
[此贴子已经被作者于2008-6-11 19:38:49编辑过]
扫码加好友，拉您进群
全部版块
我的主页
收藏
