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.

A045507 Concatenate powers of 2.

This page as a plain text file.
%I A045507 #34 Jul 26 2025 19:44:46
%S A045507 1,12,124,1248,124816,12481632,1248163264,1248163264128,
%T A045507 1248163264128256,1248163264128256512,12481632641282565121024,
%U A045507 124816326412825651210242048,1248163264128256512102420484096,12481632641282565121024204840968192,1248163264128256512102420484096819216384
%N A045507 Concatenate powers of 2.
%D A045507 A. Murthy, Smarandache Notions Journal, Vol. 11 N. 1-2-3 Spring 2000. [_Felice Russo_, Nov 15 1999]
%H A045507 Vincenzo Librandi, <a href="/A045507/b045507.txt">Table of n, a(n) for n = 0..80</a>
%e A045507 a(2) = 124 because it is the concatenation of 2^0, 2^1 and 2^2.
%p A045507 a:= proc(n) option remember;
%p A045507       `if`(n<0, 0, parse(cat(a(n-1), 2^n)))
%p A045507     end:
%p A045507 seq(a(n), n=0..14);  # _Alois P. Heinz_, Jul 26 2025
%t A045507 Join[{1}, FromDigits/@Flatten/@IntegerDigits/@Flatten/@Rest[FoldList[List, {1}, 2^Range[25]]]] (* _Vincenzo Librandi_, Aug 10 2017 *)
%o A045507 (Magma) [Seqint(Reverse(&cat[Reverse(Intseq(2^k)): k in [0..n]])): n in [0..17]]; // _Vincenzo Librandi_, Aug 10 2017
%Y A045507 Cf. A000079, A007908.
%K A045507 nonn,base
%O A045507 0,2
%A A045507 _Jeff Burch_