การใช้ฟังก์ชัน stop()

# Stop the execution if ages are negative
mean_age <- function(ages) {
   if(any(ages < ___)) {
    ___("You have negative ages!")
  }
  
  m <- mean(ages)
  return(m)
}