test <- function(x=20){
   return(missing(x))
}
test()
# [1] TRUE
test(5)
# [1] FALSE