A180692 12^a(n) is smallest power of 12 beginning with n.
0, 4, 7, 8, 9, 10, 11, 12, 25, 13, 26, 1, 27, 2, 15, 28, 3, 16, 29, 4, 42, 17, 30, 5, 43, 18, 56, 31, 6, 44, 19, 57, 95, 32, 7, 45, 83, 20, 58, 134, 33, 8, 46, 84, 122, 21, 97, 135, 34, 72, 9, 47, 85, 123, 22, 60, 98, 136, 35, 73, 10, 149, 48, 86, 124, 23, 61, 200, 99, 36, 175, 74
Offset: 1
Links
- D. Mondot, Table of n, a(n) for n=1..32699
Programs
-
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 *)