A343778 Primes which are two greater than A074040 terms.
17, 21800053277, 86984485062381462583582279727, 2948338207972508983453357158259221375675126583677039825367935271466652794027
Offset: 1
Keywords
Examples
a(1) = 17 = A074040(1) + 2 = 3*5 + 2.
Programs
-
Mathematica
(* function a074040[ ] is defined in A074040 *) a343778[n_] := Select[Map[#+2&, a074040[n]], PrimeQ] a343778[30]
Comments