为什么我在 R 中收到此 function 的意外输入错误？

Question

如果我输入例如 c, 2)，我希望 function 返回华氏度到摄氏度方程，如果我输入 f，则相反。 这是我的 function：

Temperatureconverter <- function(v,x){
  x = 0
  if(v == c) {          
    return(x*9/5+32)
  if(v == f){             
    return((x−32)×5/9)
  }}

这是错误：

Error in source("~/Documents/MAE4000/R/test.R", echo = TRUE) : 
  ~/Documents/MAE4000/R/test.R:7:14: unexpected input
6:   if(v == f){             
7:     return((x−
                ^

Answer 1

我重写了如下代码以解决所有缺失的细节：

Temperatureconverter <- function(v,x)
{
  if(v == "c") return(x*9/5+32)
  if(v == "f") return((x-32)*5/9)
  else return ("Please enter c for Celsius or f for Fahrenheit")
}

Temperatureconverter("f",100) # calling the function 

评论是对的：

• 在收到 x 的值后将 x 设置为零会使计算错误
• “减号”不是正确的符号
• 乘法应始终为 *。