login
Nextprime(n^4) - n^4.
1

%I #11 Aug 27 2017 13:00:20

%S 1,1,2,1,6,1,10,3,2,7,12,7,10,15,2,1,16,11,16,1,2,3,6,1,22,3,16,1,12,

%T 13,18,7,8,1,18,11,16,7,20,21,12,25,28,3,2,1,6,1,16,9,10,43,22,1,12,1,

%U 2,25,6,19,16,3,2,43,28,5,6,3,2,31,16,7,6,1,34,3,48,5,16,1,26,1,30,47

%N Nextprime(n^4) - n^4.

%F a(n) = A007920(n^4). - _Michel Marcus_, Jun 06 2014

%e a(5)=6 because n^4=625 and next prime is 631; 631-625=6.

%t Table[NextPrime[n^4]-n^4,{n,90}] (* _Harvey P. Dale_, Aug 27 2017 *)

%o (PARI) a(n) = nextprime(n^4) - n^4; \\ _Michel Marcus_, Jun 06 2014

%Y Cf. A000583, A053786.

%K easy,nonn

%O 1,3

%A _Enoch Haga_, Mar 26 2000