slist_2_3 <- combinate(matrix(sspace_multinom(2, 5), ncol = 2, byrow = TRUE),
matrix(sspace_multinom(3, 6), ncol = 3, byrow = TRUE))
sl_2_3_4 <- combinate2(slist_2_3, matrix(sspace_multinom(4, 3), ncol = 4, byrow = TRUE))
Run the code above in your browser using DataLab