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 A063833 #8 Sep 20 2019 18:13:16 %S A063833 1,4,5,6,13,14,20,66,91,124,212,282,460 %N A063833 !n - 3 is prime. %C A063833 There are no further terms, because for n >= 467, 467 | !n - 3. - _Serge Batalov_, Jul 14 2017 %t A063833 Do[ If[ PrimeQ[ Sum[ k!, {k, 0, n - 1} ] - 3 ], Print[ n ] ], {n, 1, 800} ] %t A063833 Position[Accumulate[Range[0,500]!],_?(PrimeQ[#-3]&)]//Flatten (* _Harvey P. Dale_, Sep 20 2019 *) %Y A063833 Cf. A063508. %K A063833 nonn,fini,full %O A063833 1,2 %A A063833 _Robert G. Wilson v_, Aug 21 2001