OFFSET
1,2
COMMENTS
See A190326.
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
FORMULA
MAPLE
r:=1/2: s:=sinh(Pi/2): t:=cosh(Pi/2): seq(n+floor(n*r/t)+floor(n*s/t), n=1..80); # Muniru A Asiru, Apr 05 2018
MATHEMATICA
PROG
(PARI) for(n=1, 100, print1(n + floor(n/(2*cosh(Pi/2))) + floor(n*tanh(Pi/2)), ", ")) \\ G. C. Greubel, Apr 04 2018
(Magma) R:=RealField(); [n + Floor(n/(2*Cosh(Pi(R)/2))) + Floor(n*Tanh(Pi(R)/2)): n in [1..100]]; // G. C. Greubel, Apr 04 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, May 08 2011
STATUS
approved