für Schleife in Matrix mit R

Question

Ich muss 54 Matrizen in eine Liste von Vektor namens A setzen. Ich möchte die ersten 25 Matrizen in dieser Liste zu Null Matrizen mit Ausnahme der (i, j) th Element der Matrix, die sollte gleich eins sein. Alle meine Matrizen sind 5x5. Ich benutze eine for-Schleife, aber ich verstehe nicht, wie man die ersten 25 Matrizen erstellt.

Jetzt versuche ich 16 Matrizen von 0 mit (i: (i-1), j: (j-1)) th Element = 1, so dass es ein Quadrat von 1s der Größe 2 von 2 ist Dafür habe ich den folgenden Code verwendet, aber ich möchte sicherstellen, dass "i" größer ist als oder gleich 2. Wie kann ich das tun?

t<-26 
for(i in 1:5){ 
    for(j in 1:5){ 
    A <- matrix(0, nrow = 5, ncol = 5) 
    A[i:(i-1), j:(j-1)] <- 1 
    M[[l]] <- A 
    t <- t+1 
    } 
} 
A 

Answer 1

Nur eine Vermutung, was Sie wollen. Lassen Sie mich wissen, wenn dies nicht das ist, was Sie wollen, dann kann ich es entweder bearbeiten oder entfernen.

A <- vector("list", 54) 
mat <- matrix(0, nrow = 5, ncol = 5) 

# assign mat to A and the 1 to the ith element of mat (column wise) 
for (i in 1:25) { 
    A[[i]] <- mat 
    A[[i]][i] <- 1 
} 

A[[1]] 
# [,1] [,2] [,3] [,4] [,5] 
# [1,] 1 0 0 0 0 
# [2,] 0 0 0 0 0 
# [3,] 0 0 0 0 0 
# [4,] 0 0 0 0 0 
# [5,] 0 0 0 0 0 

A[[2]] 
# [,1] [,2] [,3] [,4] [,5] 
# [1,] 0 0 0 0 0 
# [2,] 1 0 0 0 0 
# [3,] 0 0 0 0 0 
# [4,] 0 0 0 0 0 
# [5,] 0 0 0 0 0 

A[[25]] 
# [,1] [,2] [,3] [,4] [,5] 
# [1,] 0 0 0 0 0 
# [2,] 0 0 0 0 0 
# [3,] 0 0 0 0 0 
# [4,] 0 0 0 0 0 
# [5,] 0 0 0 0 1 

Insert 1 Reihe weise (nicht die eleganteste Art und Weise, es zu tun)

# assing 1 the ith element of mat (column wise) 
for (i in 1:25) { 
    mat_1 <- mat 
    mat_1[i] <- 1 
    A[[i]] <- t(mat_1) 
}