#Gaussian Function: More, Garbow, and Hillstrom, ACM TOMS VOL. 7 NO.1 # (March 1981) 17-41 # written in AMPL by Yu-Ju Kuo and Hans D. Mittelmann, 6/2001 param N:=3; param M:=15; param Y{1..M}; param TI{i in 1..M}:=(8-i)/2; var x{1..N}; minimize obj: sum{i in 1..M}(x[1]*exp(-x[2]*(TI[i]-x[3])^2/2)-Y[i])^2; data; param Y:= 1 0.0009 2 0.0044 3 0.0175 4 0.0540 5 0.1295 6 0.2420 7 0.3521 8 0.3989 9 0.3521 10 0.2420 11 0.1295 12 0.0540 13 0.0175 14 0.0044 15 0.0009; var x:=1 0.4 2 1 3 0;