OFFSET
1,1
COMMENTS
Sum of reciprocals = 0.009708741068395080316898549713.. Are these primes infinite?
The next term (a(8)) has 148 digits. - Harvey P. Dale, Dec 15 2018
EXAMPLE
3*3^3 + 2*3^2 + 3 + 1 = 103.
MATHEMATICA
Select[Accumulate[Join[{1}, Table[n*3^n, {n, 200}]]], PrimeQ] (* Harvey P. Dale, Dec 15 2018 *)
PROG
(PARI) trajpolyp(n1, k) = { s=0; for(x1=0, n1, y1 = polypn2(k, x1); if(isprime(y1), print1(y1", "); s+=1.0/y1; ) ); print(); print(s) } polypn2(n, p) = { x=n; y=1; for(m=0, p, y=y+m*x^m; ); return(y) }
CROSSREFS
KEYWORD
nonn
AUTHOR
Cino Hilliard, Nov 20 2003
EXTENSIONS
More terms from Harvey P. Dale, Dec 15 2018
STATUS
approved