A184014 n + floor(sqrt(e*n)); complement of A184015.

2, 4, 5, 7, 8, 10, 11, 12, 13, 15, 16, 17, 18, 20, 21, 22, 23, 24, 26, 27, 28, 29, 30, 32, 33, 34, 35, 36, 37, 39, 40, 41, 42, 43, 44, 45, 47, 48, 49, 50, 51, 52, 53, 54, 56, 57, 58, 59, 60, 61, 62, 63, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 138

Offset

1,1

Links

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

Formula

a(n) = n + floor(sqrt(e*n))

Mathematica

a=E; b=0;
Table[n+Floor[(a*n+b)^(1/2)], {n, 120}]
Table[n-1+Ceiling[(n*n-b)/a], {n, 80}]

Crossrefs

Cf. A184015.

Sequence in context: A062102 A092289 A079358 * A183856 A183869 A224731

Adjacent sequences: A184011 A184012 A184013 * A184015 A184016 A184017

Keyword

nonn,easy

Author

Clark Kimberling, Jan 09 2011

Status

approved