cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

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

This page as a plain text file.
%I A048445 #24 Jun 13 2025 10:49:06
%S A048445 1,16,227,3182,44553,623748,8732479,122254714,1711566005,23961924080,
%T A048445 335466937131,4696537119846,65751519677857,12887297856859986,
%U A048445 2525910379944557271,495078434469133225132,97035373155950112125889,19018933138566221976674262,3727710895158979507428155371
%N A048445 Take the first n numbers written in base 14, concatenate them, then convert from base 14 to base 10.
%H A048445 Vincenzo Librandi, <a href="/A048445/b048445.txt">Table of n, a(n) for n = 1..200</a>
%e A048445 a(14) = (1)(2)(3)(4)(5)(6)(7)(8)(9)(A)(B)(C)(D)(10) = 123456789ABCD10_14 = 12887297856859986.
%t A048445 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 *)
%t A048445 f[n_]:= FromDigits[Flatten@IntegerDigits[Range@n, 14], 14]; Array[f, 20] (* _Vincenzo Librandi_, Dec 30 2012 *)
%o A048445 (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
%Y A048445 Cf. A014897.
%Y A048445 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.
%K A048445 nonn,base,easy
%O A048445 1,2
%A A048445 _Patrick De Geest_, May 15 1999