A109826 Final terms of groups in the partition of the sequence of natural numbers A109411.

3, 4, 8, 9, 10, 15, 17, 20, 21, 22, 35, 38, 39, 42, 44, 46, 48, 49, 53, 59, 61, 62, 68, 69, 71, 73, 74, 88, 92, 93, 94, 95, 98, 103, 105, 106, 108, 110, 111, 114, 115, 125, 127, 134, 139, 143, 145, 146, 148, 150, 152, 158, 159, 161, 164, 169, 171, 174, 178, 183, 189

Offset

1,1

Links

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

Mathematica

s={3}; a=4; Do[Do[If[Plus@@Last/@FactorInteger[(a+x)(x-a+1)/2]==2, a=x+1; AppendTo[s, x]; Break[]], {x, a, 20000}], {k, 1, 100}]; A109826=s

Crossrefs

Cf. A109411, A109825.

Sequence in context: A075746 A342791 A275096 * A228145 A243064 A057549

Adjacent sequences: A109823 A109824 A109825 * A109827 A109828 A109829

Keyword

nonn

Author

Zak Seidov, Jul 03 2005

Status

approved