||
以ggplot2等包为基础的R语言可视化是科研人员非常喜爱的一个方式,不过我也在这个上遇到了些问题。就是导出高分辨率的图片之后,插入到word里,就显得模糊不清(压缩得非常厉害)。如果不压缩的话,word动辄100M以上。最近刚好有了一个解决方式,就来介绍下。
这也是某期刊图的修改要求,必须提供.cdr文件。当然测试后发现,.cdr输出的tif即使被压缩,也能很清晰。
这里谈谈怎么做。首先R目前是没法直接输出.cdr格式的文件的,根据网上的经验就是用emf这个格式,能够输出Corel Draw能读取的矢量文件,导入后再做些微调。
但是R输出emf没有像tiff和jpeg那样的语句,主要使用的是savePlot函数。
这里摘下R的帮助文档再来解释这个函数
Usage
savePlot(filename = “Rplot”,
type = c(“wmf”, “emf”, “png”, “jpg”, “jpeg”, “bmp”,
“tif”, “tiff”, “ps”, “eps”, “pdf”),
device = dev.cur(),
restoreConsole = TRUE)
Arguments
filename
The filename under which to save the plot. Tilde-expansion (see path.expand is supported.
type
The type of plot, Windows metafile, PNG, JPEG, BMP (Windows bitmap format), TIFF, PostScript or PDF.
device
A device number of a windows device, by default the current device.
restoreConsole
See the ‘Details’ section of windows.
一个参数一个参数来解释吧。
filename:很好理解,就是你要输出的图片路径和名称,用字符串类型。如“C:/Rplot”。不必加后缀。
type:输出格式。
device:Windows设备的设备编号,默认为当前设备,这个参数。
restoreConsole:这个参数也是跟windows图形设备相关的。
实际使用时,后两个参数默认就可以。主要是针对前两个参数。
接下来用一个案例来展示下操作。使用的是R语言默认的mtcars数据。用plot绘图和ggplot2绘图各测试一遍。但是笔者就如网上所说在Rstudio中运行savePlot报错。
事实上这个语句只能在原生的Rgui中运行。因此将R代码存成脚本,在Rgui中直接用source调用写好的脚本即可。
plot只需直接绘图语句。而ggplot则需要多一句print语句,才能输出图片。
运行完后,打开corel draw,按下图进行操作。
这样就能把emf转变成全部可编辑的矢量了。
当然Rstudio也有个方法。就是使用复制到剪贴板的功能,然后粘贴到Corel Draw里面。
这就是将R导入到Corel Draw前期工作。相比与之前压缩得非常厉害的图片,我感觉Corel Draw输出的图片质量非常高。此外,后面搜索时,我也发现了R的一个包:devEMF: EMF Graphics Output Device。可以输出emf,这样在Rstudio里也可以操作了。
参考博客:
R语言可以这么玩 |高质量图片这样导出!
Archiver|手机版|科学网 ( 京ICP备07017567号-12 )
GMT+8, 2024-9-4 17:19
Powered by ScienceNet.cn
Copyright © 2007- 中国科学报社