OFFSET
1,3
PROG
(PARI) tptothetp3(n) = { local(x, s, a); default(realprecision, 200); s=0; forprime(x=3, n, if(isprime(x+2), s+=1./x^(x+2))); a=Vec(Str(s)); for(x=3, n, print1(eval(a[x]), ", ")); print(); print(s) }
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Cino Hilliard, Jul 31 2004
STATUS
approved