将字符" 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