A031344 Write primes in base 10 but interpret as if in base 12.
2, 3, 5, 7, 13, 15, 19, 21, 27, 33, 37, 43, 49, 51, 55, 63, 69, 73, 79, 85, 87, 93, 99, 105, 115, 145, 147, 151, 153, 159, 175, 181, 187, 189, 201, 205, 211, 219, 223, 231, 237, 241, 253, 255, 259, 261, 301, 315, 319, 321, 327, 333, 337, 349, 355
Offset: 1
Programs
-
Maple
A102487 := proc(n) local dgs; dgs := convert(n,base,10) ; add(op(d,dgs)*12^(d-1), d=1..nops(dgs)) ; end proc: A031344 := proc(n) A102487(ithprime(n)) ; end proc: # R. J. Mathar, Apr 09 2011