A049485 Primes p such that p + 510510 is also prime, where 510510 is the 7th primorial number A002110(7).
19, 41, 43, 59, 71, 73, 79, 101, 103, 107, 109, 167, 173, 181, 197, 199, 241, 257, 263, 283, 293, 307, 313, 317, 337, 379, 397, 409, 421, 431, 433, 479, 491, 503, 509, 523, 547, 577, 599, 601, 613, 641, 643, 653, 659, 661, 683, 691, 701, 727, 733, 751, 769
Offset: 1
Keywords
Examples
19 is a term since it is prime and 19 + 510510 = 510529 is also prime.
Links
- Daniel Starodubtsev, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
lst={};Do[p=Prime[n];If[PrimeQ[p+510510],AppendTo[lst,p]],{n,6!}];lst (* Vladimir Joseph Stephan Orlovsky, Jan 04 2009 *)
-
PARI
isok(p) = isprime(p) && isprime(p + 510510); \\ Amiram Eldar, Mar 15 2025
Comments