OFFSET
1,2
LINKS
D. Mondot, Table of n, a(n) for n=1..32699
MATHEMATICA
With[{p=12^Range[0, 300]}, Flatten[Table[Position[p, _?(Take[ IntegerDigits[ #], IntegerLength[n]]==IntegerDigits[n]&), 1, 1], {n, 80}]]]-1//Quiet (* Harvey P. Dale, Mar 03 2018 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Daniel Mondot, Sep 17 2010
STATUS
approved