|
Search: id:A069021
|
|
|
| A069021 |
|
Start of the first occurrence of n consecutive numbers divisible by a square. |
|
+0 3
|
|
| 1, 8, 48, 242, 844, 22020, 217070, 1092747, 8870024, 221167422, 221167422, 47255689915, 82462576220, 1043460553364, 79180770078548, 3215226335143218, 23742453640900972
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
MAPLE
|
a = {1, 1}; k = 4; Do[ While[ Min[a] < 2, k++; a = Drop[a, 1]; a = Append[ a, Max[ Transpose[ FactorInteger[k]] [[2]] ]]]; Print[k - n + 1]; k++; a = Append[ a, Max[ Transpose[ FactorInteger[k]] [[2]] ]], {n, 2, 9}]
|
|
CROSSREFS
|
Apart from first term, identical to A045882.
Sequence in context: A087914 A081084 A073390 this_sequence A079763 A079785 A002697
Adjacent sequences: A069018 A069019 A069020 this_sequence A069022 A069023 A069024
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Apr 02 2002
|
|
|
Search completed in 0.002 seconds
|