Summe alle N Werte in Matrix

So habe ich mir diese Frage angeschaut, die zuvor für die Summierung von jeweils 2 Werten in jeder Zeile in einer Matrix verwendet wurde. Hier ist der Link:sum spezifische Spalten unter den Zeilen. Ich habe mir hier auch eine andere Frage angesehen:R Summiere alle k Spalten in der Matrix was meiner ähnlicher ist. Ich konnte die Lösung in diesem Fall nicht zum Laufen bringen. Hier ist der Code, mit dem ich arbeite ...

y <- matrix(1:27, nrow = 3)
y

m1 <- as.matrix(y)
n <- 3
dim(m1) <- c(nrow(m1)/n, ncol(m1), n)
res <- matrix(rowSums(apply(m1, 1, I)), ncol=n)
identical(res[1,],rowSums(y[1:3,]))


sapply(split.default(y, 0:(length(y)-1) %/% 3), rowSums)

Ich erhalte nur eine Fehlermeldung, wenn ich das anwende. Die gewünschte Ausgabe ist eine Matrix mit folgenden Werten:

      [,1] [,2] [,3]
[1,]   12   39   66
[2,]   15   42   69
[3,]   18   45   72

Antworten auf die Frage(6)

Ihre Antwort auf die Frage