Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/72.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在R语言中,如何使用沉默的solnp_R - Fatal编程技术网

在R语言中,如何使用沉默的solnp

在R语言中,如何使用沉默的solnp,r,R,我使用R包Rsolnp来解决一些约束优化问题。解决优化问题后,它会自动显示通知和优化结果。有人知道如何让它安静吗?我必须在每次迭代中编写一个循环来运行solnp。不断地显示结果是很烦人的 提前谢谢 您不需要付出太多,但可以通过control参数将trace控制参数设置为solnp。例如,使用来自?solnp的exmaple: fn1 <- function(x) { exp(x[1]*x[2]*x[3]*x[4]*x[5]) } eqn1 <- function(x) { z

我使用R包Rsolnp来解决一些约束优化问题。解决优化问题后,它会自动显示通知和优化结果。有人知道如何让它安静吗?我必须在每次迭代中编写一个循环来运行solnp。不断地显示结果是很烦人的


提前谢谢

您不需要付出太多,但可以通过
control
参数将
trace
控制参数设置为
solnp
。例如,使用来自
?solnp的exmaple:

fn1 <- function(x) {
  exp(x[1]*x[2]*x[3]*x[4]*x[5])
}
eqn1 <- function(x) {
  z1 <- x[1]*x[1]+x[2]*x[2]+x[3]*x[3]+x[4]*x[4]+x[5]*x[5]
  z2 <- x[2]*x[3]-5*x[4]*x[5]
  z3 <- x[1]*x[1]*x[1]+x[2]*x[2]*x[2]
  return(c(z1,z2,z3))
}
x0 <- c(-2, 2, 2, -1, -1)

在包中的其他函数中也有类似的参数。

您不需要做太多工作,但可以通过
control
参数将
trace
控制参数设置为
solnp
。例如,使用来自
?solnp的exmaple:

fn1 <- function(x) {
  exp(x[1]*x[2]*x[3]*x[4]*x[5])
}
eqn1 <- function(x) {
  z1 <- x[1]*x[1]+x[2]*x[2]+x[3]*x[3]+x[4]*x[4]+x[5]*x[5]
  z2 <- x[2]*x[3]-5*x[4]*x[5]
  z3 <- x[1]*x[1]*x[1]+x[2]*x[2]*x[2]
  return(c(z1,z2,z3))
}
x0 <- c(-2, 2, 2, -1, -1)
包中的其他函数中也有类似的参数。

请看
> powell <- solnp(x0, fun = fn1, eqfun = eqn1, eqB = c(10, 0, -1),
+                 control = list(trace = 0))> 
> # look, no output