2019-11-07 神器export包，在PPT中编辑你的图

参考学习资料：https://guangchuangyu.github.io/cn/2019/04/export-office/

不会用AI,PS等工具的情况下

如何在PPT中编辑你的图
Y叔叔的这个推文有了详细的解答，果断收藏啊，哦不，应该是用起来了：
export包，安装很简单，收录在CRAN。
安装指令：

install.packages("export")
library(export)

下面是Y叔叔的例子
下面这个图是用lattice画出来：

library(effects)
fit=lm(prestige ~ type + income*education, data=Prestige)
plot(Effect(c("income", "education"), fit),multiline=T, ci.style="bands")

在export包的作用下可以导出：

graph2ppt(file="effect plot.pptx", width=7, height=5)

重点在这里：在PPT中取消组合，那么所有的元素都是分离的，而且是矢量格式，可以修改字体，改大小，改颜色，等等。

改完之后，你如果想导出为PDF的话，那么图片在导出的PDF中，也是矢量的。

除此之外，他还能导出其他格式，这个包提供了各种函数，可以通过graph2doc导出到Word，还支持通过graph2office导出到LibreOffice。

而且更为良心的是，连表格也是支持的。

可是今天的RStudio出了点问题，之前安装了新版的bioconductor,然后更新一些包的时候选择了从源文件升级，然后就各种报错，比如今天安装这个export 包死活加载不了，然后群里面也有人问到类似的问题，孙老师的解答是R里面提示能选no都选no
我觉得可能是这个选择失误导致的R包加载出的问题，然后就卸载了R,重新安装之后连续安装了一下午的包，都选择ask = F, undate = F,过程中一值有一个提醒,其实也不算提醒，就是每个包安装过程都有这行字，我感觉之前没有遇到过

tar: Failed to set default locale

查了下有人解答是这样的Mac OS 环境下，执行 install.packages(“xxx”)，发生错误: tar: Failed to set default locale
他说是一个错误，需要通过在终端输入如下命令纠正

defaults write org.R-project.R force.LANG en_US.UTF-8

然后再重启RStudio.
按他的说法去做了果然没有提示了，但是我这个export包的加载仍然是有问题的

> install.packages("export")
trying URL 'https://mirrors.tuna.tsinghua.edu.cn/CRAN/bin/macosx/el-capitan/contrib/3.6/export_0.2.2.tgz'
Content type 'application/octet-stream' length 356790 bytes (348 KB)
==================================================
downloaded 348 KB


The downloaded binary packages are in
    /var/folders/tm/q03dw2_n18v2v6nlsw81yhc80000gn/T//Rtmpcev5vK/downloaded_packages
> library(export)
Error: package or namespace load failed for ‘export’ in dyn.load(file, DLLpath = DLLpath, ...):
 unable to load shared object '/Library/Frameworks/R.framework/Versions/3.6/Resources/library/systemfonts/libs/systemfonts.so':
  dlopen(/Library/Frameworks/R.framework/Versions/3.6/Resources/library/systemfonts/libs/systemfonts.so, 6): Library not loaded: /opt/X11/lib/libfreetype.6.dylib
  Referenced from: /Library/Frameworks/R.framework/Versions/3.6/Resources/library/systemfonts/libs/systemfonts.so
  Reason: image not found

这就很奇怪了，现在应该排除了是更新了那个biocondutor引起的问题了，先把Y叔例子里的图画一下

例子

图画完了，但是由于不能加载export包，所以也不能导出这个图到PPT了，估计是这个包本身的问题了。

> graph2ppt(file="effect plot.pptx", width=7, height=5)
Error in graph2ppt(file = "effect plot.pptx", width = 7, height = 5) : 
  could not find function "graph2ppt"

因为包调用失败，里面的函数也就不能用了。现在该去解决这个包为啥不能加载的问题了。
去Bing查了一下有篇博文讲过类似的问题https://blog.csdn.net/llwang_10/article/details/78909856

他是在Linux里面安装R出现的这种类型的报错,然后其他人也遇到过类似错误都是通过更新libssh2来解决问题的
那libssh2是个什么东东？

用cmd+空格查了一下是这么多文件，让我很懵逼

我完全搞不懂我进入了一个什么领域，只能求助。
别人的都是另一个系统的，跟我的电脑不太一样，有点难办。
参考：https://stackoverflow.com/questions/42950328/centos-6-3-r-installation-error
上面列的文件夹里面的东西都不一样，其中有一个里面有个readme

readme

仍然不知道是什么鬼
做了点尝试也还是没能解决

$ rpm -qa | grep -i libssh
rpm: command not found
$ man libssh2
No manual entry for libssh2

然后万能的曾老师迅速给我解决了这个问题

rpm和yum命令，都是centos这样的linux系统的，你的mac是没有的
根据搜索结果：https://github.com/thomasp85/gganimate/issues/106
你需要安装 XQuartz

根据指引，下载安装好需要的软件，然后就完成了，结果如下：

导出成功了，ungroup后就有矢量图了，赞!

果然是大神一句话，菜鸟跑半年！嗯，我折腾了一下午了，他一句话就解决问题了，感觉生信越学越有意思，怎么办。
继续学习了，哈哈！