r - R语言：最大化函数服从另一个函数

Question

我很想知道如何最大化使用 R 的函数f(x) = xy。x + y = 100我知道一些包，如 optim 或 optimize 有助于做到这一点，但它需要一个值向量来优化参数。我想知道我是否可以在不使用这些值的情况下做到这一点。

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

谢谢 ！！

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). 感谢您的投入。