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 A267897 #18 Oct 23 2024 11:20:13 %S A267897 0,3,115,5033,39916789,6227020787,355687428095983,121645100408831981, %T A267897 25852016738884976639977,8841761993739701954543615999971, %U A267897 8222838654177922817725562879999969,13763753091226345046315979581580902399999963 %N A267897 a(n) = prime(n)! - prime(n). %F A267897 a(n) = A039716(n) - A000040(n). %F A267897 a(n) = A005096(A000040(n)). %t A267897 Array[Prime[#]! - Prime[#] &, 20] %t A267897 #!-#&/@Prime[Range[20]] (* _Harvey P. Dale_, Oct 23 2024 *) %o A267897 (Magma) [Factorial(p)-p: p in PrimesUpTo(40)]; %o A267897 (PARI) lista(nn) = forprime(p=2, nn, print1(p! - p, ", ")); \\ _Altug Alkan_, Jan 23 2016 %Y A267897 Cf. A000040, A005096, A039716, A114574. %K A267897 nonn,easy %O A267897 1,2 %A A267897 _Vincenzo Librandi_, Jan 22 2016