|
|
A052072
|
|
Smallest cubes whose digits occur with the same frequency n.
|
|
5
|
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
22676697737363992239 (= 2830479^3) and its digits 2, 3, 6, 7 and 9 each occur four times.
|
|
MATHEMATICA
|
Table[i = 0;
While[x = i^3; Union@DeleteCases[DigitCount[x], 0] != {n}, i++];
Select[Range[400]^3, Length[Union[DeleteCases[DigitCount[#], 0]]]==1&] (* Harvey P. Dale, Apr 30 2022 *)
|
|
PROG
|
(Python)
a, b, c = 0, 0, 0
for i in range(10**9):
s = str(c)
for d in set(s):
if s.count(d) != n:
break
else:
return c
c += a + b + 1
b += 2*a + 3
a += 3
return 'search limit reached.' # Chai Wah Wu, Aug 11 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more,nice
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|