How to make q('yes') the default quitting behavior in R using .Rprofile?

In your Rprofile.site file:

q <- function(save = "yes", status = 0, runLast = TRUE){
.Internal(quit(save, status, runLast))
#<environment: namespace:base>
}