Replaced identical(a,NULL) by is.null(a)

Replacements in select_phase