|
%I #29 Sep 08 2022 08:44:50
%S 0,1,2,3,4,5,6,7,8,12,17,24,29,44
%N Decimal expansion of 6^n contains no zeros (probably finite).
%H W. Schneider, <a href="/A007496/a007496.html">NoZeros: Powers n^k without Digit Zero</a> [Cached copy]
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Zero.html">Zero</a>
%t Select[Range[50],FreeQ[IntegerDigits[6^#],0]&] (* _Harvey P. Dale_, Feb 26 2017 *)
%o (PARI) for(n=0, 199, vecmin(digits(6^n))&& print1(n", ")) \\ _M. F. Hasler_, Mar 07 2014
%o (Magma) [n: n in [0..500] | not 0 in Intseq(6^n)]; // _Vincenzo Librandi_, Mar 08 2014
%Y Cf. A007377, A008839, A030700, A305926.
%K nonn,base
%O 1,3
%A _Eric W. Weisstein_
%E Offset corrected and initial 0 added by _M. F. Hasler_, Mar 07 2014
|
