Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- matchData <- list()
- for (i in 1:100)
- {
- matchData[[i]]= matrix(nrow=2, ncol=4)
- for (j in 1:4)
- {
- matchData[[i]][[1,j]] = vector("list",4)
- matchData[[i]][[2,j]] = vector("list",4)
- matchData[[i]][[1,j]] = matrix(nrow=4, ncol = 1)
- matchData[[i]][[2,j]] = matrix(nrow=4, ncol = 1)
- }
- }
- matchData <- list()
- for (i in 1:100) matchData[[i]]= matrix(nrow=2, ncol=4)
- matchData=do.call(c,matchData);dim(matchData)=c(dim(matchData[[2]]),length(matchData), 4)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement