R在for循环中编写提示以返回并更改变量或继续

Question

我正在尝试使用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的所有i值都大于-1。因此，如果我打印min(y)并且给我一个大于-1的值，我将回答n并进入下一行代码。或者，如果它给我一个小于-1的值，我会在读行提示中回答y，并将其返回到第二行，以便我可以更改其中的mean和sd y，尝试再次打印min(y)，然后回答y或n，依此类推。

（我知道有一些更简单的方法可以确保在不使用y提示的情况下，readline不会低于-1，但是在这里，我只是想提出一个简单的可复制性可以在此处发布的示例）

我很难找到使R返回到我需要修复的行并再次重新运行这些行的方法。有人可以给我一些建议吗？