如果我们想要获得两个向量的所有组合,我们可以使用rep/回收规则:
x <- 1:4
y <- 1:2
cbind(rep(x, each = length(y)), rep(y, length(x)))
# [,1] [,2]
# [1,] 1 1
# [2,] 1 2
# [3,] 2 1
# [4,] 2 2
# [5,] 3 1
# [6,] 3 2
# [7,] 4 1
# [8,] 4 2
但是expand.grid更好 - 它为我们处理所有重复.
expand.grid(x, y)
# Var1 Var2
# 1 1 1
# 2 2 1
# 3 3 1
# 4 4 1
# 5 1 2 …我在编写代码迷宫时遇到问题，它会反复洗牌。我写了一句洗牌的行，但每次牌组都以同样的方式洗牌。我需要帮助编写代码，以便每次都以不同的方式洗牌。
shuffling <-sample(deck,length(deck))