login
A184744
floor(nr+h), where r=1+1/e, h=1/2; complement of A184745.
2
1, 3, 4, 5, 7, 8, 10, 11, 12, 14, 15, 16, 18, 19, 21, 22, 23, 25, 26, 27, 29, 30, 31, 33, 34, 36, 37, 38, 40, 41, 42, 44, 45, 47, 48, 49, 51, 52, 53, 55, 56, 57, 59, 60, 62, 63, 64, 66, 67, 68, 70, 71, 72, 74, 75, 77, 78, 79, 81, 82, 83, 85, 86, 88, 89, 90, 92, 93, 94, 96, 97, 98, 100, 101, 103, 104, 105, 107, 108, 109, 111, 112, 114, 115, 116, 118, 119, 120, 122, 123, 124, 126, 127, 129, 130, 131, 133, 134, 135, 137, 138, 140, 141, 142, 144, 145, 146, 148, 149, 150, 152, 153, 155, 156, 157, 159, 160, 161, 163, 164
OFFSET
1,2
FORMULA
a(n)=floor(nr+h), where r=1+1/e, h=1/2.
MATHEMATICA
r=1+1/E; h=1/2; s=r/(r-1);
Table[Floor[n*r+h], {n, 1, 120}] (* A184744 *)
Table[Floor[n*s+h-h*s], {n, 1, 120}] (* A184745 *)
CROSSREFS
Cf. A184745.
Sequence in context: A367107 A298108 A330993 * A063732 A047367 A184620
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 20 2011
STATUS
approved