
Last chance! 50% off unlimited learning
Sale ends in
Helical Test Function
funHelical(x)
matrix of points to evaluate with the function. Rows for points and columns for dimension.
1-column matrix with resulting function values
More', J. J., Garbow, B. S., and Hillstrom, K. E. (1981). Testing unconstrained optimization software. ACM Transactions on Mathematical Software (TOMS), 7(1), 17-41. 10.1145/355934.355936
Fletcher, R., and Powell, M. J. (1963). A rapidly convergent descent method for minimization. The Computer Journal, 6(2), 163-168. 10.1093/comjnl/6.2.163
# NOT RUN {
x1 <- matrix(c(1,1),1,)
funHelical(x1)
res <- spot(,funHelical,c(-40,-40,-40),c(40,40,40),control=list(funEvals=20))
plotModel(res$model,which=c(1,2),type="persp",border="NA")
plotModel(res$model,which=c(2,3),type="persp",border="NA")
plotModel(res$model,which=c(1,3),type="persp",border="NA")
plotModel(res$model, which=c(1,2))
plotModel(res$model, which=c(1,3))
plotModel(res$model, which=c(2,3))
# }
Run the code above in your browser using DataLab