Как использовать цикл для печати данных [1,1], затем данных [2,2] и т. Д.

Question

Скажем, у меня есть фрейм данных, подобный этому:

data<-data.frame(
weight=c(64,52,78,90,123,83),
age=c(29,50,33,57,44,54),
height=c(170,184,162,190,179,171)
)

Теперь я хотел бы использовать цикл for для печати данных [1,1], затем данных [2,2]и данные [3,3]

С помощью следующего цикла я получаю данные [1,1], [1,2] и [1,3].

for (c in 1:ncol(data)){
    print(data[1,c])
}

Как мне изменить его для получения вышеуказанного?

Answer 1

Просто попробуйте это:

for (c in 1:ncol(data)){
 print(data[c,c])
 }

ИЛИ

Если вы хотите получить доступ к диагональному элементу, используйте diag

diag(as.matrix(data[,]))

Вывод:

[1]  64  50 162