[r] Exclude Blank and NA in R