[go: up one dir, main page]

login
Revision History for A090001 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
Length of longest contiguous block of 1's in binary expansion of n^2.
(history; published version)
#7 by Harvey P. Dale at Fri Nov 28 14:05:59 EST 2014
STATUS

editing

approved

#6 by Harvey P. Dale at Fri Nov 28 14:05:52 EST 2014
LINKS

Harvey P. Dale, <a href="/A090001/b090001.txt">Table of n, a(n) for n = 0..1000</a>

STATUS

approved

editing

#5 by Harvey P. Dale at Fri Nov 28 14:04:17 EST 2014
STATUS

editing

approved

#4 by Harvey P. Dale at Fri Nov 28 14:04:11 EST 2014
MATHEMATICA

Join[{0}, Table[Max[Length/@Select[Split[IntegerDigits[n^2, 2]], MemberQ[ #, 1]&]], {n, 110}]] (* Harvey P. Dale, Nov 28 2014 *)

STATUS

approved

editing

#3 by Russ Cox at Fri Mar 30 18:50:42 EDT 2012
AUTHOR

_Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), _, Nov 20 2003

Discussion
Fri Mar 30
18:50
OEIS Server: https://oeis.org/edit/global/246
#2 by N. J. A. Sloane at Fri Jan 09 03:00:00 EST 2009
KEYWORD

nonn,base,new

AUTHOR

Reinhard Zumkeller (reinhard.zumkeller(AT)lhsystemsgmail.com), Nov 20 2003

#1 by N. J. A. Sloane at Thu Feb 19 03:00:00 EST 2004
NAME

Length of longest contiguous block of 1's in binary expansion of n^2.

DATA

0, 1, 1, 1, 1, 2, 1, 2, 1, 1, 2, 4, 1, 1, 2, 3, 1, 1, 1, 2, 2, 3, 4, 1, 1, 3, 1, 2, 2, 2, 3, 4, 1, 1, 1, 2, 1, 2, 2, 5, 2, 2, 3, 3, 4, 6, 1, 1, 1, 2, 3, 1, 1, 5, 2, 4, 2, 2, 2, 2, 3, 3, 4, 5, 1, 1, 1, 2, 1, 2, 2, 3, 1, 2, 2, 6, 2, 3, 5, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 6, 2, 1, 3, 1, 2, 1, 2, 2, 2, 3, 5

OFFSET

0,6

COMMENTS

a(n) = A038374(A000290(n)).

KEYWORD

nonn,base

AUTHOR

Reinhard Zumkeller (reinhard.zumkeller(AT)lhsystems.com), Nov 20 2003

STATUS

approved