A037152 -id:A037152 - cp's OEIS frontend

A187874 Second smallest prime after n!.

3, 3, 5, 11, 31, 131, 733, 5059, 40351, 362903, 3628819, 39916817, 479001643, 6227020873, 87178291241, 1307674368149, 20922789888041, 355687428096053, 6402373705728061, 121645100408832109, 2432902008176640037, 51090942171709440037

Offset: 0

Vladimir Joseph Stephan Orlovsky, Mar 14 2011

nonn

			2!=2, second smallest prime=5;
3!=6, second smallest prime=11; ..

Cf. A037151, A037152, A087421.

Mathematica
```
NextPrime[Range[0, 30]!, 2]
```

A190801 Least semiprime whose prime factors differ by n!.

Original entry on oeis.org

6, 15, 55, 145, 889, 5089, 55561, 927889, 6169249, 39916921, 678585889, 13891047241, 417210398089, 1656387533161, 56229997825849, 481224167424529, 11026310270976961, 236887827111937369, 10826413936386055921

Offset: 1

Michel Lagneau, May 20 2011

nonn

Appears to be the same as A037152(n) * A037153(n).

			a(5) = 889 because 889 = 7 * 127 , and 127 - 7 = 120 = 5!

f[n_] := Block[{p=2}, While[! PrimeQ[p+n!], p=NextPrime[p]]; p*(p+n!)]; Table[f[n], {n, 60}]

cp's OEIS Frontend

A187874 Second smallest prime after n!.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica