A109441 Sorted union of the numbers (k + 1)^2 - 1, (2*k + 1)*(2*k + 1 - 1)/2, (2*k)^2, (2*k)*(2*k - 1)/2 for k >= 0, with duplicates removed.

0, 1, 3, 4, 6, 8, 10, 15, 16, 21, 24, 28, 35, 36, 45, 48, 55, 63, 64, 66, 78, 80, 91, 99, 100, 105, 120, 136, 143, 144, 153, 168, 171, 190, 195, 196, 210, 224, 231, 253, 255, 256, 276, 300, 324, 325, 351, 378, 400, 406, 435, 465, 484, 576, 676, 784, 900

Offset

1,3

Links

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

Mathematica

Union[Flatten[Table[{(n + 1)^2 - 1, (2*n + 1)*(2*n + 1 - 1)/2, (2*n)^2, (2*n)*(2*n - 1)/2}, {n, 0, 15}]]]

Crossrefs

Sequence in context: A260485 A120150 A262892 * A343883 A277319 A176986

Adjacent sequences: A109438 A109439 A109440 * A109442 A109443 A109444

Keyword

nonn,less

Author

Roger L. Bagula, Jun 22 2007

Extensions

Edited by Georg Fischer, Aug 14 2023

Status

approved