Линейная регрессия «NA» Оценка только для последнего коэффициента

Я использую функцию сводки (LM (...)) в R. Когда я печатаю коэффициенты, которые я получаю оценки для всех переменных, кроме последней переменной. Последняя переменная я получаю "Na".

Я попробовал переключение последнего столбца данных с другим столбцом и снова, все, что было в последнем столбце, получили «NA», но все остальное получило оценки.

Немного о данных: у меня есть около 5 переменных с данными в каждой строке, а затем у меня есть 12 сезонных переменных, которые, например, если в январе в январе есть 1 на каждый день в январе. Для февральской переменной есть 1, если месяц февраль и 0 иначе и так далее. Кто-нибудь знает, что бы произвести «НС» в последнем столбце из оценки коэффициента? Итак, первый раз, когда я пробежал его, это был коэффициент для декабрьской фиктивной переменной. Это из-за моих ежемесячных фиктивных переменных? Спасибо

Это мой воспроизводимый пример.

dat<- data.frame(
         one<-c(sample(1000:1239)),
         two<-c(sample(200:439)),
         three<-c(sample(600:839)),
         Jan<-c(rep(1,20), rep(0,220)),
         Feb<-c(rep(0,20),rep(1,20),rep(0,200)),
         Mar<-c(rep(0,40),rep(1,20),rep(0,180)),
         Apr<-c(rep(0,60),rep(1,20),rep(0,160)),
         May<-c(rep(0,80),rep(1,20),rep(0,140)),
         Jun<-c(rep(0,100),rep(1,20),rep(0,120)),
         Jul<-c(rep(0,120),rep(1,20),rep(0,100)),
         Aug<-c(rep(0,140),rep(1,20),rep(0,80)),
         Sep<-c(rep(0,160),rep(1,20),rep(0,60)),
         Oct<-c(rep(0,180),rep(1,20),rep(0,40)),
         Nov<-c(rep(0,200),rep(1,20),rep(0,20)),
         Dec<-c(rep(0,220),rep(1,20)
      )

attach(dat)

summary(lm(one ~ two + three + Jan + Feb + 
          Mar + Apr + May + Jun + Jul + Aug + Sep + Oct + Nov + Dec))