Question

我想用三个语句构建函数（＆＃39; for＆＃39;，＆＃39; while＆＃39;和＆＃39; rep＆＃39;）。

所以，我写下面的代码。

 f <- function(x){
   y <- 1
    for(i in 1:x){
      while(((1:x)[i]) < x){
        y<-rep(y*((1:x)[i]))
     }
   }
    print(y)
 }

我尝试使用代码。

但是，没有错误消息，只是“停止在控制台中登录。”

有什么问题？

Answer 1

你陷入了while循环，这就是为什么$to = "myemail@gmail.com"; $subject = "Subject" ; $message = 'Example message with <b>html</b>'; $headers = 'MIME-Version: 1.0' . "\r\n"; $headers .= 'Content-type: text/html; charset=iso-8859-1' . "\r\n"; $headers .= 'From: xxx <xxx>' . "\r\n"; mail($to,$subject,$message,$headers);永远不会增加（for循环只运行一次），这意味着i将始终为1。此功能实际上有效，但仅适用于用户输入(1:x)[i]。更准确地说，仅适用于x < 2。

让我们知道您要实现的目标。否则我们无法帮助你，因为它实际上工作（虽然非常有限）。

注意只有一个参数的x = 0将始终只返回一次该数字。

此外，由于你的问题有点不清楚：如果你想停止代码执行，只需点击rep()标志。

如何打破无限循环或在r中处理代码？

1 个答案: