1,2

I conjecture that 106 is the last term.

Select[ Range@10000, FreeQ[ IntegerDigits[3^# ], 4] &]

Cf. A007377.

Adjacent sequences: A131615 A131616 A131617 this_sequence A131619 A131620 A131621

Sequence in context: A113498 A036796 A039123 this_sequence A039257 A039198 A039149

base,fini,nonn

Shyam Sunder Gupta (guptass(AT)rediffmail.com), Sep 01 2007