close
login
A378558
Powers of 4 that do not include the digit 4.
0
1, 16, 256, 65536, 16777216, 1099511627776
OFFSET
1,2
COMMENTS
Any additional terms have an exponent of at least 10^5.
MATHEMATICA
Select[4^Range[0, 100000], Not[MemberQ[IntegerDigits[#], 4]]&]
Select[4^Range[0, 500], DigitCount[#, 10, 4]==0&] (* Harvey P. Dale, Sep 25 2025 *)
CROSSREFS
Cf. A000302.
Sequence in context: A204080 A223433 A223593 * A067223 A041113 A363689
KEYWORD
nonn,base,hard,more
AUTHOR
Erich Friedman, Nov 30 2024
STATUS
approved