Monday, August 18, 2014

A Unified Computer Program for an Integer Version of Schittkowski's Test Problem 289 but with 600 Unknowns instead 30 Unknowns

Jsun Yui Wong
 
Similar to the computer programs of the preceding papers, the computer program below seeks to solve an integer version of Schittkowski's Test Problem 289 but with 600 unknowns instead of 30 unknowns.  The source of this Test Problem 289 is S. Walukiewicz; see Schittkowski [14, p. 113].  Thus, the computer program below tries to minimize the following:

                                600
1 - EXP(  -(1/60)*   SIGMA   X(i)   ^2   )
                                i=1

subject to -2<= X(i) <= 2, X(i) integer, i=1, 2, 3,..., 600.

One notes line 114 through line 117, which are  
111 FOR J44=1 TO 600
114 A(J44)=-2+RND*4
117 NEXT J44

0 REM DEFDBL A-Z
1 DEFINT J,K,B,X
2 DIM A(1000),X(1000),T(1000),Y(1000)
88 FOR JJJJ=-32000 TO 32000
89 RANDOMIZE JJJJ
90 M=-1.5D+38
111 FOR J44=1 TO 600
114 A(J44)=-2+RND*4
117 NEXT J44
128 FOR I=1 TO 32000 STEP .1
129 FOR KKQQ=1 TO 600
130 X(KKQQ)=A(KKQQ)
131 NEXT KKQQ
139 FOR IPP=1 TO FIX(1+RND*3)
140 B=1+FIX(RND*600)
144 GOTO 167
145 IF RND<.5 THEN 150 ELSE 167
150 R=(1-RND*2)*A(B)
160 X(B)=(A(B)     +RND^3*R)
162 GOTO 168
163 IF RND<.5 THEN X(B)=(A(B)-.001)   ELSE X(B)=(A(B)     +.001   )
165 GOTO 168
167 IF RND<.5 THEN X(B)=CINT(A(B)-1)   ELSE X(B)=CINT(A(B)     +1   )
168 REM    IF A(B)=0 THEN X(B)=1 ELSE X(B)=0
169 NEXT IPP
171 FOR J44=1 TO 600
174 IF X(J44)>2 THEN X(J44)=A(J44)
175 IF X(J44)<-2 THEN X(J44)=A(J44)
177 NEXT J44
401 SUMM=0
402 FOR J44=1 TO 600
411 SUMM=SUMM+        X(J44)   ^2
421 NEXT J44
699 PD1=-1+EXP(-(1/60)*SUMM   )
1111 IF PD1<=M THEN 1670
1452 M=PD1
1454 FOR KLX=1 TO 600
1455 A(KLX)=X(KLX)
1456 NEXT KLX
1557 GOTO 128
1670 NEXT I
1889 IF M<0 THEN 1999
1923 PRINT A(1),A(2),A(3),A(4),A(5)
1924 PRINT A(6),A(7),A(8),A(9),A(10)
1933 PRINT A(591),A(592),A(593),A(594),A(595)
1935 PRINT A(596),A(597),A(598),A(599),A(600)
1939 PRINT M,JJJJ
1999 NEXT JJJJ

This BASIC computer program was run via basica/D of Microsoft's GW-BASIC 3.11 interpreter for DOS.  See the BASIC manual [11].  Copied by hand from the screen, this computer program's complete output through JJJJ=-31998 is shown below:

0   0   0   0   0
0   0   0   0   0
0   0   0   0   0
0   0   0   0   0
0   -31999

0   0   0   0   0
0   0   0   0   0
0   0   0   0   0
0   0   0   0   0
0   -31998

Above there is no rounding by hand.
 
M=0 is optimal; see Schittkowski [14, p. 113].

Of the 600 A's, only the 20 A's of line 1923 through line 1935 are shown above.

On a personal computer with a Pentium Dual-Core CPU E5200 @2.50GHz, 2.50 GHz, 960 MB of RAM, and the IBM basica/D interpreter, version GW BASIC 3.11,  the wall-clock time for obtaining the output through JJJJ=-31998 was 33 minutes.

Acknowledgment

I would like to acknowledge the encouragement of Roberta Clark and Tom Clark.

References

[1] E. Balas, An Additive Algorithm for Solving Linear Programs with Zero-One Variables.    Operations Research, Vol. 13, No. 4 (1965), pp. 517-548.

[2] E. Balas, Discrete Programming by the Filter Method.  Operations Research, Vol. 15, No. 5 (Sep. - Oct., 1967), pp. 915-957.

[3] F. Cajori (1911) Historical Note on the Newton-Raphson Method of Approximation.  The American Mathematical Monthly, Volume 18 #2, pp. 29-32.

[4] M. A. Duran, I. E. Grossmann, An Outer-Approximation Algorithm for a Class of Mixed-Integer Nonlinear Programs.  Mathematical Programming, 36:307-339, 1986.

[5] D. M. Himmelblau, Applied Nonlinear Programming.  New York: McGraw-Hill Book Company, 1972.

[6] W. Hock, K. Schittkowski, Test Examples for Nonlinear Programming Codes.  Springer-Verlag, 1981.

[7] Jack Lashover (November 12, 2012).  Monte Carlo Marching.  www.academia.edu/5481312/MONTE_ CARLO_MARCHING

[8] E. L. Lawler, M. D. Bell, A Method for Solving Discrete Optimization Problems.  Operations Research, Vol. 14, No. 6 (Nov. - Dec., 1966), pp. 1098-1112.

[9] E. L. Lawler, M. D. Bell, Errata: A Method for Solving Discrete Optimization Problems.  Operations Research, Vol. 15, No. 3 (May - June, 1967), p. 578.

[10] Duan Li, Xiaoling Sun, Nonlinear Integer Programming.  Publisher: Springer Science+Business Media,LLC (2006).  http://www.books.google.ca/books?isbn=0387329951

[11] Microsoft Corp., BASIC, Second Edition (May 1982), Version 1.10. Boca Raton, Florida: IBM Corp., Personal Computer, P. O. Box 1328-C,Boca Raton, Floridda 33432, 1981.

[12] Harvey M. Salkin, Integer Programming.  Menlo Park, California: Addison-Wesley Publishing Company (1975).

[13] Harvey M. Salkin, Kamlesh Mathur, Foundations of Integer Programming.  Publisher: Elsevier Science Ltd (1989).

[14] K. Schittkowski, More Test Examples for Nonlinear Programming Codes.  Springer-Verlag, 1987.

[15] S. Surjanovic, Zakharov Function.  www.sfu.ca/~ssurjano/zakharov.html

[16] Jsun Yui Wong (2012, April 23).  The Domino Method of General Integer Nonlinear Programming Applied to Problem 2 of Lawler and Bell.   http://computationalresultsfromcomputerprograms.wordpress.com/2012/04/23/

[17] Jsun Yui Wong (2013, September 4).  A Nonlinear Integer/Discrete/Continuous Programming Solver Applied to a Literature Problem with Twenty Binary Variables and Three Constraints, Third Edition.  http://myblogsubstance.typepad.com/substance/2013/09/

[18] Jsun Yui Wong (2014, June 27).  A Unified Computer Program for Schittkowski's Test Problem 377, Second Edition.  http://nonlinearintegerprogrammingsolver.blogspot.ca/2014_06_01_archive.html