第一届中国R语言会议合影

2008年12月13日~14日，由教育部重点研究基地中国人民大学应用统计科学研究中心与中国人民大学统计学院主办的“第一届中国R语言会议”在中国人民大学明德商学楼0402教室成功召开。国内R语言的各位先锋如中国人民大学统计学院吴喜之教授、中国科学院上海生命科学研究院丁国徽博士等以及国外R语言专业人士如澳大利亚国立大学John Maindonald教授也通过网络连线会场参加了本次会议；会议围绕R语言的众多应用领域展开了广泛的交流和讨论，为R语言在中国的应用和推广开辟了一条崭新的道路。

会议概况

参会单位

本次会议吸引了近70家单位共150余人参加，参会单位有：

高校：对外经贸大学、中南大学、北京大学、北京工业大学、西北农林科技大学、中国农业大学、北京林业大学、北京工业大学、中国人民大学、湖南大学、北京航空航天大学、首都经济贸易大学、西北师范大学数学与信息学院、浙江大学、荷兰瓦赫宁根大学、天津大学、北京联合大学、清华大学、东北林业大学、商丘师院、安徽师范大学、南京财经大学、北京师范大学、吉林大学商学院、中国农业大学、浙江杭州电子科技大学、西安财经学院、北京工商大学、北京交通大学
科研机构：中科院动物所、中科院植物研究所、中国科学院上海生命科学研究院、北京植物所、中国科学院生态环境研究中心、中科院北京基因组研究所、军事医学科学院、协和医学院阜外心血管病医院、中科院自动化所、中国林科院、中科院研究生院、北京大学医学部、中国疾病预防控制中心、广西植物研究所、中国林业科学研究院林业研究所、中科院沈阳应用生态研究所、中国环境科学研究院、北京疾病预防控制中心、中科院心理所
公司企业：雅虎、新华信国际信息咨询公司、上海源略数据服务有限公司、中芯国际、北京中彩在线科技有限责任公司、北京移动、浙江口碑网络技术有限公司、Watson Wyatt Worldwide、IBM、石药集团、qunar.com、北京博达新大陆广告有限公司、新好耶信息技术有限公司
出版社：机械工业出版社

参会人员

由于本次会议为国内首届R语言会议，参会者普遍热情较高，有数位作者甚至通宵达旦准备会议论文和演讲，其他与会者也带着明确的问题参加会议并在会议过程中积极提问、讨论。本次会议演讲者大多为COS论坛会员，如“153分钟学会R”的作者等；参会者大多为硕博研究生，众多青年学者的热烈讨论将会议屡屡推向高潮；所有参会者的年龄分布如下：

  20 | 00000000000
  22 | 000000000000000
  24 | 000000000000000000000000000
  26 | 00000000000000000000000000
  28 | 0000000000000000
  30 | 0000
  32 | 0
  34 | 0000
  36 | 0000
  38 | 0
  40 |
  42 | 0
  44 | 0000
  46 |
  48 |
  50 |
  52 |
  54 |
  56 |
  58 |
  60 | 0

不难发现对R语言感兴趣的人不仅有大量青年学者，甚至也有年逾花甲的教授，这预示着R语言未来在国内的发展前景是很乐观的。

会议议程

两天时间里，会议一共举行正式演讲25场，以下是日程表：

第一届中国R语言会议日程

论文和演讲

注意以下所有材料遵守CC协议，其中张翔的幻灯片遵守CC2.5协议。

本次会议一共收到论文21篇；论文摘要可以从这里下载：

第一届中国R语言会议论文摘要

以下是会议演讲材料（幻灯片及R代码）：

谢益辉：第一届中国R语言会议介绍（R代码）
丁国徽：R的那些事儿
谢益辉：R语言的历史背景、发展历程及现状
刘思喆：153分钟学会R
詹鹏：R语言在南京市大学生幸福感统计分析上的应用（R代码）
奚潭：基于R软件的统计模拟（R代码）
陈钢：Bioconductor项目简介及其在生物信息学中的应用
侯丽平：R在遗传统计学中的应用
喻泓：基于R的单木竞争指数的计算
John Maindonald：Data Mining with R
刘思喆：数据挖掘过程在R环境下的应用
李舰：R在BI中的应用和前景
张翔：复杂系统的可视化与分析手段
左辰：分位数回归模型在R环境下的实现
丁鹏：贝叶斯统计与R
魏太云：R软件与最优化
陈堰平：随机微分方程入门——基于R语言的模拟与推断（R代码）
李崇亮：基于R后台的网页应用，或基于网页可定制界面的R应用（Google Docs页面）
李舰：利用R (D)COM Server实现R与MS Office的整合
王化儒：R在水文模拟中的应用初探（R代码）
谢益辉：统计动画程序包animation介绍及其在教学和数据分析中的应用
翁云妹：Fitting and Projections of Mortality Stochastic Models — based on interface between R and Excel
刘明：半导体界统计与R的应用
王剑：From SAS to R
马斌：应用R进行QSAR的尝试 — 以PAHs在根际消解效果的QSAR分析为例
谢益辉：无处不在的数据及R的探索方法（R代码）
韩效杰：关于R语言相关书籍的出版讨论

