login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A020330 Numbers whose base 2 representation is the juxtaposition of two identical strings. 30
3, 10, 15, 36, 45, 54, 63, 136, 153, 170, 187, 204, 221, 238, 255, 528, 561, 594, 627, 660, 693, 726, 759, 792, 825, 858, 891, 924, 957, 990, 1023, 2080, 2145, 2210, 2275, 2340, 2405, 2470, 2535, 2600, 2665, 2730, 2795, 2860, 2925, 2990, 3055, 3120, 3185, 3250 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

All differences are in union of A000051 and A001576. - Vladimir Shevelev, Dec 07 2013

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..8191

Daniel M. Kane, Carlo Sanna and Jeffrey Shallit, Waring's Theorem for Binary Powers, Combinatorica, Vol. 39, No. 6 (2019), pp. 1335-1350, arXiv preprint, arXiv:1801.04483 [math.NT], 2018.

Parthasarathy Madhusudan, Dirk Nowotka, Aayush Rajasekaran and Jeffrey Shallit, Lagrange's Theorem for Binary Squares, arXiv:1710.04247 [math.NT] 2017-2018.

Manfred Madritsch and Stephan Wagner, A central limit theorem for integer partitions, Monatshefte für Mathematik, Vol. 161, No. 1 (2010), pp. 85-114, alternative link.

Aayush Rajasekaran, Using Automata Theory to Solve Problems in Additive Number Theory, MS thesis, University of Waterloo, 2018.

FORMULA

a(n) = n + 2*n*2^floor(log_2(n)). - Ralf Stephan, Dec 07 2004

Sum_{n>=1} 1/a(n) = A330157. - Amiram Eldar, Oct 22 2020

EXAMPLE

36 is a member because 36 = 100100_2 which is 100 followed by 100.

MATHEMATICA

Table[n + 2 n 2^Floor[Log[2, n]], {n, 50}] (* T. D. Noe, Dec 10 2013 *)

PROG

(Haskell)

a020330 n = foldr (\d v -> 2 * v + d) 0 (bs ++ bs) where

   bs = a030308_row n

-- Reinhard Zumkeller, Feb 19 2013

(PARI) a(n)=n+n<<#binary(n) \\ Charles R Greathouse IV, Mar 29 2013

(PARI) is(n)=my(L=#binary(n)\2); n>>L==bitand(n, 2^L-1) \\ Charles R Greathouse IV, Mar 29 2013

(MAGMA) [n+2*n*2^Floor(Log(2, n)): n in [1..50]]; // Vincenzo Librandi, Apr 05 2018

CROSSREFS

Subsequence of A121016.

Cf. A062383, A030308, A007088, A330157.

Column k=0 of A246830, column k=1 of A246834.

Sequence in context: A186575 A233312 A330940 * A023861 A037345 A217278

Adjacent sequences:  A020327 A020328 A020329 * A020331 A020332 A020333

KEYWORD

nonn,base,easy,look,changed

AUTHOR

David W. Wilson, Melia Aldridge (ma38(AT)spruce.evansville.edu)

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 22 05:01 EDT 2020. Contains 337950 sequences. (Running on oeis4.)