|
| |
|
|
A077647
|
|
Smallest term of a run of at least 8 consecutive integers which are not squarefree.
|
|
5
| |
|
|
1092747, 7216618, 8870024, 8870025, 14379271, 22635347, 24816974, 25047846, 33678771, 33908368, 33908369, 34394371, 34682346, 37923938, 49250144, 49250145, 53379270, 69147868, 69147869, 70918820, 70918821, 71927247, 72913022, 83605071, 85972019, 90571646
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| n=8870024: squares dividing n+j (j=0...8) i.e. 9 consecutive integers are as follows {4,25,121,841,4,49,961,9,16}
|
|
|
MATHEMATICA
| s8[x_] := Apply[Plus, Table[Abs[MoebiusMu[x+j]], {j, 0, 7}]] If[Equal[s, 0], Print[n]], {n, 1000000, 100000000}]
|
|
|
CROSSREFS
| Cf. A013929, A045882, A049535, A051681, A077640.
Sequence in context: A160687 A070042 A109148 * A172647 A172754 A184384
Adjacent sequences: A077644 A077645 A077646 * A077648 A077649 A077650
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Nov 18 2002
|
| |
|
|
