是否有任何函数可以解决 validObject(.Object) 中的错误？

如何解决是否有任何函数可以解决 validObject(.Object) 中的错误？

我目前正在运行脚本并不断收到相同的错误（见下文）。我尝试过“尝试”功能，但没有成功。

for(cn in rownames(pathwayMatrix)){
try({
cn = as.character(cn)
print(cn)
value = pathwayMatrix[cn,] + 0e-19*rnorm(n=length(pathwayMatrix[cn,]))
tval = t(value)
rownames(tval) <- cn
m = merge(x=t(tval),y=pw_met,by.x=0,by.y ="scilife_id")
colnames(m)[which(colnames(m)==cn)] = "value"
print(sort(table(m$value),decreasing = TRUE)[1])
print(var(m$value))

lm1 = lmer(formula = value ~ anatomical_location + institution + filtered_reads + ageTri + 
sex + (1|batch) + local_scorad_cat +
           (1 | maars_subject_id),data=m)

diffMeansList[[cn]] = difflsmeans(lm1,test.effs=c("anatomical_location","sex","institution","ageTri","local_scorad_cat","ethnicity"))
dm=diffMeansList[[cn]][[7]]
ez=diffMeansList[[cn]][[1]]
pVal_mild_sev[cn] <- dm[9]
effect_size_mild_sev[cn] <- ez[9]

}) 
}

validobject(.Object) 中的错误：

invalid class “corMatrix” object: 'sd' slot has non-finite entries
In addition: Warning messages:
1: Some predictor variables are on very different scales: consider rescaling 
2: Some predictor variables are on very different scales: consider rescaling 
3: In vcov.merMod(model) :
Computed variance-covariance matrix problem: not a positive definite matrix;
returning NA matrix