editing
approved
editing
approved
a:=[]: for n from 0 to 100 do m:=add(a[i+1]*binomial(n, i), i=0..n-1): a:=[op(a), nextprime(m)-m] od: op(a); (# C. Ronaldo)
approved
editing
_Amarnath Murthy (amarnath_murthy(AT)yahoo.com), _, Nov 26 2003
2, 1, 1, 3, 5, 1, 3, 1, 5, 11, 15, 1, 1, 21, 5, 11, 3, 1, 43, 9, 17, 13, 1, 1, 9, 7, 41, 23, 21, 25, 27, 9, 3, 1, 9, 3, 13, 11, 19, 3, 1, 35, 1, 23, 29, 5, 11, 27, 1, 39, 15, 9, 47, 75, 73, 11, 61, 1, 57, 3, 93, 57, 117, 69, 7, 93, 51, 33, 97, 143, 87, 65, 261, 15, 23, 39, 29, 55, 45, 47
a:=[]: for n from 0 to 100 do m:=add(a[i+1]*binomial(n, i), i=0..n-1): a:=[op(a), nextprime(m)-m] od: op(a); (Ronaldo)
more,nonn,new
nonn
More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Dec 26 2004
Binomial transform gives a prime.
2, 1, 1, 3, 5, 1
0,1
For n = 3 we have (2,1,1,3).(1,3,3,1) = 2*1 + 1*3 + 1*3 + 3*1 = 11 is a prime.
Cf. A090235.
more,nonn
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 26 2003
approved