Delete sum_non_na.R