Generate or handle a missing argument in function in R

Question

x = 1

simple <- function(p,q){
            return(q)
}

test = simple(x,y)

Error in simple(x, y) : object \'y\' not found

Please Note : Eve