|
| |
|
|
A122692
|
|
Cubeful numbers such that their neighbors are also cubeful.
|
|
1
| |
|
|
1376, 4375, 4913, 5751, 6859, 13311, 13376, 16120, 21249, 22625, 22626, 24353, 25624, 28376, 31375, 32751, 33615, 40473, 41743, 48249, 49625, 49735, 52624, 55376, 57968, 58375, 59751, 75249, 76625, 79624, 82376, 85375, 86751, 90208
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 1376 is divisible by 8 and its neighbors 1375 and 1377 are divisible by 125 and 27 correspondingly.
|
|
|
MATHEMATICA
| Select[Range[2, 100000], Max[Transpose[FactorInteger[ # ]][[2]]] >= 3 && Max[Transpose[FactorInteger[ # + 1]][[2]]] >= 3 && Max[Transpose[FactorInteger[ # - 1]][[2]]] >= 3 &]
|
|
|
CROSSREFS
| Cf. Subsequence of A068140 - Smaller of the two consecutive numbers divisible by a cube.
Sequence in context: A056049 A206340 A056087 * A076760 A204056 A204049
Adjacent sequences: A122689 A122690 A122691 * A122693 A122694 A122695
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Tanya Khovanova (tanyakh(AT)yahoo.com), Oct 21 2006
|
| |
|
|
