A048443 Take the first n numbers written in base 12, concatenate them, then convert from base 12 to base 10.

1, 14, 171, 2056, 24677, 296130, 3553567, 42642812, 511713753, 6140565046, 73686780563, 10610896401084, 1527969081756109, 220027547772879710, 31683966879294678255, 4562491230618433668736, 656998737209054448298001

Offset

1,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..200

Example

a(12) = (1)(2)(3)(4)(5)(6)(7)(8)(9)(A)(B)(10) = 123456789AB10_12 = 10610896401084.

Mathematica

If[STARTPOINT==1, n={}, n=Flatten[IntegerDigits[Range[STARTPOINT-1], 12]]]; Table[AppendTo[n, IntegerDigits[w, 12]]; n=Flatten[n]; FromDigits[n, 12], {w, STARTPOINT, ENDPOINT}] (* Dylan Hamilton, Aug 11 2010 *)
f[n_]:= FromDigits[Flatten@IntegerDigits[Range@n, 12], 12]; Array[f, 20] (* Vincenzo Librandi, Dec 30 2012 *)

Prog

(Magma) [n eq 1 select 1 else Self(n-1)*12^(1+Ilog(12, n))+n: n in [1..20]]; // Vincenzo Librandi, Dec 30 2012

Crossrefs

Cf. A014882.

Concatenation of first n numbers in other bases: 2: A047778, 3: A048435, 4: A048436, 5: A048437, 6: A048438, 7: A048439, 8: A048440, 9: A048441, 10: A007908, 11: A048442, 12: this sequence, 13: A048444, 14: A048445, 15: A048446, 16: A048447.

Sequence in context: A254811 A099158 A014882 * A191690 A016136 A277940

Adjacent sequences: A048440 A048441 A048442 * A048444 A048445 A048446

Keyword

nonn,base,easy

Author

Patrick De Geest, May 15 1999

Status

approved