優化中的R

Question

多元函數我有我想要優化過一個參數的多元函數：

cost <- function(theta, X, y) { 
    m <- nrow(X) 
    X <- as.matrix(X) 
    J <- sum(-y * log(sigmoid(X %*% theta)) - (1-y) * log(1 - sigmoid(X %*% theta)))/m; 
    return(J) 
} 

優化它，我使用的Optim功能。首先，我創建一個包裝，然後使用的Optim功能來優化包裝函數：

# X and y initialized before 
initial_theta <- rep(0,ncol(X)) 
wrapper <- function(theta) cost(theta, X=X, y=y) 
o <- optim(initial_theta, wrapper) 

如何優化與Optim一個多元函數，而無需創建附加的功能呢？

Answer 1

optim需要一個...參數，它將任何添加輸入傳遞給感興趣的函數。所以，你不需要創建只要一個新的功能要優化過的參數是感興趣的函數的第一個參數。

optim(initial_theta, cost, X = X, y = y) 

應該提供與創建額外功能相同的功能。