OFFSET
1,3
COMMENTS
Integers in A007377 / 3. - M. F. Hasler, Mar 07 2014
LINKS
Eric Weisstein's World of Mathematics, Zero
MATHEMATICA
Select[Range[0, 30], DigitCount[8^#, 10, 0]==0&] (* Harvey P. Dale, Jul 13 2016 *)
PROG
(PARI) select( is(n)=vecmin(digits(8^n)), [0..30]) \\ M. F. Hasler, Mar 07 2014
(Magma) [n: n in [0..500] | not 0 in Intseq(8^n)]; // Vincenzo Librandi, Mar 08 2014
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
Several edits (offset 1, initial 0, title rephrased) by M. F. Hasler, Mar 07 2014
STATUS
approved