

A177959


nth prime minus number of 0's in binary representation of nth prime.


1



1, 3, 4, 7, 10, 12, 14, 17, 22, 28, 31, 34, 38, 41, 46, 51, 58, 60, 63, 68, 69, 77, 80, 86, 93, 98, 101, 105, 107, 110, 127, 126, 132, 135, 145, 148, 154, 159, 164, 170, 176, 178, 190, 188, 193, 196, 208, 222, 224, 226, 230, 238, 238, 250, 250, 258, 264, 267, 272, 276
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


LINKS

Table of n, a(n) for n=1..60.


FORMULA

a(n) = A000040(n)  A035103(n).


MAPLE

A023416 := proc(n) a := 0 ; for d in convert(n, base, 2) do if d = 0 then a := a+1 ; end if; end do; a ; end proc:
A035103 := proc(n) A023416(ithprime(n)) ; end proc:
A177959 := proc(n) ithprime(n)A035103(n) ; end proc:
seq(A177959(n), n=1..120) ; # R. J. Mathar, May 30 2010


CROSSREFS

Cf. A014499, A035193, A177687.
Sequence in context: A221975 A137294 A282573 * A108855 A026488 A108579
Adjacent sequences: A177956 A177957 A177958 * A177960 A177961 A177962


KEYWORD

nonn


AUTHOR

JuriStepan Gerasimov, May 16 2010


EXTENSIONS

Corrected (39 removed, 124 replaced by 224, 126 replaced by 226) by R. J. Mathar, May 30 2010


STATUS

approved



