В R 3.6.0 внутренний алгоритм, используемый sample()
, изменился.По умолчанию для нового сеанса
> set.seed(2345)
> sample(1:10, 5)
[1] 3 7 10 2 4
, что вы получите в файле PDF.Можно вручную перейти к старому методу «округления», хотя:
> set.seed(2345, sample.kind="Rounding")
Warning message:
In set.seed(2345, sample.kind = "Rounding") :
non-uniform 'Rounding' sampler used
> sample(1:10, 5)
[1] 2 10 6 1 3
В какой-то момент вы произвели это изменение в сеансе R, как видно из вывода sessionInfo()
.Вы можете либо изменить это обратно с помощью RNGkind(sample.kind="Rejection")
или начать новый сеанс R.
Кстати, в общем, пожалуйста, включайте примеры кода в виде текста, а не изображений.