cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A332733 a(n) is the smallest positive k such that n!*prime(n) + k is a prime.

This page as a plain text file.
%I A332733 #20 Aug 13 2021 10:18:02
%S A332733 1,1,1,5,1,11,11,11,1,11,23,43,19,41,17,29,1,19,71,157,1,23,79,67,47,
%T A332733 53,37,53,31,67,73,223,307,67,1,197,151,43,43,157,89,137,47,127,173,
%U A332733 97,89,79,223,79,83,151,163,89,167,313,179,101,127,101,181,193,421,73
%N A332733 a(n) is the smallest positive k such that n!*prime(n) + k is a prime.
%C A332733 k equals nextprime(n!*prime(n)) - n!*prime(n).
%F A332733 a(n) = A151800(n!*prime(n)) - n!*prime(n).
%t A332733 spk[n_]:=Module[{c=n!Prime[n]},NextPrime[c]-c]; Array[spk,70] (* _Harvey P. Dale_, Aug 13 2021 *)
%o A332733 (PARI) a(n) = my(x=n!*prime(n)); nextprime(x+1) - x; \\ _Michel Marcus_, Feb 22 2020
%Y A332733 Cf. A000040, A000142, A151800, A332731.
%K A332733 nonn
%O A332733 1,4
%A A332733 _Mohamed Sami Gattoufi_, Feb 21 2020