在R中,如何生成150个随机数,至少使用1到100之间的数字一次?
library(tidyverse)
set.seed(123)
df <- tibble(Random_number = sample(x = 1:100,
size = 150,
replace = TRUE)) %>%
arrange(Random_number)
Run Code Online (Sandbox Code Playgroud)
例如,数字1、2、3等从未出现过。我知道这个脚本不够好,无法让数字 1 到 100 总是至少出现一次,如我所料,但我不知道如何实际编写该脚本。