Sat Jun 12 23:30:03 2021 

local_min_test():
  R version 3.4.4 (2018-03-15) 
  Test local_min(),
  a local minimizer of a function F(X)
  in an interval [A,B].

g_01(x) <- ( x - 2 ) * ( x - 2 ) + 1

      A                 X             B
    F(A)              F(X)          F(B)

   0    2    3.141593 
   5    1    2.303234 
  Number of calls to F =  6 

g_02(x) <- x * x + exp ( - x )

      A                 X             B
    F(A)              F(X)          F(B)

   0    0.3517337    1 
   1    0.827184    1.367879 
  Number of calls to F =  9 

g_03(x) <- x^4 + 2x^2 + x + 3

      A                 X             B
    F(A)              F(X)          F(B)

   -2    -0.2367329    2 
   25    2.878493    29 
  Number of calls to F =  12 

g_04(x) <- exp ( x ) + 1 / ( 100 x )

      A                 X             B
    F(A)              F(X)          F(B)

   1e-04    0.09534462    1 
   101.0001    1.204921    2.728282 
  Number of calls to F =  14 

g_05(x) <- exp ( x ) - 2x + 1/(100x) - 1/(1000000x^2)

      A                 X             B
    F(A)              F(X)          F(B)

   2e-04    0.7032048    2 
   25.9998    0.6280257    3.394056 
  Number of calls to F =  11 

g_06(x) <- -x*sin(10*pi*x)-1.0

      A                 X             B
    F(A)              F(X)          F(B)

   1.8    1.850547    1.9 
   -1    -2.850274    -1 
  Number of calls to F =  9 

g_07(x) <- max(-2(x-1),8(x-1)) + 25*(x-1)^2

      A                 X             B
    F(A)              F(X)          F(B)

   -1.2    1    2.7 
   125.4    1.936188e-08    85.85 
  Number of calls to F =  38 

local_min_test():
  Normal end of execution.

Sat Jun 12 23:30:03 2021