代码:
a1<-10
b1<-readline("Enter Value: ")
提示和输出
b1<-readline("Enter Value: ")
Enter Value: a1
> b1
[1] "a1"
所需的输出
b1<-readline("Enter Value: ")
Enter Value: a1
> b1
[1] 10
如何获取b1的值为10而不是“ a1”
答案 0 :(得分:2)
使用get
:
b1 <- get(readline("Enter Value: "))
Enter Value: a1
> b1
[1] 10
答案 1 :(得分:0)
base::get()
。将最后一行从b1
更改为get(b1)
。
a1 <- 10
# b1<-readline("Enter Value: ")
b1 <- "a1"
get(b1) # Returns `[1] 10`