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 A093804 #47 Apr 03 2023 10:36:10 %S A093804 2,3,11,37,41,73,26951,110059,150209 %N A093804 Primes p such that p! + 1 is also prime. %C A093804 Or, numbers n such that Sum_{d|n} d! is prime. %C A093804 The prime 26951 from A002981 (n!+1 is prime) is a member since Sum_{d|n} d! = n!+1 if n is prime. - _Jonathan Sondow_, Jan 30 2005 %C A093804 a(n) are the primes in A002981[n] = {0, 1, 2, 3, 11, 27, 37, 41, 73, 77, 116, 154, 320, 340, 399, 427, 872, 1477, 6380, 26951, ...} Numbers n such that n! + 1 is prime. Corresponding primes of the form p! + 1 are listed in A103319[n] = {3, 7, 39916801, 13763753091226345046315979581580902400000001, 33452526613163807108170062053440751665152000000001, ...}. - _Alexander Adamchuk_, Sep 23 2006 %H A093804 Chris K. Caldwell, The List of Largest Known Primes, <a href="https://t5k.org/primes/page.php?id=100445">110059! + 1</a> %H A093804 R. Mestrovic, <a href="http://arxiv.org/abs/1202.3670">Euclid's theorem on the infinitude of primes: a historical survey of its proofs (300 BC--2012) and another new proof</a>, arXiv:1202.3670 [math.HO], 2012. - From N. J. A. Sloane, Jun 13 2012 %H A093804 Apoloniusz Tyszka, <a href="https://hal.archives-ouvertes.fr/hal-01614087v5/document">A common approach to the problem of the infinitude of twin primes, primes of the form n! + 1, and primes of the form n! - 1</a>, 2018. %H A093804 Apoloniusz Tyszka, <a href="https://philarchive.org/archive/TYSDASv8">A new approach to solving number theoretic problems</a>, 2018. %e A093804 Sum_{d|3} d! = 1! + 3! = 7 is prime, so 3 is a member. %p A093804 seq(`if`(isprime(ithprime(n)!+1), ithprime(n), NULL),n=1..25); # _Nathaniel Johnston_, Jun 28 2011 %t A093804 Select[Prime[Range[5! ]],PrimeQ[ #!+1]&] (* _Vladimir Joseph Stephan Orlovsky_, Nov 17 2009 *) %o A093804 (PARI) isok(n) = ispseudoprime(n) && ispseudoprime(n!+1); \\ _Jinyuan Wang_, Jan 20 2020 %Y A093804 Cf. A062363, A002981, A038507, A088332, A103317, A103319. %K A093804 nonn,more,hard %O A093804 1,1 %A A093804 _Jason Earls_, May 19 2004 %E A093804 One more term from _Alexander Adamchuk_, Sep 23 2006 %E A093804 a(8)=110059 (found on Jun 11 2011, by PrimeGrid), added by _Arkadiusz Wesolowski_, Jun 28 2011 %E A093804 a(9)=150209 (found on Jun 09 2012, by Rene Dohmen), added by _Jinyuan Wang_, Jan 20 2020