OFFSET
1,2
COMMENTS
LINKS
Paul Tek, Table of n, a(n) for n = 1..10000
Paul Tek, PERL program for this sequence
PROG
(PARI) a(n) = {j = hammingweight(n); v = vector(n, k, hammingweight(k)); i = #select(x->x==j, v); nb = 0; k = 0; while(nb != j, k++; if (hammingweight(k) == i, nb++)); k; } \\ Michel Marcus, Oct 16 2015
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Paul Tek, Oct 07 2015
STATUS
approved