change best.R :
   handle "Not avaiilable" string before apply as.numeric