R语言：最大化功能受另一个功能的影响

Question

我很想知道怎样才能最大化f(x) = xy使用R x + y = 100的函数{I}。我知道有几个像optim或者优化的软件包有助于实现它但它需要一个向量要优化的参数值。我想知道我是否可以在不使用值的情况下完成它。

任何建议或帮助都将不胜感激。

谢谢！

Answer 1

是的，我能够做到。

maxiFunc <- function(x) {
    x1 <- x[1]
    y = (500-x1)/2
    x1*y
}
xmax = optimize(maxiFunc, interval= c(0, 500), tol = .Machine$double.eps^0.25, maximum = TRUE)
paste("The maximum value of the function is", xmax$objective)

我并不是要问一个高中的微积分问题，而是要知道是否有办法解决我没有指定interval= c(0, 500)的问题。感谢您的投入。