将字符 "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" 的内容。但它不会像 will be 字符那样工作，也不会转换为像 3.14

这样的数字

Answer 1

因为 readline returns 输出类型 "character"。我们可以使用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

将字符 "pi" 转换为值 pi

Convert character "pi" to value pi

pi

r