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 A084749 #27 Jul 16 2025 13:54:41 %S A084749 0,1,2,3,4,5,6,7,10,33,44,48,52,64,73,92,119,182,487,603,987,4884, %T A084749 6822,8070,11079,13659,17659 %N A084749 Numbers m such that m! + p is a prime, where p is the smallest prime > m. %C A084749 Next term, if it exists, is >4800. - _Ryan Propper_, Jan 02 2007 %C A084749 From _Farideh Firoozbakht_, Oct 21 2009: (Start) %C A084749 Numbers corresponding to a(19)-a(24) are probable primes. %C A084749 There is no further term up to 8300. (End) %e A084749 727 = 6! + 7 is a prime but 8! + 11 is composite hence 6 is a member but 8 is not. %e A084749 7 is in the sequence because 7!=5040, nextprime(7)=11 and 5040+11 is prime. %t A084749 Do[If[PrimeQ[k!+NextPrime[k]], Print[k]], {k, 0, 1525}] (* _Farideh Firoozbakht_, Feb 26 2004 *) %t A084749 Select[Range[0,500],PrimeQ[#!+NextPrime[#]]&] (* The program generates the first 19 terms of the sequence. *) (* _Harvey P. Dale_, Jul 16 2025 *) %Y A084749 Cf. A084748, A084750, A092028, A064278, A002981, A151892. %K A084749 nonn,more %O A084749 1,3 %A A084749 _Amarnath Murthy_ and Meenakshi Srikanth (menakan_s(AT)yahoo.com), Jun 16 2003 %E A084749 More terms from _Farideh Firoozbakht_, Feb 26 2004 %E A084749 Edited by _N. J. A. Sloane_ at the suggestion of _Artur Jasinski_, Apr 14 2008 %E A084749 a(22)-a(24) from _Farideh Firoozbakht_, Oct 21 2009 %E A084749 a(25) from _Michael S. Branicky_, Aug 05 2024 %E A084749 a(26)-a(27) from _Michael S. Branicky_, May 25 2025