wrapped analyses in lapply