OFFSET
1,2
COMMENTS
If a(n) is prime then it is not in A000043. [Alonso del Arte, Oct 07 2011]
FORMULA
A192454(a(n))=0.
MATHEMATICA
Select[Range[0, 49], PrimePi[2^# - # - 1] == PrimePi[2^# + #] &] (* Alonso del Arte, Oct 07 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Sep 16 2011
STATUS
approved