login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A262882 Right diagonal of A262881. 1
0, 1, 2, 3, 3, 5, 6, 7, 7, 7, 7, 11, 11, 13, 14, 15, 15, 15, 15, 15, 15, 15, 15, 23, 23, 23, 23, 27, 27, 29, 30, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 47, 47, 47, 47, 47, 47, 47, 47, 55, 55, 55, 55, 59, 59, 61, 62, 63, 63, 63, 63, 63 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

COMMENTS

It appears that the sequence of unique terms is A089633, and that their run lengths are 1, 1, 1, 2, 1, 1, 4, 2, 1, 1, 8, ...: A155038.

LINKS

Table of n, a(n) for n=0..67.

MATHEMATICA

Last /@ Table[SortBy[Range@ k, And[Total@ IntegerDigits[#, 2], k] &], {k, 67}] (* Michael De Vlieger, Oct 04 2015 *)

PROG

(PARI) cmph(i, j) = if (hammingweight(i) != hammingweight(j), hammingweight(i) - hammingweight(j), i - j);

row(n) = my(v = vector(n+1, k, k-1)); vecsort(v, cmph);

lista(nn) = {for (n=0, nn, my(r = srow(n)); print1(r[#r], ", "); ); }

CROSSREFS

Cf. A089633, A155038, A262881.

Sequence in context: A255563 A115350 A320034 * A187043 A081211 A081213

Adjacent sequences:  A262879 A262880 A262881 * A262883 A262884 A262885

KEYWORD

nonn,base

AUTHOR

Michel Marcus, Oct 04 2015

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 July 17 20:45 EDT 2019. Contains 325109 sequences. (Running on oeis4.)