|
Search: id:A077647
|
|
|
| A077647 |
|
Smallest term of a run of at least 8 consecutive integers which are not square-free. |
|
+0
6
|
|
| 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; listen)
|
|
|
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: A081638 A070042 A109148 this_sequence A086212 A060087 A035613
Adjacent sequences: A077644 A077645 A077646 this_sequence A077648 A077649 A077650
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Nov 18 2002
|
|
|
Search completed in 0.002 seconds
|
