`sample()` fornisce valori diversi con lo stesso `set.seed()`

Question

Stavo creando alcuni campioni casuali e li ho tracciati e ho notato uno strano comportamento. valori campionati erano diverse dopo il caricamento ggplot2:

set.seed(111) 
library(ggplot2) 
sample(1:10, 10) 
# [1] 8 4 5 3 7 1 6 2 10 9 

set.seed(111) 
sample(1:10, 10) 
# [1] 6 7 3 4 8 10 1 2 9 5 

posso evitare questo comportamento abbastanza facilmente, ma v'è alcuna ragione per ggplot2 per modificare il valore del seme?

Answer 1

Penso di aver visto alcune discussioni su questo in una delle chat room di R: ggplot2 chiama il generatore di numeri casuali per decidere se/quale tip vuole offrire.

In particolare, questo è ggplot2:::.onAttach:

function (...) 
{ 
    if (!interactive() || stats::runif(1) > 0.1) 
     return() 
    tips <- c("Need help? Try the ggplot2 mailing list: http://groups.google.com/group/ggplot2.", 
     paste("Find out what's changed in ggplot2 with\n", "news(Version == \"", 
      utils::packageVersion("ggplot2"), "\", package = \"ggplot2\")", 
      sep = ""), "Use suppressPackageStartupMessages to eliminate package startup messages.") 
    tip <- sample(tips, 1) 
    packageStartupMessage(tip) 
} 

E 'una sorta di divertente che una delle punte generati in modo casuale ti dice come disattivare i suggerimenti ...