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

1, 16, 227, 3182, 44553, 623748, 8732479, 122254714, 1711566005, 23961924080, 335466937131, 4696537119846, 65751519677857, 12887297856859986, 2525910379944557271, 495078434469133225132, 97035373155950112125889

Offset

1,2

Links

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

Example

a(14) = (1)(2)(3)(4)(5)(6)(7)(8)(9)(A)(B)(C)(D)(10) = 123456789ABCD10_14 = 12887297856859986.

Mathematica

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

Prog

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

Crossrefs

Cf. A014897.

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: A048443, 13: A048444, 14: this sequence, 15: A048446, 16: A048447.

Sequence in context: A098301 A337900 A014897 * A028340 A166903 A230234

Adjacent sequences: A048442 A048443 A048444 * A048446 A048447 A048448

Keyword

nonn,base,easy

Author

Patrick De Geest, May 15 1999

Status

approved