从stdin读取并写入R中的变量

Question

如何从stdin的第一行到变量n，以及第二行4 -4 1，如第一行c(4, -4, 1)到第二个变量，写一个整数？

例如，我的输入是：

2
4 -4 1

我需要得到：

n = 2
a = c(4, -4, 1)

Answer 1

你可以试试这个：

n1 <- readline("Please enter the first line: ")
n2 <- readline("Please enter the second line: ")
n <- as.numeric(n1)
n2 <- unlist(strsplit(n2," "))
a <- c(as.numeric(n2))

#Please enter the first line: 2
#Please enter the second line: 4 -4 1
#> a
#[1]  4 -4  1
#> n
#[1] 2
#> class(a)
#[1] "numeric"
#> class(n)
#[1] "numeric"