A183872 n+floor(sqrt(5n)); complement of A183873.

3, 5, 6, 8, 10, 11, 12, 14, 15, 17, 18, 19, 21, 22, 23, 24, 26, 27, 28, 30, 31, 32, 33, 34, 36, 37, 38, 39, 41, 42, 43, 44, 45, 47, 48, 49, 50, 51, 52, 54, 55, 56, 57, 58, 60, 61, 62, 63, 64, 65, 66, 68, 69, 70, 71, 72, 73, 75, 76, 77, 78, 79, 80, 81, 83, 84, 85, 86, 87, 88, 89, 90, 92, 93, 94, 95, 96, 97, 98, 100, 101, 102, 103, 104, 105, 106, 107, 108, 110, 111, 112, 113, 114, 115, 116, 117, 119, 120, 121, 122

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Cf. A183873.

Sequence in context: A078339 A174805 A354140 * A288934 A186356 A184582

Adjacent sequences: A183869 A183870 A183871 * A183873 A183874 A183875

Keyword

nonn,easy

Author

Clark Kimberling, Jan 07 2011

Status

approved