Я пытаюсь написать приглашение, используя readline
и if
/ else
, чтобы я мог либо продолжить, если мои данные выглядят нормально, либо вернуться и изменить переменные, если мои данные не выглядят нормально.
Я попытался создать воспроизводимый пример, как показано ниже:
for (i in 1:10){
y <- rnorm(10, mean = 0, sd = 1)
print(min(y))
ask<-readline(prompt="Enter 'y' if y_min is lower than -1")
if(ask=='y'){#go back and change mean and sd of y#}else{#proceed to next line#}
}
В этом примере я пытаюсь убедиться, что все значения y
выше -1 для каждого i
. Поэтому, если я напечатаю min(y)
и если он даст мне значение выше -1, я отвечу n
и перейду к следующей строке кода. Или, если он даст мне значение ниже -1, я отвечу y
на приглашение readline и вернусь ко второй строке, чтобы я мог изменить mean
и sd
из y
, попробуйте распечатать min(y)
снова, и либо ответьте y
, либо n
и так далее.
(Я знаю, что есть более простые способы гарантировать, что y
не опустится ниже -1 без использования readline
, но здесь я просто пытался придумать простой воспроизводимый пример, который я могу пост здесь)
У меня проблемы с поиском способов вернуть R к той строке, которую мне нужно исправить, и снова запустить эти строки. Кто-нибудь может дать мне какой-нибудь совет по этому поводу?