请各位高手看看这段R语句的问题，并改成正确的表达，谢谢啦！（提示花括号错误）

for(i in 1: length(cormat)){

for(j in 1:nrow(cormat[])){

for(k in 1:nvar){

if(is.na(cormat[][j,k]==TRUE

& is.na(cormat[][j,j])!=TRUE

& is.na(cormat[][k,k])!=TRUE){

if(sum(is.na(cormat[])[j, ]>sum(is.na(cormat[])[k, ]))

{cormat[][k,k]<-NA}

if(sum(is.na(cormat[])[j, ]<=sum(is.na(cormat[])[k, ]))

{cormat[][j,j]<-NA}

}}}}