%I #17 Jun 14 2020 01:55:59
%S 1,2,4,2,6,12,4,12,22,26,4,14,58,6,12,42,24,2,12,56,48,24,18,38,58,14,
%T 12,38,34,62,28,92,214,122,102,168,136,18,48,102,108,126,18,126,76,
%U 108,22,204,52,122,96,114,94,14,52,38,58,248,64,56,16,102,106
%N a(n) = nextprime(5^n) - 5^n.
%H Zak Seidov, <a href="/A013599/b013599.txt">Table of n, a(n) for n = 0..500</a>
%F a(n) = A151800(5^n)-5^n = A054321(n)-5^n = A013632(5^n). - _R. J. Mathar_, Nov 28 2016
%p seq(nextprime(5^i)-5^i, i=0..100);
%t NextPrime[#]-#&/@(5^Range[0,70]) (* _Harvey P. Dale_, Sep 29 2011 *)
%o (PARI) a(n) = nextprime(5^n+1) - 5^n; \\ _Michel Marcus_, Jun 14 2020
%Y Cf. A000351, A013632, A054321, A151800,
%K nonn
%O 0,2
%A James Kilfiger (mapdn(AT)csv.warwick.ac.uk)
|