更多组合来扩展R中的网格功能

Question

我有数据

subtype <- c("ar","sub")
height <- c("0","1")

我正在使用 expand.grid(subtype,height) 但我得到

Var1    Var2
ar        0
sub       0
ar        1
sub       1

我需要

Var1    Var2
ar       0
sub      1
ar       1
sub      0
ar       0
sub      0
ar       1
sub      1

Answer 1

我认为这会提供您想要的数据（只是顺序不同）

cbind.data.frame(Var1=subtype , Var2=c(t(as.matrix(expand.grid(height,height)))))

#   Var1 Var2
# 1   ar    0
# 2  sub    0
# 3   ar    1
# 4  sub    0
# 5   ar    0
# 6  sub    1
# 7   ar    1
# 8  sub    1