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)
看起来像这样:
我现在旋转它并将单个png文件保存到我的驱动器中.问题是,png文件太小了?我想用LaTex和\animategraphics
命令把它们放到一张纸上,但它是像pixely(不尖锐).
如果我点击rgl设备中的全屏图标,以便R图更大,这确实有帮助,一切正常.问题是,周围有太多的空白区域.由于它的上方,下方,左侧和右侧的空白区域,我无法将其包含在LaTex中,因为它的大尺寸(宽度,高度)不适合.我有200个png文件,所以用油漆手动删除空白区域不是一件好事.
小图片看起来像这样:
如果放大,会发生以下情况(这就是LaTex所做的,当我把它放到我的论文中时,它增加了图片,截图来自我的LaTex文件.相同的图片,角度略有不同,但问题保持不变):
你看它看起来很像(不好).此外,您已经可以看到具有太多空白区域的大文件的问题:上面有一些空白区域的小图片已经破坏了我的标题.
那么我怎么能解决这个问题呢?我怎么能告诉R使用全屏图,但周围没有那么多的空白区?当我点击全屏并保存这些图片时,一切都很好,除了周围的白色空间.
这是png文件周围有太多的空白区域(在此屏幕截图中,下方没有空白区域,但是当我使用正确的缩放时,它就在那里):
还有一点需要注意:这是我用来保存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)
您可以使用 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)