R语言 try() 错误识别

1.将可能会报错的命令行放到try()函数中，并将其赋值到一个变量名fit（可以是任意变量名）中
2.如果有错误，将fit将称为一个类型为“try-error”的变量
3.可以用R 'try-error' %in% class(fit)放置在if()函数中进行判断
4.try() 函数一般与next 和 break 进行联用，next跳过本次循环，break跳出循环

  library(ConsensusClusterPlus)
  i <- 10 
  while(i > 3){
    maxk <- min(i, ncol(distan_matrix)-1)
    i <- i-1
    title <- "./"
    fit <- try(ConsensusClusterPlus(distan_matrix, maxK = maxk, reps = 10, pItem = 0.8, title=title,pFeature = 1, clusterAlg="kmdist", seed=1234, plot="png"))
    if("try-error" %in% class(fit))
    {
      next
    }else
    {
      Consensus_result = fit
      break
    }
   }

---