you have two options that i can think of
apply(data,2,max,na.rm=TRUE); # this will remove the NA's from columns that contain them
OR
apply(na.omit(data),2,max); ## this will remove the NA rows from the data frame and then calculate the max values