|
%I #9 Sep 08 2022 08:45:31
%S 0,2,3,4,6,7,8,10,11,14,19,27,28,34,40,50,55,84
%N Numbers k such that the decimal expansion of 3^k contains no 3.
%C I conjecture that 84 is the last term.
%t Join[{0}, Select[ Range@10000, FreeQ[ IntegerDigits[3^# ], 3] &]
%o (Magma) [n: n in [0..1000] | not 3 in Intseq(3^n) ]; // _Vincenzo Librandi_, May 06 2015
%Y Cf. similar sequences listed in A131613.
%Y Cf. A007377, A136291.
%K base,fini,nonn
%O 1,2
%A _Shyam Sunder Gupta_, Sep 01 2007
%E Initial 0 added and Mathematica code adapted by _Vincenzo Librandi_, May 06 2015
|
