NAME
allocated for Zhi-Wei Sun
Primes p with prime(p) - p + 1 also prime.
DATA
2, 3, 5, 7, 13, 17, 23, 31, 41, 43, 61, 71, 83, 89, 103, 109, 139, 151, 173, 181, 199, 211, 223, 241, 271, 277, 281, 293, 307, 311, 317, 337, 349, 353, 367, 463, 499, 541, 563, 571, 601, 661, 673, 709, 719, 743, 751, 757, 811, 823, 827, 883, 907, 911, 953, 971, 1093, 1117, 1123, 1153
OFFSET
1,1
COMMENTS
By the conjecture in A234694, this sequence should have infinitely many terms.
EXAMPLE
a(1) = 2 since prime(2) - 1 = 2 is prime.
a(2) = 3 since prime(3) - 2 = 3 is prime.
a(3) = 5 since prime(5) - 4 = 7 is prime.
a(4) = 7 since prime(7) - 6 = 11 is prime.
MATHEMATICA
n=0; Do[If[PrimeQ[Prime[Prime[k]]-Prime[k]+1], n=n+1; Print[n, " ", Prime[k]]], {k, 1, 1000}]
KEYWORD
allocated
nonn
AUTHOR
Zhi-Wei Sun, Dec 29 2013
STATUS
approved
editing