Код, который я пытаюсь запустить, выглядит следующим образом. Цель состоит в том, чтобы вычислить факториал числа, введенного пользователем.
a <- readline(prompt = "Enter a number: ")
a <- as.integer(a)
num = 1
for (i in 1:a) {
num = num * i
}
Но вывод, который я получаю, не требует ввода и не представляет ничего ценного (когда я запускаю его в R Script и перенесите его в консоль, используя Ctrl + Enter ). Это выглядит следующим образом -
> a <- readline(prompt = "Enter a number: ")
Enter a number: a <- as.integer(a)
>
> num = 1
> for (i in 1:a) {
+ num = num * i
+
+ }
Error in 1:a : NA/NaN argument
In addition: Warning message:
In 1:a: NAs introduced by coercion
Вместо readline() я также пытался использовать readLines(), но ошибка все еще сохраняется. Как это решить? Есть ли другой способ запросить динамический c ввод от пользователя?