A100276 -id:A100276 - cp's OEIS frontend

A100277 Primes resulting from A100276.

13, 103, 1153, 15013, 255253, 4849843, 111546433, 6581239663, 467268016213, 34110565183693, 2831176910246683, 251974745011954963, 24441550266159631603, 4668336100836489636553, 1573229265981897007519033

Offset: 1

Herman H. Rosenfeld (herm3(AT)pacbell.net), Dec 29 2004

nonn

			3*5-2=13 is prime;
3*5*7-2=103 is prime;
3*5*7*11-2=1153 is prime;
3*5*7*11*13-2=15013 is prime.

Cf. A100276.

Cf. A067024. [From R. J. Mathar, Sep 02 2008]

Corrected and extended by Emeric Deutsch, Mar 26 2005

A100301 Primes resulting from A085013.

Original entry on oeis.org

5, 17, 107, 1367, 31397, 910457, 33686837, 1448533907, 88360568207, 6450321478967, 574078611627887, 78648769793020247, 11875964238746056997, 1983286027870591518167, 394673919546247712114837

Offset: 1

Herman H. Rosenfeld (herm3(AT)pacbell.net), Dec 29 2004

nonn

Cf. A100276. Different from A098028.

NextPrim[n_] := Block[{k = n + 1}, While[ ! PrimeQ[k], k++ ]; k]; a[0] = 1; a[n_] := a[n] = Block[{p = NextPrim[ a[n - 1]], q = Product[a[i], {i, 0, n - 1}]}, While[ !PrimeQ[p*q + 2], p = NextPrim[p]]; p]; Table[ Product[ a[i], {i, n}] + 2, {n, 16}] (* Robert G. Wilson v, Jan 12 2005 *)

More terms from Robert G. Wilson v, Jan 12 2005

cp's OEIS Frontend

A100277 Primes resulting from A100276.

Views

Author

Keywords

Examples

Crossrefs

Extensions