login
A391801
Primes indexed by A391798.
2
3, 5, 11, 31, 41, 43, 47, 59, 67, 73, 79, 131, 151, 167, 179, 211, 239, 241, 307, 373, 379, 383, 389, 431, 443, 457, 467, 487, 503, 577, 647, 673, 683, 691, 719, 769, 773, 823, 877, 919, 1031, 1033, 1039, 1187, 1217, 1327, 1367, 1489, 1493, 1531, 1637, 1663
OFFSET
1,1
FORMULA
a(n) = A000040(A391798(n)).
MATHEMATICA
z = 300; p[n_] := Prime[n];
a[n_] := p[2 n + 2] - p[2 n] - p[2 n + 1] + p[2 n - 1];
Prime[Select[Range[z], a[#] == 0 &]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Dec 30 2025
STATUS
approved