【无标题】R小白求助，求求大佬帮助，头疼

Budorcas_taxicolor_inner <- read.csv('D:/goldentaken_inner1.csv',head = TRUE)
CBLcov49 <- read.csv('D:/CBLcov.csv',head = TRUE)
CBLcov49.std <- decostand(CBLcov49,method = 'standardize')
Budorcastaxicolor49  <- unmarkedFrameOccu(y=Budorcas_taxicolor_inner,siteCovs = CBLcov49.std)
Budorcastaxicolor49_m0 <- occu(~1~1,Budorcastaxicolor49)
Budorcastaxicolor49_01 <- occu(~1~elevation,Budorcastaxicolor49)

dlist_m <- fitList(
  Nullo = Budorcastaxicolor49_m0,
  'psi(elevation)' = Budorcastaxicolor49_01,)
(Budorcastaxicolor_selmod_m <- modSel(dlist_m,nulmod='Nullo'))

这个是不是已经给参数赋值了啊，怎么还提示

Error in fitList(Nullo = Budorcastaxicolor49_m0, `psi(elevation)` = Budorcastaxicolor49_01,  : 
  缺少参数, 也没有缺省值

有好心人帮忙一下吗，哭了