[go: up one dir, main page]

login
A052044
Numbers k such that k^3 lacks the digit zero in its decimal expansion.
10
1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 14, 15, 17, 18, 19, 21, 23, 24, 25, 26, 27, 28, 29, 31, 32, 33, 35, 36, 38, 39, 41, 44, 45, 46, 49, 51, 53, 54, 55, 56, 57, 58, 61, 62, 64, 65, 66, 68, 71, 72, 75, 76, 77, 78, 81, 82, 83, 85, 88, 91, 92, 95, 96, 97, 98, 104, 105, 108, 111
OFFSET
1,2
COMMENTS
This sequence is infinite since A052427 is a subsequence. - Amiram Eldar, Nov 23 2020
FORMULA
a(n) = A052045(n)^(1/3). - Amiram Eldar, Nov 23 2020
MATHEMATICA
Select[Range[120], DigitCount[#^3, 10, 0]==0&] (* Harvey P. Dale, Oct 24 2011 *)
PROG
(PARI) is(n)=vecmin(digits(n^3))>0 \\ Charles R Greathouse IV, Oct 11 2013
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Dec 15 1999
STATUS
approved