OFFSET
0,1
EXAMPLE
23 can be written as the sum of a Sophie Germain prime and a practical number in the following three ways: 3 + 20, 5 + 18, 11 + 12.
Since 23 is the smallest number that can be expressed like that in exactly three ways, a(3) = 23.
PROG
(PARI) \\ First define the function is_a005153(n) as in A005153
is_a005384(n) = ispseudoprime(n) && ispseudoprime(2*n+1)
count(n) = x=1; y=n-1; i=0; while(y > n/2, if((is_a005153(x) && is_a005384(y)) || (is_a005153(y) && is_a005384(x)), i++); x++; y--); i
a(n) = k=2; while(count(k)!=n, k++); k
CROSSREFS
KEYWORD
nonn
AUTHOR
Felix Fröhlich, Sep 06 2015
STATUS
approved