A190279 a(n) = n + [nr/s] + [nt/s]; r=1/2, s=sinh(1), t=cosh(1).

2, 4, 7, 10, 13, 15, 18, 21, 23, 27, 29, 32, 35, 37, 40, 43, 46, 48, 51, 54, 56, 59, 62, 65, 67, 71, 73, 75, 79, 81, 84, 87, 90, 92, 94, 98, 100, 103, 106, 109, 111, 114, 117, 119, 123, 125, 127, 131, 133, 136, 138, 142, 144, 146, 150, 152, 155, 158, 161, 163, 166, 169, 171, 175, 177, 180, 182, 185, 188, 190, 194, 196, 199, 202, 204, 207

Offset

1,1

Comments

See A190265.

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Formula

A190265: a(n)=n+[2n*sinh(1)]+[2n*cosh(1)].

A190279: b(n)=n+[(n/2)*csch(1)]+[n*coth(1)].

A190280: c(n)=n+[(n/2)*sech(1)]+[n*tanh(1)].

Mathematica

r=1/2; s=Sinh[1]; t=Cosh[1];
a[n_] := n + Floor[n*s/r] + Floor[n*t/r];
b[n_] := n + Floor[n*r/s] + Floor[n*t/s];
c[n_] := n + Floor[n*r/t] + Floor[n*s/t];
Table[a[n], {n, 1, 120}]  (*A190265*)
Table[b[n], {n, 1, 120}]  (*A190279*)
Table[c[n], {n, 1, 120}]  (*A190280*)

Crossrefs

Cf. A190265, A190280.

Sequence in context: A080137 A102933 A122019 * A186325 A272059 A033627

Adjacent sequences: A190276 A190277 A190278 * A190280 A190281 A190282

Keyword

nonn

Author

Clark Kimberling, May 07 2011

Status

approved