设置rgl设备的大小

Jen*_*old 7 plot latex r save rgl

我的rgl设备的全屏/非全屏问题.

目前我使用R 3.00

我将persp3d plot(library rgl)绘制到我的设备中,它在一个非常小的窗口中打开:

R代码:

persp3d(x, y, z, theta=50, phi=25, expand=0.75, col=red,
        ticktype="detailed", xlab="", ylab="", zlab="",axes=FALSE)
axes3d(c('x--','z'))

axis3d(edge='y+-',at =c(1,500,1000,1500,2000,2320),
labels =rownames(fd)[c(1,500,1000,1500,2000,2320)])
Run Code Online (Sandbox Code Playgroud)

看起来像这样:

SC

我现在旋转它并将单个png文件保存到我的驱动器中.问题是,png文件太小了?我想用LaTex和\animategraphics命令把它们放到一张纸上,但它是像pixely(不尖锐).

如果我点击rgl设备中的全屏图标,以便R图更大,这确实有帮助,一切正常.问题是,周围有太多的空白区域.由于它的上方,下方,左侧和右侧的空白区域,我无法将其包含在LaTex中,因为它的大尺寸(宽度,高度)不适合.我有200个png文件,所以用油漆手动删除空白区域不是一件好事.

小图片看起来像这样:

SC11

如果放大,会发生以下情况(这就是LaTex所做的,当我把它放到我的论文中时,它增加了图片,截图来自我的LaTex文件.相同的图片,角度略有不同,但问题保持不变):

SC22

你看它看起来很像(不好).此外,您已经可以看到具有太多空白区域的大文件的问题:上面有一些空白区域的小图片已经破坏了我的标题.

那么我怎么能解决这个问题呢?我怎么能告诉R使用全屏图,但周围没有那么多的空白区?当我点击全屏并保存这些图片时,一切都很好,除了周围的白色空间.

这是png文件周围有太多的空白区域(在此屏幕截图中,下方没有空白区域,但是当我使用正确的缩放时,它就在那里):

SC2

还有一点需要注意:这是我用来保存png文件的R代码:

M <- par3d("userMatrix")
movie3d( spin3d(rpm=3), duration=20,dir="C:/test/movie", clean=FALSE )
play3d( spin3d(rpm=3), duration=20)
Run Code Online (Sandbox Code Playgroud)

Ann*_*nie 7

使用 par3d(windowRect = c(20, 30, 800, 800))


42-*_*42- 6

您可以使用 par3d 检查 RGL 设备的状态。“空白”由“windowRect”值控制。随着显示器尺寸的增加,这些值会自动增加;

> par3d("windowRect")
[1] 100 100 356 378
> par3d("windowRect")  # made the window have roughly 4 times the area
[1] 137   0 744 544
Run Code Online (Sandbox Code Playgroud)

您还可以指定 windowRect 的角是什么。

?par3d
Run Code Online (Sandbox Code Playgroud)

这应该给你控制,避免“空白问题和标题重叠。

如果要使查看窗口中的对象变大,该rgl.viewpoint功能可以缩放。较小的数字使对象显得更大。

rgl.viewpoint(  zoom = .5 )
Run Code Online (Sandbox Code Playgroud)