求大佬帮助

我用R语言跑gWQS mutinom函数的时候一直报下面这个错，怎么解决啊？

Error in solve.default(nlm_out$hessian) : 
  Lapack例行程序dgesv: 系统正好是奇异的: U[8,8] = 0
此外: Warning messages:
1: In val.0[wqs_site] <- sapply(b1_pos, function(i) ifelse(i, 1e-04,  :
  被替换的项目不是替换值长度的倍数
2: Using formula(x) is deprecated when x is a character vector of length > 1.
  Consider formula(paste(x, collapse = " ")) instead. 
3: Using formula(x) is deprecated when x is a character vector of length > 1.
  Consider formula(paste(x, collapse = " ")) instead. 
4: Using formula(x) is deprecated when x is a character vector of length > 1.
  Consider formula(paste(x, collapse = " ")) instead. 
5: In nlm(LL, initp, hessian = TRUE, dtfm = as.matrix(dtf)) :
  NA/Inf被换成最大的正值
6: In nlm(LL, initp, hessian = TRUE, dtfm = as.matrix(dtf)) :
  NA/Inf被换成最大的正值