Невозможно записать в список. Перепробовал несколько методов

Question

Я пишу код, в котором я пытаюсь создать вектор "список", используя для цикла. Я решил большую часть кода, кроме одной маленькой проблемы.

Вот мой код:

dnt_1 = vector("list", length(unique(dnt$A)))
dnt_2 = vector("list", length(unique(dnt$A))) #length = 22
dnt_3 = NULL
dnt_4 = NULL
for (i in unique(dnt$PLAZA)){
     dnt_3 = subset(dnt, A == i)
     dnt_4 = subset(dnt_3, select = c("B", "C", "D"))
     dnt_1[[i]] = dnt_3
     dnt_2[[i]] = dnt_4
     }

Список dnt_1 выходит идеально. Список: dnt_2 также показывает значение NULL. Результат показывает, что 22 значения имеют значение NULL, а остальные 22 - переменную подмножества. По сути, первые 22 значения бесполезны.

Кто-нибудь, пожалуйста, помогите мне исправить эту ошибку. Было бы очень полезно, если бы кто-то также приложил документ или объяснил, как исправить такие ошибки в целом.