2017-10-08 93 views

回答

0

根据您的目标,优化可能会像在

calculate <- function(x){ 
    A <- matrix(c(1 ,2 ,x), nrow = 1) 
    B <- matrix(c(1, 2, 3, 4, 5, 2, 6, 2, 1), nrow = 3) 
    C <- matrix(c(1, 2, x), nrow = 3) 
    return(abs(A %*% B %*% C - 1)) 
} 


optimize(calculate, c(-100, 100)) 
+0

谢谢你帮我最快,最简单的选择。我试过你的代码,并且完成了我想要的。你知道我在哪里可以更多地了解这类问题? – zecoves

+0

'optimize'函数和它的兄弟'optim'不会做矩阵代数 - 它们只是通过迭代在任意函数中搜索最小值和最大值。 如果你不需要这个正式解决,但只是很好的解决方案,你可以通过阅读'help(优化)'和'help(optim)'来做很多事情。然后你可以在这里阅读更多:https://www.is.uni-freiburg.de/ressourcen/computational-economics/5_OptimizationR.pdf还有一个关于优化的TaskView https://cran.r-project.org /web/views/Optimization.html如果这样做你想要的,你可以考虑接受答案。 – Bernhard

+0

谢谢。你为我提供了很多新的信息。幻灯片非常有帮助。你帮了我很多。 – zecoves