ubuntu 下编写 R 脚本的利器-Gedit

R 语言, 技巧随笔 8 回应 »
七 032009

用于编辑 R 脚本的文本编辑器很多，个人更倾向于使用开源编辑器（关于 R 的编辑器我在 RFAQ_cn 上也提过）。这里主要介绍一下 gedit，一款在 GNOME 桌面环境下的文本编辑器。

虽说 geidt 看起来就和 Windows 下面的 notepad 一样简陋，但它对于运行一般 R 脚本已经足够用，因为 gedit 编辑器可以将 R 代码直接作为外部命令运行。具体实现方式如下：

依次选择：编辑-首选项-插件-外部工具（执行外部命令和Shell脚本）

Screenshot-外部工具管理器.png

新建一个工具R，在命令中写入 R –no-save –no-restore -q，同时写入描述和快捷键（这里定义的是ctrl +r）。

输入可选择"选中区域"和"全选"，输出的话，"在下方面板中显示"比较好一些，当然这个看个人喜好。

编辑 R 代码过程中，选中要执行的代码，ctrl+r，OK，输出结果，非常方便。

Screenshot-新文件 (~-桌面) - gedit.png

由刘思喆 发表于 22:53 添加标签：,

用 R 来寄mail

技巧随笔 2 回应 »
一 172009

早上懒洋洋的爬起来看邮件，又一封 SOA Applications for Discount Candidates  寄到了我这儿。从我4年前申请 SOA 考试到现在，从来没看过相关东西，估计这辈子与 精算 绝缘了。闲话少扯，扯些更闲的——用 R 来寄信。

shell.exec(paste("mailto:","google@gmail.com",
"?cc=ruc@ruc.edu.cn",
"?subject=关于R寄信的问题",
"&body=是这个样子的：谁能介绍我一个可以方便书写代码的空间",
sep=""))

最初想法源于和zhangm的聊天，当时想的比较复杂。

其实这段 R 代码，我连伪装都没有做，哈哈。

由刘思喆 发表于 10:53 添加标签：,

有意思的R，有意思的大家

技巧随笔 3 回应 »
十二 152008

第一届 R 会议结束了，这么milestone 的事件，不写点东西对不起观众。昨天晚上本来想写些东西，不过这两天实在太累，只好放在了今天。见识了n多个传说中的大牛：

  1. Yihui Xie：我这个师弟，脑子里奇思妙想太多，估计以后在国内，肯定是Bill G 的料。下次我决定用 R 跑个桌签，肯定也特方便。
  2. Guohui Ding：传说中的那位，开始我一直以为是40、50岁的老头子呢，结果和自己同年生。下了飞机就直奔会场，敬业。大赞那个网络关系图，学基因的就是不一样。and 刚从德国带回来的那本让人狂吐的杂志：

    3. 照片-0123

  3. 吴喜之老师：跟老师混这么多年，头一次看到吴老会在一个地儿坐一天（旁白：俺啥时候能学吴老的一招半式，也就能独步武林了）
  4. Peng Zhan：……不重要，R 重要……险些笑翻我  ^_^
  5. Tan Xi：这两个小伙，有前途啊
  6. Gang Chen：原来生物和遗传应用这么个广泛，孤陋寡闻了
  7. Lipeng Hou：一直以为是个mm，哈
  8. John Maindonald：老头子真牛，够我喝一壶的了
  9. Jian Li：统计学院一哥的美名不是白传得……
  10. Xiang Zhang：那是美学！怎么学 R 的人都这么“不务正业”呢，而且是公司支持的不务正业！？
  11. Chen Zuo：quantile regression 应用还是很广的，哎，当初俺们也有这机会就好了
  12. Peng Ding：能上 PKU 的概率统计确实不一般，而且——贝耶斯统计被压抑太久了。嘿嘿嘿
  13. Cloud wei：平时还挺腼腆的，上台后激情四射的
  14. Yanping Chen：数学能爱好到这份上，而且居然同样用 R
  15. Lichongl：PKU 卧虎藏龙，不说了
  16. Huaru Wang：见识了在水文上也有成熟模型（还欠我数据呢啊！）
  17. WengYm：精通 R 的 PPMM
  18. Ming Liu：果然有在企业中规模使用 R 的
  19. Bin Ma：手抄6000+数据的牛人，太狠了！
  20. Bing Zheng：以后的师妹，肯定没问题了，哈

由刘思喆 发表于 20:22 添加标签：,

[R] How to reverse a list

技巧随笔 没有回应 »
五 212007

tapply(unlist(t0),unlist(t0),function(x){names(x)})

Here is a minor shortening of that solution:

tapply(t0, unlist(t0), names)

由刘思喆 发表于 16:35 添加标签：
© 2010 刘思喆 @ 贝吉塔行星 Suffusion WordPress theme by Sayontan Sinha