6

我安装了带有选项--disable-libpng的rgl包。我尝试生成 3d 散点图,但它崩溃了。请帮我解决这个问题

这是我正在运行的代码

library(rgl)
open3d()
x <- sort(rnorm(1000))
y <- rnorm(1000)
z <- rnorm(1000) + atan2(x,y)
plot3d(x, y, z, col=rainbow(1000))

它因以下消息而崩溃

 *** caught segfault ***
address (nil), cause 'memory not mapped'

Traceback:
 1: .External(rgl_par3d, args)
 2: par3d(skip)
 3: plot3d.default(x, y, z, col = rainbow(1000))
 4: plot3d(x, y, z, col = rainbow(1000))

Possible actions:
1: abort (with core dump, if enabled)
2: normal R exit
3: exit R without saving workspace
4: exit R saving workspace
Selection:

这是来自 sessionInfo() 的信息

    > sessionInfo()
R version 2.11.1 (2010-05-31)
x86_64-unknown-linux-gnu

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=C
 [5] LC_MONETARY=C              LC_MESSAGES=en_US.UTF-8
 [7] LC_PAPER=en_US.UTF-8       LC_NAME=C
 [9] LC_ADDRESS=C               LC_TELEPHONE=C
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base

other attached packages:
[1] rgl_0.92.798

这是来自 sysname 命令

x86-64_linux_2.6.16_ImageSLES10SP3-3

更多信息:

我能够从R 中的一些代码生成曲面图:Plotting a 3D surface from x, y, z

这是代码

x <- seq(-10, 10, length.out = 50)
y <- x
rotsinc <- function(x,y) {
    sinc <- function(x) {
        y <- sin(x)/x;
        y[is.na(y)] <- 1;
        y
    }
    10 * sinc( sqrt(x^2+y^2) )
}
z <- outer(x, y, rotsinc)

surface3d(x, y, z)

我尝试了 demo(rgl) 并且也因类似的消息而崩溃。我想生成 3d 绘图,你推荐哪个其他包?格图?

4

2 回答 2

3

rgl包通过它的驱动程序在你的显卡中使用可能的硬件加速

不幸的是,这完全取决于驱动程序。多年来,我一直在使用rgl进行动画可视化——参见例如2005 年的期权分析表面的可视化——我可以向您保证,您在某些机器上无缘无故地崩溃并在其他机器上运行。在做出任何确定的结论之前,您确实应该在具有不同驱动程序的不同机器上尝试。

计算机使用硬件,有时硬件会咬人。我可以在我的一台机器上很好地编写您的代码。另一个是双屏,因此没有 GL 扩展,所以它不会。我有没有提到硬件咬伤?

于 2011-03-02T13:38:23.147 回答
1

我在我的系统上测试了完全相同的代码,它运行良好。

不管问题是什么,它们可能已经解决了。

测试1:

library(rgl)
demo(rgl)

测试 2:

library(rgl)
open3d()
x <- sort(rnorm(1000))
y <- rnorm(1000)
z <- rnorm(1000) + atan2(x,y)
plot3d(x, y, z, col=rainbow(1000))

我的系统是运行 R v2.14.2 的 Windows 7 x64。在两个 IDE 下测试,即 Revolution R 和 RStudio。

在此处输入图像描述

于 2013-01-17T19:22:06.850 回答