会议展望

会议期间及会议结束后，与会者对如下几个主题提出了展望：

专业之间的合作：通过马斌等演讲者的提议，大家认识到当今统计专业与非统计专业之间有着迫切的合作需要，本次会议为这种合作提供了良好的契机；谢益辉表示“统计之都”未来的主要方向之一也将是引导不同专业之间的密切合作。
R语言的“中国化”：如丁国徽等演讲者所讲，我们除了使用国外的R语言（包括翻译）之外还能做一些什么样的本土化工作？当前R语言已有几份文档被翻译为中文，但相比起大量的英文文档来说，这些学习材料仍显得不够，因此我们有必要组织R语言的先锋部队，以翻译、实际应用等手段不断推进R语言的真正本土化。
R语言的出版事业：来自机械工业出版社的韩效杰编辑对R语言相关的出版事业非常热心，我们也希望不久的将来在中国能诞生一系列R语言的优质教材。

会议花絮

本次会议得到了很多与会者和非与会者的大力支持，在首届中国R语言会议过程中，发生过这样一些事情，也作为花絮列举如下（排名不分先后）：

S语言的作者之一Richard A. Becker听闻本次会议，向我们发来良好祝愿；
R语言的核心成员之一Duncan Murdoch表示很想参加这次会议，不过限于时间安排不开，因此最终没能参加；
R语言的专家John Maindonald教授（澳大利亚国立大学，半退休）通过Skype连线会场进行数据挖掘与R的演讲，不过由于网络条件和会场设备问题最终没能成功，但与会者都看到了视频中的老爷爷；John是”Data Analysis and Graphics Using R: An Example-based Approach”一书的作者，对本次会议非常关心，是本次会议唯一的外国参会者；
丁国徽博士于13日早上从首都机场直奔R语言会场，不顾困倦为大家演讲；
刘思喆放弃了周末陪伴家人的宝贵机会每天从南三环到北三环为大家贡献R语言知识；
詹鹏和奚潭为了保证质量，连续七天通宵准备论文和演讲；
侯丽平、丁鹏和马斌本来没有准备演讲，后来看到会议演讲篇数较少，因此抓紧最后几天时间准备了演讲；
喻泓没有准备论文，看到演讲情况之后也积极贡献、分享自己的成果；
左辰和翁云妹是用英文发邮件的两位参会者；
本次会议很多事务都是用R处理的，例如报名表的整理甚至是第一届中国R语言会议胸牌也是用R的PDF图形设备生成，程序代码见附录。

会议照片

请在会议期间拍照并愿意和大家分享的朋友将照片发给谢益辉（xie[at]yihui.name），谢谢。

我们感谢所有参加会议的朋友，也期待着下一届中国R语言会议的召开，有意主办的单位请和我们联系。

附录

用R生成胸牌

实际上就是用PDF图形设备生成PDF文件即可，主要用到text()函数以及rimage包将文字和R的logo添加到图上：

draw.card = function(contact) {
    if (require(rimage)) {
        x = read.jpeg(file.path(R.home(), "doc/html/logo.jpg"))
        lim = dim(x)[1:2]
        par(mar = rep(0, 4), cex = 0.7)
        for (i in 1:nrow(contact)) {
            plot(0, xlim = c(-0.5, 1.5) * lim[1], ylim = c(-1.5,
                2.5) * lim[2], axes = FALSE, ann = FALSE, type = "n", asp = 1)
            plot(x, add = TRUE)
            text(0.5 * lim[1], 2 * lim[2], "第一届中国R语言会议", cex = 2.5)
            text(0.5 * lim[1], 1.5 * lim[2], "The 1st Chinese R Conference",
                cex = 2)
            text(0.5 * lim[1], 1 * lim[2], "北京，2008.12.13-14", cex = 1.5)
            text(0.5 * lim[1], -0.4 * lim[2], contact[i, 1], cex = 3)
            text(0.5 * lim[1], -0.8 * lim[2], contact[i, 2], cex = 1.5)
            text(-1.6 * lim[1], -1.1 * lim[2],
                paste("主办：中国人民大学应用统计科学研究中心 (www.applstats.org)",
                "　　　中国人民大学统计学院 (stat.ruc.edu.cn)",
                "协办：统计之都网站 (https://cos.name)", sep = "\n"),
                cex = 1, adj = c(0, 1))
        }
    }
    else install.packages("rimage")
}

# 示例
contact = data.frame(name = c("张三", "李四"), unit = c("张家村",
    "李家店"))
par(ask = TRUE)
draw.card(contact)

# 写入PDF文件
pdf(width = 3.5, height = 4.5, family = "GB1")
draw.card(contact)
dev.off()

中国人民大学应用统计科学研究中心
2008-12-16

第一届中国R语言会议纪要

谢益辉