Для выборки из таблицы базы данных я часто использую шаблон
library(dplyr)
tbl(con, 'tableName') %>%
mutate(z = random()) %>%
compute() %>%
arrange(z) %>%
filter(row_number() < numSamples) %>%
collect()
Есть ли способ установить начальное значение, чтобы образец можно было реплицировать?