[R] surprising predicting capabilities

[chaogai]

Hi,

I noticed the following fortune in R 2.7 and 2.6.2:

fortune('Spreads')

If anything, there should be a Law: Thou Shalt Not Even Think Of Producing A
Graph That Looks Like Anything From A Spreadsheet.
   -- Ted Harding (in a discussion about producing graphics)
      R-help (August 2008)


Just wondering, what function and library gave this detailed prediction?

Cheers