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 A151892 #38 Jun 09 2025 22:41:08
%S A151892 1,2,3,4,6,7,14,15,20,25,32,34,35,67,89,191,316,411,1213,1280,2022,
%T A151892 2267
%N A151892 Numbers m such that m! + (next prime after m!) is prime.
%t A151892 a = {}; Do[If[PrimeQ[n! + NextPrime[n! ]], AppendTo[a, n]], {n, 200}]; a (* _Artur Jasinski_ *)
%t A151892 Select[Range[420],PrimeQ[#!+NextPrime[#!]]&] (* _Harvey P. Dale_, Aug 20 2021 *)
%Y A151892 Cf. A002981, A151894, A151893, A151903, A084749.
%K A151892 nonn,more,hard
%O A151892 1,2
%A A151892 _Artur Jasinski_, Apr 12 2008
%E A151892 a(17)-a(18) from _Robert G. Wilson v_, Jun 11 2010
%E A151892 a(19)-a(20) from _Michael S. Branicky_, May 27 2023
%E A151892 a(21)-a(22) from _Michael S. Branicky_, Aug 03 2024