n 连环的解法与实际步骤数

九连环这个玩具,最早在高中的时候摸过,记得解它的时候因为很多重复步骤,所以恨不得要把它拆掉,还好最后解开了,
不然我又得加条”亵渎古人智力”的罪名,呵呵。闲话少扯,下面是 n 连环实际步骤数的求法:

1
2
3
4
5
6
7
8
9
ggg <- function(n) {
a <- numeric(n)
a[1] <- 1
a[2] <- 1
for (i in 3:n) {
a[i] <- a[i - 1] + 2 * a[i - 2] + 1
}
return(a)
}

阅读全文

第一届 R 语言会议随记

第一届 R 会议就这么匆匆结束了,这么标志性事件,不写点东西对不起观众。昨天晚上本来想写些东西,不过这两天实在太累,只好放在了今天。见识了好多个传说中的大牛,做一些记录多年后再见。

  • Yihui Xie:这个师弟,脑子里奇思妙想太多,估计以后在国内,肯定可以比肩比尔盖茨。下次我决定用 R 跑个桌签,肯定也特方便。

阅读全文

致那段逝去的爱情

看完画皮,感慨其中的一句影评:

婚姻本身就是道德的枷锁,人与人之间,总是先入为主的,怨天怨地的
也只能怨造物弄人,在错误的时间遇到了对的人

《大话西游》看过多次了,被人热捧的”曾经有一段爱情摆在我面前……,爱你一万年”。这段话倒没给我什么太深的印象,印象最深的却是影片结束时夕阳武士对紫霞说的,”那个人好像一条狗耶”。

阅读全文

quantile 的 9 中求法

逛了逛 谢 的blog,被《Inverse Empirical Cumulative Distribution》这篇文章吸引过去……

确实当学习 stat 这么多年第一次知道 quantile 有 9种求法,诧异心情完全理解。记得写 R_FAQ_cn时,关于 fivenum 和 summary 函数区别时,翻阅 quantile 函数发现了这个问题,当时自己都想呕血了。书呆子

阅读全文