login
A112530
Numbers k such that prime(k) +/- k and prime(k) +/- 2k are all primes.
4
720, 1920, 5580, 14370, 17160, 21090, 26040, 28560, 38280, 43680, 43890, 50730, 60090, 77850, 100800, 104760, 120060, 125190, 155100, 167850, 171780, 193260, 202470, 206460, 211860, 217830, 221880, 224070, 249900, 249990, 252420, 261960
OFFSET
1,1
COMMENTS
Are all terms divisible by 30?
Union of A064403 and A112529.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..228(all terms up to 5 million)
MATHEMATICA
Select[Range[720, 2000000, 10], PrimeQ[Prime[ # ]+# ]&&PrimeQ[Prime[ # ]-# ]&&PrimeQ[Prime[ # ]+2# ]&&PrimeQ[Prime[ # ]-2# ]&]
Select[Range[262000], AllTrue[Prime[#]+{#, -#, 2#, -2#}, PrimeQ]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 02 2021 *)
CROSSREFS
Sequence in context: A131663 A090392 A253734 * A052800 A321842 A052794
KEYWORD
nonn
AUTHOR
Zak Seidov, Sep 10 2005
STATUS
approved