filter去除NA

df %>% filter(!is.na(var))

from https://stackoverflow.com/questions/28857653/removing-na-observations-with-dplyrfilter