В следующем процессе:
x <- c(1:10) for(i in 1:20){ y <- sample(x) print(y) }
Как получить семена, используемые на каждом шаге? (Я не хочу предварительно sh это). Есть что-то вроде "get.seed ()"?