I have defined the following function in RStudio.
#!/usr/bin/Rscript fahr_to_kelvin <- function(temp) { kelvin <- ((temp - 32) * (5 / 9)) + 273.15 p