OFFSET
0,2
COMMENTS
Supersequence of A032822.
EXAMPLE
1111 is in the sequence because 1*1*1*1 = 1 = 4^0.
MATHEMATICA
FromDigits /@ Select[Join @@ Map[Tuples[2^Range[0, 3], #] &, Range@ 4], IntegerQ@ Log[4, Times @@ #] &] (* Michael De Vlieger, Mar 25 2017 *)
PROG
(Magma) Set(Sort([n: n in [1..10000], k in [0..20] | &*Intseq(n) eq 4^k]))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Mar 25 2017
STATUS
approved