在R中使用while循环计算立方根

Question

我的代码中存在一些错误，使其无限循环。我尝试添加break命令但不起作用。

CubicRoot <- function(x){
 variable <- 1
  while (variable < 5) {
     x <- x^(1/3)*variable
     variable + 1
  }
  return(x)
}

Answer 1

添加变量=变量+ 1，否则变量保持不变。所以你一遍又一遍地使用变量= 1来运行它。