Mon Feb 23 09:22:30 2026 

golden_section_test():
  R version 4.1.2 (2021-11-01) 
  golden_section() seeks the maximum of a function using golden section.

  golden_section(-x^2+4*x+1, 1, 3, 1.0-3) =  2.00028 

golden_section_test():
  Normal end of execution.
Mon Feb 23 09:22:30 2026