Изменить диагональ набора фреймов данных во вложенных списках

Question

У меня есть пара фреймов данных в списке, вложенном в другой список.Я хочу изменить диагональ фреймов данных на NA.

Я пробовал это a <- lapply(ATS,function(x) lapply(x, function(x) diag(x) <- NA))

, но кадры данных внутри превратились в логические значения, равные NA.

Какможно изменить диагональ фреймов данных?

Answer 1

Нам нужно вернуть x после присвоения

lapply(ATS,function(x) lapply(x, function(x) {diag(x) <- NA; x}))