# Fahrenheit to Celsius
calcFtoC(32)
calcFtoC(68)
# mydata file
filepath <- data_file_path("mydata.xlsx")
mydata <- readxl::read_excel(filepath, sheet = "mydata", n_max = 5)
mydata |> dplyr::mutate(TempC = calcFtoC((Temp * 9/5) + 32))
Run the code above in your browser using DataLab