最近在写R画图的速查手册,写这个东西主要是记录学习R的基本画图命令。除此之外,还学习了Rmarkdown Tufte样式的使用。 不得不提,用这个样式编写绘图类的文档,不如使用普通的书籍格式方便。$\LaTeX$编写文档时图表与正文不一定能紧密相连。 基本上前面添加两句话,后面的图位置就全都跑了,在这个版式里该问题由为突出,主要是Tufte包里没有页面内部的交叉引用功能。 用了2天后,我就转向了Bookdown包,这个包是Xie Yihui从手术室出来后连续几个月不间断工作完成的新包,但是基本命令我还没有掌握, 所以第一版的速查手册是用Tufte包完成的。第一版里面对于排版以及大纲逻辑都不太清晰,以后的更新中会有较大改动。

PDF版文件在这里下载,会持续更新。

Bookdown包目前编译pdf文档采用的命令是bookdown::render_book("index.Rmd", "bookdown::pdf_book")。注意首先要将R工作目录跳转到需要编译的文档目录下,否则会找不到要编译的文件。 不能在函数中以添加路径的方式来编译,因为找不到需要涵盖到书籍里的所有文档(这是错误的->render_book("/root/bookfiles/index.Rmd"))。

参考资料

一篇文章、一本書的完整結構


我自己的系统里没有安装windows下的字体,也不打算装ctex宏包,所以需要用xeCJK宏包来显示中文。

如果在没有安装SimSun字体的情况下使用Rmarkdown里的tufte包的模板写中文文档,编译时会报错找不到SimSun字体。 这是因为tufte模板里作者默认使用ctex,ctex默认使用了SimSun字体。

如果把ctex去掉,用in_header: header.tex 的方法来调用xeCJK宏包,那么会发现有些页面的字会重叠或者不显示。

例如在模板的中文例子里“响应式页面”后面有一段话:

# 响应式页面

这个包生成的HTML页面是响应式的:
如果页宽小于760像素,边栏内容会自动隐藏。
此时我们可以点击脚注的序号显示它,其它边栏附注则可以通过点击圆圈加号的符号显示。

# 结语

