|
%I #23 Sep 08 2015 14:59:20
%S 0,3,107,4951,39916141,6227015357,355687428046967,121645100408347963,
%T 25852016738884971417571,8841761993739701954543554805353,
%U 8222838654177922817725562105174617
%N a(n) = prime(n)! - prime(n!).
%C a(n) is prime for n = 2, 3, 4, 5, 7.
%H Charles R Greathouse IV, <a href="/A261997/b261997.txt">Table of n, a(n) for n = 1..21</a>
%F a(n) = A039716(n) - A062439(n).
%F log a(n) ~ n log^2 n. - _Charles R Greathouse IV_, Sep 08 2015
%e For n=2, a(n) = prime(n)! - prime(n!) = prime(2)! - prime(2!) = 3.
%t Array[Prime[#]! - Prime[#!] &, {11}] (* _Michael De Vlieger_, Sep 08 2015 *)
%o (PARI) vector(11, n, prime(n)! - prime(n!))
%Y Cf. A039716, A062439.
%K nonn
%O 1,2
%A _Altug Alkan_, Sep 08 2015
| 