14

ランダムなサンプルをいくつか作成してプロットしていると、奇妙な動作に気づきました。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

この動作は簡単に回避できますが、ggplot2がシード値を変更する理由はありますか？

4

1 に答える 1

15

Rのチャットルームの1つで、これについての議論を見たと思いggplot2ます。提供するかどうか/どのヒントを提供するかを決定するために、乱数ジェネレーターを呼び出します。

特に、これは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)
}

ランダムに生成されたヒントの1つが、ヒントをオフにする方法を教えてくれるのはちょっと面白いです...

于 2013-03-07T01:49:34.393 に答える