OFFSET
1,1
COMMENTS
See A198735 for a guide to related sequences.
EXAMPLE
x=4.89312267296329905539673190581...
min=-2.09298678025110342592267820...
MATHEMATICA
f[t_] := Sin[t] + Cos[t]
x = Minimize[f[t] + f[2 t], t]
N[x, 30]
(RealDigits[N[{#1[[1]], t /. #1[[2]]}, 110]] &)[x]
Plot[f[t] + f[2 t], {t, -3 Pi, 3 Pi}]
PROG
(PARI) solve(x=4, 5, cos(x)-sin(x)+2*cos(2*x)-2*sin(2*x)) \\ Charles R Greathouse IV, May 17 2026
CROSSREFS
KEYWORD
AUTHOR
Clark Kimberling, Oct 29 2011
STATUS
approved
