A184114 n + floor(5*sqrt(n-1)); complement of A184115.

1, 7, 10, 12, 15, 17, 19, 21, 23, 25, 26, 28, 30, 32, 33, 35, 37, 38, 40, 41, 43, 44, 46, 47, 49, 51, 52, 53, 55, 56, 58, 59, 61, 62, 64, 65, 67, 68, 69, 71, 72, 74, 75, 76, 78, 79, 80, 82, 83, 85, 86, 87, 89, 90, 91, 93, 94, 95, 97, 98, 99, 101, 102, 103, 105, 106, 107, 108, 110, 111, 112, 114, 115, 116, 118, 119, 120, 121, 123, 124, 125, 127, 128, 129, 130, 132, 133, 134, 135, 137, 138, 139, 140, 142, 143, 144, 145, 147, 148, 149

Offset

1,2

Links

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

Formula

a(n) = n + floor(5*sqrt(n-1))

Mathematica

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

Crossrefs

Cf. A184115.

Sequence in context: A024586 A050419 A089373 * A345478 A295797 A153040

Adjacent sequences: A184111 A184112 A184113 * A184115 A184116 A184117

Keyword

nonn,easy

Author

Clark Kimberling, Jan 09 2011

Status

approved