希望诸位喜欢R Markdown的超级简洁性,同时我们感谢Tufte-CSS和Tufte-LaTeX项目的作者们,没有他们的辛勤劳动,就没有这个**tufte**包。
这份文档的R Markdown源文档可以在[Github上找到](https://github.com/rstudio/tufte/raw/master/inst/rmarkdown/templates/tufte_ctex/skeleton/skeleton.Rmd),
或者直接使用RStudio菜单`File -> New File -> R Markdown -> From Template`新建一个文档,或直接从R里面打开这个Rmd文件:

但是在生成的文档中缺失了。

Imgur

解决这个问题的最简单方法就是在header里重新定义上边界和下边界的距离。

\usepackage{xeCJK}  
\setCJKmainfont{WenQuanYi Zen Hei} 
%定義top和bottom邊界的距離
\usepackage{geometry}
\geometry{top=2cm,bottom=2cm}

所以完整的Rmarkdown YAML 写法是:

---
title: "Tufte样式"
subtitle: "一个R Markdown实现"
author: "JJ Allaire,谢益辉"
date: "`r Sys.Date()`"
output:
  tufte::tufte_handout:
    citation_package: natbib
    includes:
      in_header: header.tex
    latex_engine: xelatex
biblio-title: 参考文献
bibliography: skeleton.bib
link-citations: yes
---

其中header.tex 像上面\(\LaTeX\)例子中的那样。

这是打脸最快的一篇文章

20160519更新

我现在已经不用tufte包了,改用bookdown包的bookdown::tufte_handout2。

安装方式如下:

install.packages("devtools")
devtools::install_github("rstudio/bookdown")

强烈推荐使用,但要注意编译后的排版同tufte包的有所不同,主要是bookdown包里的tufte样式貌似没有对table进行优化。

在bookdown里配置YAML实现中文tufte sytle的方法如下所示。

title: "A Minimal Book Example"
author: "Yihui Xie"
date: "`r Sys.Date()`"
output: 
  bookdown::tufte_handout2:
    citation_package: natbib
    latex_engine: xelatex
    includes: 
      in_header: header.tex
    toc: yes
link-citations: yes
description: "This is a minimal example of using the bookdown package to write a book."

请不要相信海外药物代购

滑膜肉瘤事件刚过去几天,代购就已经把魔爪伸向80,90后集中的群里了。 今天大早上起来就被大学校友群里的前辈喷了,这个人大致是做了药物代购或者医疗旅游方面的事情。 在校友群里说丙肝药物一个疗程将近一百万,从他那里买印度仿制药物只要不到一万元/疗程。用脑子想想就知道多不靠谱,在群里还骂我智商低。

现在治疗丙型肝炎的药物主要是Sofosbuvir(商品名称Sovaldi),外加Daclatasvir(商品名称Daklinza),在发达国家或者港澳台进入市场的药物,可能一个疗程四十万(Sofosbuvir 30, Daclatasvir 10)。 现在国内丙肝的药物代购,印度药可以最便宜六千多到手(sofosbuvir)。如果这位前辈的仿制药卖一万,这中间的差价有多少,现在大家也就清楚了。我不知道群里那位前辈吹嘘的将近一百万的正版药是什么神奇的药物,真有一百万,患者其实可以准备换肝了。

另外药代也有在国内做假药弄个外国包装卖的,反正吃不死人,能不能治好就另说了(有些情况下患者不具备服用上述丙肝药物的身体条件)。

癌症相关的靶向药物,丙肝治疗药物都可以让患者或者患者家属直接去印度购买,具体方式请善用搜索,多加一些病友群了解。

本来不想提,但还是要说:滑膜肉瘤事件的患者不光被无良的医院骗了,也被那些代购给骗了。药物代购一般会说某某药物只能在印度销售,他有什么特殊取道可以弄进来,这些都不是真实情况。 去国外买药真没那么难,患者带着病例去国外买药,在海关最多需要多交几千元的税,不会被扣下。

关于某种药物对自己是否有疗效(例如癌症靶向药物),请咨询医生。不要认为某些校友读一些英文文献就能解决这个问题。我学这个我都不能保证自己可以作出准确的判断(接触病人少)。 药物疗效只有专门研究这个药物的人以及给病人用过这个药物的医生最有话语权,研究这种疾病的人也可以在专业角度给一些病人是否能够使用药物的建议。

请不要相信海外药物代购

现在真是年龄越大,越佩服鲁迅。

请不要相信海外药物代购

为什么药物代购能在国内获得成功? 就是信息不对等啊,他们手里握有你不知道的真实信息,但是他们也不会告诉你真实信息,他们做的事情就是将真实信息和假的信息混合在一起加以包装,卖给群众,赚取利润。


编程序要持续做,每有一个想法开一个坑,到时后填不完就不好了。现在看我一年多前的程序,写得那么好,但我已经看不懂了。 编写的思路都要记录在案。

写博客也是这个道理,想到什么就要赶紧记录下来,要不过个一段时间,就没精力写了。最近还要集中再补发一些老的内容。

今天最逗逼就是马亲王亲自在微信里澄清以后不要再提那四个字,为啥呢,因为最近广电总局下架了某部动画片,一部分该片脑残粉直接去他微博下面开骂了。

最近土鸡全面伊斯兰化了,一战、二战后打开的眼界又缩了回去,人类历史还是很容易倒退的。

川普当选无望,但是这届出了个他,选举看着比之前热闹多了。

国内的网络存储之一快盘近日被封,我觉得百度云盘也不远了,想着自己刚把实验数据放上去,心里不禁咯噔一下。

总理访问的地方物价太便宜了,大家赶紧去抄底,这帮人都做给谁看呢,奥斯卡评委吗?像上届影帝,参观北京某地,房租几十元/月。

北京移动偷偷跑流量现象严重,用了个流量检测软件,结果移动告诉我,这个流量监测软件用的流量超高。

我决定不在看plos one上的paper了,每周都有那么几天,发一大堆correction,这些文章发表前就不能先好好审稿吗。


不少Github用户可能都经历过这样的事情,某些小猎头公司处于无人可猎的状态,所以会疯狂的抓取Github上中国人的邮箱,并且根据这个人主页里star最多的repo来判断此人会哪些技术,给他们贴上标签。很不幸,由于我的repo里star最多的是自己的Jekyll博客主题,所以我被贴上了前端工程师的标签,并且邮箱经常会收到这些“猎头”的骚扰邮件。

在此,我只想说,哪怕那个抓取程序能用一点“心”,抓取一些此类用户在github上的博客内容,提取一些关键词(都不用提取,用博客标签就成),就能大致注意到这些人到底是关注什么领域。

我作为前端设计师(非工程师,因为不会编程)的生涯结束于大学第四年考研复习之前,写完这个post我就去R jsonlite里提交了一个作者秒关的issue,我是真的一点都不懂-_-',之后的各种技术和概念都没在钻研过。这些公司肯定是觉得群发邮件的成本太低,殊不知给自己的形象带来多少负面影响。

最后公布一下哪些公司用这么low的技术来骚扰Github用户。

  • GuruDigger,发过很多次邮件。最早开始还联系过Cai Jin,但是也没什么结果,不知道他们是否卖掉了自己抓取的数据,造成此类现象泛滥
  • 联有企业管理咨询(上海)有限公司,Jack Ruan 发过多次邮件。
  • 100offer ,邮件批量处理的吧?编写得根本没有逻辑啊。
  • 新华猎头,用的邮箱都很sb,名字就更sb了,Peter 薛。
  • 面趣人才工作室, George,频繁骚扰,是一家上海的连名字我都搜索不到的猎头工作室,点明看到我的Javascript代码,但不知道我是做nodejs还是前端的,能看到我写的js代码,呵呵,这人眼睛瞎了吧。
  • 云算咨询,名字是wing,邮件一开头就跟我说联系过我,谎话连篇。
  • dipper.liu@offerinter.com 连猎头公司名字,自己的名字都没有,写邮件也得讲基本法!邮件中还写到“祝你代码永远没bug,女朋友和嫂子都美丽大方。” f**k you!

不知道为什么某些国内的猎头公司这么喜欢英文名字,还中英夹杂。虽然写这些内容肯定会得罪这些公司,但是这些公司同我的相关性实在是太小了ヽ(´∇`)ノ


20160506更新

我是 GuruDigger Gero 实验室研发的机器人 Buu One,GuruDigger就是个流氓,有个外国友人用了我的博客模板,然后这个人在github上没有联系方式,你tmd的垃圾搜索系统直接看git history把sb的垃圾邀请邮件又发我的邮箱里了。


20160530更新

根据热心朋友的流留言反馈,面趣人才工作室George 的骚扰已经引起大家的极大关注。

换个思考方式,是不是应该抛弃Github,转向Bitbucket或者Gitlab?


20160603更新

最近是不是张江的各个公司招聘的旺季? 又有一家猎头公司(云算咨询)联系我,没有收到过他们的邮件,偏说之前联系过我,谎话连篇,呵呵。 看样子他们很常用群发邮件的方式来海选想跳槽的人。 看样子我真需要学一下JavaScript了 ‘_>`


20160606更新

目前根据热心朋友提供的信息面趣人才工作室骚扰的最频繁!


20160824更新

请大家毫不犹豫的把面趣人才工作室加入垃圾邮件过滤列表,他们绝对会反复骚扰你的,我觉得George这个名字已经被他们玩坏了。


20160929更新

img

我不知道为什么这篇文章的影响这么大,我当初写这个就是为了记录一些spam邮件,会得罪一些人。但是大家这么多的留言,不是我的博客有影响力,而是留言的人都遇到了类似的问题,想知道这些猎头就究竟是谁,靠谱吗?连个官网网站都没有,结果人家一搜索猎头的邮箱,都转到我的博客,我也很无语。 顺便在这里答复,我博客写什么不关别人的事情。