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 A240622 #16 Mar 31 2020 03:44:55 %S A240622 3,3,4,4,5,4,7,4,6,5,15,6,13,7,5,9,38,8,21,5,7,19,27,6,15,14,10,7,30, %T A240622 5,31,8,12,18,8,6,47,53,13,5,127,10,67,11,16,27,51,8,14,26,17,16,77,9, %U A240622 23,7,184,56,123,6,66,203,7,9,13,13,74,42,26,7,75,9,205 %N A240622 Least number k such that k!/n - 1 is prime. %C A240622 a(263) > 5000. - _Jinyuan Wang_, Mar 31 2020 %H A240622 Jinyuan Wang, <a href="/A240622/b240622.txt">Table of n, a(n) for n = 1..262</a> %e A240622 1!/1 - 1 = 0 is not prime. 2!/1 - 1 = 1 is not prime. 3!/1 - 1 = 5 is prime. Thus, a(1) = 3. %t A240622 lnk[n_]:=Module[{k=1},While[!PrimeQ[k!/n-1],k++];k]; Array[lnk,80] (* _Harvey P. Dale_, Aug 31 2015 *) %o A240622 (PARI) a(n) = {for(k=1, oo, s=k!/n-1; if(floor(s)==s, if(ispseudoprime(s), return(k)))); } %Y A240622 Cf. A139072, A139186. %K A240622 nonn %O A240622 1,1 %A A240622 _Derek Orr_, Apr 09 2014