OFFSET
1,1
COMMENTS
A113630(n) = 1 + 2*n + 3*n^2 + 4*n^3 + 5*n^4 + 6*n^5 + 7*n^6 + 8*n^7 + 9*n^8.
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..2434
EXAMPLE
See example section of A113630.
PROG
(Python)
from sympy import isprime
A249951_list, m = [], [362880, -1229760, 1607760, -1011480, 309816, -40752, 1584, -4, 1]
for n in range(1, 10**5+1):
....for i in range(8):
........m[i+1]+= m[i]
....if isprime(m[-1]):
........A249951_list.append(n)
(PARI) for(n=1, 5000, s=sum(i=1, 9, i*n^(i-1)); if(ispseudoprime(s), print1(n, ", "))) \\ Derek Orr, Nov 09 2014
(Magma) [n: n in [0..1500] | IsPrime(1+2*n+3*n^2+4*n^3+ 5*n^4+6*n^5+7*n^6+8*n^7+9*n^8)]; // Vincenzo Librandi, Nov 09 2014
(Haskell)
a249951 n = a249951_list !! (n-1)
a249951_list = filter ((== 1) . a010051'' . a113630) [1..]
-- Reinhard Zumkeller, Nov 22 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Chai Wah Wu, Nov 09 2014
STATUS
approved