Axis parallel hyper-ellipsoid function

Script: ellipsoid.qscript

'script language = VBscript
function Main()
    sum = 0
    for i = 1 to qs_NVARS
        sum = sum + i * qs_sqr(qs_VAR(i))
    next
    ' Save results
    qs_RESULT(1) = sum
end function

QstatLab model (see OptimizationModels.qsl in Examples):

Type =script
nvars = 2
scriptfile = ellipsoid.qscript
lvar1 = -5.12
uvar1 = 5.12
var1 = 0
lvar2 = -5.12
uvar2 = 5.12
var2 = 0

Minimum

Minimum value is 0 for Var(i) = 0

Plots:

Back to Data Entry