OFFSET
1,1
COMMENTS
Primes such that A104260(n) is prime.
EXAMPLE
181 is a member since sum of odd digits=2.
MATHEMATICA
soQ[n_]:=PrimeQ[Total[Select[IntegerDigits[n], OddQ[#] &]]]; Select[Prime[Range[132]], soQ[#] &]
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
Jayanta Basu, May 23 2013
STATUS
approved