将字符“ pi”转换为值pi

Question

我正在做一个需要两个输入变量并计算值的作业。

input.c.x <-as.numeric(readline("input a variable x: "))
input.c.a<- as.numeric(readline("input a variable a: "))
output <- sin((input.c.a)*(input.c.x))

对于变量a，我需要输入类似“ pi / 180”的内容。但是它不能像字符一样工作，也不能转换为像3.14这样的数字

Answer 1

由于readline返回类型为“字符”的输出。我们可以使用eval/parse来转换数据

input.c.x <- readline("input a variable x: ")
input.c.a <- readline("input a variable a: ")
x <- eval(parse(text = input.c.x))
y <- eval(parse(text = input.c.a))

然后这些数字可以用于进一步的计算。

input.c.x <- readline("input a variable x: ")
#input a variable x: pi/180

x <- eval(parse(text = input.c.x))
x
#[1] 0.01745329