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.
%I A082956 #25 Aug 02 2024 18:18:20 %S A082956 1,1,1,1,1,5,5,1,5,11,11,7,7,1,11,29,29,17,17,1,47,17,17,37,79,1,31, %T A082956 397,397,47,47,53,127,1,53,67,67,41,23,23,23,41,41,113,107,31,31,79, %U A082956 157,61,353,157,157,601,31,1,29,409,409,31,31,181,41,139,47,151,151,47,47,109 %N A082956 Difference between C(n) and the first prime after C(n), where C(n) = A049614(n). %C A082956 All terms here are either 1 or prime. %H A082956 Bill McEachen, <a href="/A082956/b082956.txt">Table of n, a(n) for n = 1..1000</a> %t A082956 A082956[n_] := NextPrime[#] - # & [n!/Product[Prime[i], {i, PrimePi[n]}]]; %t A082956 Array[A082956, 100] (* _Paolo Xausa_, Aug 02 2024 *) %o A082956 (PARI) a(n)= my(C=n!/prod(i=1, primepi(n), prime(i))); nextprime(C) - C; \\ _Michel Marcus_, Jul 31 2024 %Y A082956 Cf. A049614. %K A082956 nonn %O A082956 1,6 %A A082956 _Jason Earls_, May 26 2003