|
Search: id:A068140
|
|
|
| A068140 |
|
Smaller of the two consecutive numbers divisible by a cube. |
|
+0
7
|
|
| 80, 135, 296, 343, 351, 375, 512, 567, 624, 728, 783, 944, 999, 1160, 1215, 1375, 1376, 1431, 1592, 1624, 1647, 1808, 1863, 2024, 2079, 2240, 2295, 2375, 2400, 2456, 2511, 2624, 2672, 2727, 2888, 2943, 3087, 3104, 3159, 3320, 3375, 3429, 3536, 3591
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
Cubeful numbers with cubeful successors. This is to cubes as A068781 is to squares. 1375 is the smallest of three consecutive numbers divisible by a cube, since 1375 = 5^3 * 11 and 1376 = 2^5 * 43 and 1377 = 3^4 * 17. What is the smallest of four consecutive numbers divisible by a cube? Of n consecutive numbers divisible by a cube? - Jonathan Vos Post (jvospost3(AT)gmail.com), Sep 18 2007
|
|
FORMULA
|
{k such that k is in A046099 and k+1 is in A046099}. - Jonathan Vos Post (jvospost3(AT)gmail.com), Sep 18 2007
|
|
EXAMPLE
|
343 is a term as 343 = 7^3 and 344= 2^3 * 43.
|
|
MATHEMATICA
|
a = b = 0; Do[b = Max[ Transpose[ FactorInteger[n]] [[2]]]; If[a > 2 && b > 2, Print[n - 1]]; a = b, {n, 2, 5000}]
Select[Range[2, 6000], Max[Transpose[FactorInteger[ # ]][[2]]] > 2 && Max[Transpose[FactorInteger[ # + 1]][[2]]] > 2 &] - Jonathan Vos Post (jvospost3(AT)gmail.com), Sep 18 2007
|
|
CROSSREFS
|
Cf. A046099, A068781.
Sequence in context: A039400 A044003 A062376 this_sequence A107931 A134769 A043332
Adjacent sequences: A068137 A068138 A068139 this_sequence A068141 A068142 A068143
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Feb 22 2002
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 02 2002
|
|
|
Search completed in 0.002 seconds
|
