Search: id:A118913 Results 1-1 of 1 results found. %I A118913 %S A118913 3,31,45361,3991681, %T A118913 2516506653355019284889240277665777045474566836669417196965412366518489408149127168000000000000001 %N A118913 Primes of the form n! + (n+1)! + 1. %e A118913 n=3 3! + 4! + 1 = 6 + 24 + 1 = 31 %e A118913 n=7 7! + 8! + 1 = 5040 + 40320 + 1 = 45361 %p A118913 P:=proc(n) local i, j; for i from 1 by 1 to n do j:=i!+(i+1)!+1; if isprime(j) then print(j); fi; od; end: P(200); %t A118913 lst={};Do[p=n!+(n+1)!+1;If[PrimeQ[p],AppendTo[lst,p]],{n,0,5!}];lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jan 27 2009] %Y A118913 indices in A087147 [From Dmitry Kamenetsky (dkamen(AT)rsise.anu.edu.au), Oct 21 2008] %Y A118913 Sequence in context: A134721 A002707 A144964 this_sequence A005042 A136582 A119937 %Y A118913 Adjacent sequences: A118910 A118911 A118912 this_sequence A118914 A118915 A118916 %K A118913 easy,nonn %O A118913 1,1 %A A118913 Paolo P. Lava and Giorgio Balzarotti (ppl(AT)spl.at), May 25 2006 %E A118913 Added the first term, because 0!+1!+1=3 is prime. Dmitry Kamenetsky (dkamen(AT)rsise.anu.edu.au), Oct 21 2008 Search completed in 0.001 seconds