OFFSET
0,3
EXAMPLE
50 is a term because 3^50-2^50 = 717897986565952681927625,
while 49 is not because 3^49-2^49 = 2392(99)328(66)7(66)7576168(77)1 (four pairs of neighbor equal digits).
MATHEMATICA
Reap[Do[id=IntegerDigits[3^m-2^m]; rm=Rest[id]-Most[id]; If[FreeQ[rm, 0], Sow[m]], {m, 0, 10000}]][[2, 1]]
CROSSREFS
KEYWORD
base,fini,full,nonn
AUTHOR
Zak Seidov, Dec 11 2009
STATUS
approved