OFFSET
1,1
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..500 (first 40 terms from Charles R Greathouse IV)
EXAMPLE
Primes p(k) such that
A035103(p(k)) = 0: 3, 7, 31, 127, 8191,...
A035103(p(k)) = 1: 2, 5, 11, 13, 23, 29,...
A035103(p(k)) = 2: 19, 43, 53, 79, 103, 107,...
A035103(p(k)) = 3: 17, 37, 41, 71, 83, 89, 101,...
A035103(p(k)) = 4: 67, 73, 97, 139, 149, 163,...
A035103(p(k)) = 5: 131, 137, 193, 263, 269, 277,...
PROG
(PARI) nz(n)=#binary(n)-hammingweight(n)
a(n)=my(k=n); forprime(p=2, , if(nz(p)==n&&k--==0, return(p))) \\ Charles R Greathouse IV, Feb 04 2014
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
Irina Gerasimova, Jan 30 2014
EXTENSIONS
New name from Ralf Stephan and Charles R Greathouse IV, Feb 04 2014
a(14)-a(27) from Charles R Greathouse IV, Feb 04 2014
a(28)-a(31) from Giovanni Resta, Feb 04 2014
STATUS
approved