什么是Fortunes？

Question

R语言中，有时会看到人们提到“fortunes”，例如：

fortune(108)

这是什么意思？它的来源是什么？我在哪里可以获得这段代码？

编辑。细心的读者可能会注意到，这个问题标记了具有[r]标签的第5,000个问题。请原谅我的轻浮，但应该为这样一个里程碑加上一点幽默感。对于额外的乐趣，您可以提供带有您最喜欢的幸运饼干的答案。

- Andrie

Answer 1

这指的是fortunes包，它包含了来自帮助列表、会议、论坛甚至是StackOverflow的一整套幽默的名言警句和评论。

它实际上是一个可以浏览的数据库或小型数据框架。

library(fortunes)
fortune()

获取随机的一个。或者寻找一个特定的，例如：

> fortune("stackoverflow")

datayoda: Bing is my friend...I found the cumsum() function.
Dirk Eddelbuettel: If bing is your friend, then rseek.org is bound 
to be your uncle.
   -- datayoda and Dirk Eddelbuettel (after searching for a function that 
      computes cumulative sums)
      stackoverflow.com (October 2010)

如果想要将它们全部放入一个数据框中，只需执行以下操作：

MyFortunes <- read.fortunes()

有时提到的数字是这个数据框的行号。要在stackoverflow上找到所有内容：

> grep("(?i)stackoverflow",MyFortunes$source)
[1] 273 275
> fortune(275)

I used a heuristic... pulled from my posterior. That makes it Bayesian, right?
   -- JD Long (in a not too serious chat about modeling strategies)
      Stackoverflow (November 2010)

- Joris Meys

Answer 2

作为记录，108是指这个数字：

R> library(fortunes)
R> fortune(108)

Actually, I see it as part of my job to inflict R on people who are 
perfectly happy to have never heard of it. Happiness doesn't equal 
proficient and efficient. In some cases the proficiency of a person 
serves a greater good than their momentary happiness.
   -- Patrick Burns
      R-help (April 2005)

R> 

- Dirk Eddelbuettel

Answer 3

以下内容是从R语言的列表中收集到的幽默（有时带点讽刺性）评论。

install.packages("fortunes")

更一般地说

install.packages("sos")
library("sos")
findFn("fortune")

- Ben Bolker

---

恭喜Ben，您赢得了在SO上回答带有[r]标签的第5000个问题的奖品。+1 - Andrie

Answer 4

在CRAN上进行快速搜索会出现fortunes包, 它基本上只是打印与R相关的随机机智引用语。该概念基于Unix的fortune程序。

- Donut

---

是的，但您可能想要使用rseek.org进行更专注于与R相关的搜索。 - Dirk Eddelbuettel