OFFSET
1,2
COMMENTS
I conjecture that 43 is the last term.
MATHEMATICA
Select[ Range@10000, FreeQ[ IntegerDigits[3^# ], 1] &]
PROG
(Magma) [n: n in [0..1000] | not 1 in Intseq(3^n) ]; // Vincenzo Librandi, May 06 2015
CROSSREFS
KEYWORD
base,fini,nonn
AUTHOR
Shyam Sunder Gupta, Sep 01 2007
STATUS
approved