OFFSET
1,1
COMMENTS
An integer n is in this list if it is a prime number and (n-8)/3, (n-2)/3, (n+10)/3 are all prime numbers. 23 is a term because it is prime and 5, 7 and 11 are prime numbers.
LINKS
Daniel Mondot, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = 3*A162001(n) + 8. - Daniel Mondot, Sep 06 2024
a(n) == 5 (mod 6). - Hugo Pfoertner, Sep 06 2024
a(n) >> n log^4 n. - Charles R Greathouse IV, Sep 18 2024
EXAMPLE
5 + 7 + 11 = 23;
11 + 13 + 17 = 41;
17 + 19 + 23 = 59;
41 + 43 + 47 = 131;
101 + 103 + 107 = 311;
311 + 313 + 317 = 941;
347 + 349 + 353 = 1049;
...
MATHEMATICA
Select[Total /@ Select[Partition[Prime[Range[3500]], 3, 1], Differences[#] == {2, 4} &], PrimeQ] (* Amiram Eldar, Sep 06 2024 *)
PROG
(PARI) list(lim)=my(v=List(), p=5, q=7, s); forprime(r=11, (lim+10)\3, if(r-p==6 && q-p==2 && isprime(s=3*p+8), listput(v, s)); p=q; q=r); Vec(v) \\ Charles R Greathouse IV, Sep 18 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Sep 06 2024
STATUS
approved