1,2
I conjecture that 101 is the last term.
Select[ Range@10000, FreeQ[ IntegerDigits[3^# ], 7] &]
Cf. A007377.
Sequence in context: A035259 A047614 A189625 * A166110 A087815 A022549
Adjacent sequences: A131612 A131613 A131614 * A131616 A131617 A131618
base,fini,nonn
Shyam Sunder Gupta (guptass(AT)rediffmail.com), Sep 01 2007