R function does not return a numeric value

Question

I have created a function as bellow:

#!/usr/bin/Rscript
targetRunner <- function(temp) {
  cost <- ((temp - 32) * (5 / 9)) + 273.15
  return(cost)
}

ar