A184589 floor(n*e-1); complement of A184590.

1, 4, 7, 9, 12, 15, 18, 20, 23, 26, 28, 31, 34, 37, 39, 42, 45, 47, 50, 53, 56, 58, 61, 64, 66, 69, 72, 75, 77, 80, 83, 85, 88, 91, 94, 96, 99, 102, 105, 107, 110, 113, 115, 118, 121, 124, 126, 129, 132, 134, 137, 140, 143, 145, 148, 151, 153, 156, 159, 162, 164, 167, 170, 172, 175, 178, 181, 183, 186, 189, 191, 194, 197, 200, 202, 205, 208, 211, 213, 216, 219, 221, 224, 227, 230, 232, 235, 238, 240, 243, 246, 249, 251, 254, 257, 259, 262, 265, 268, 270, 273, 276, 278, 281, 284, 287, 289, 292, 295, 298, 300, 303, 306, 308, 311, 314, 317, 319, 322, 325

Offset

1,2

Links

Table of n, a(n) for n=1..120.

Formula

a(n)=floor(n*e-1).

Mathematica

r=E; c=1/E; s=r/(r-1);
Table[Floor[n*r-c*r], {n, 1, 120}]  (* A184589 *)
Table[Floor[n*s+c*s], {n, 1, 120}]  (* A184590 *)

Crossrefs

Cf. A184590.

Sequence in context: A247985 A190438 A189526 * A062458 A180122 A080902

Adjacent sequences: A184586 A184587 A184588 * A184590 A184591 A184592

Keyword

nonn

Author

Clark Kimberling, Jan 17 2011

Status

approved