A334276 a(n) = prime(A003593(n)).

2, 5, 11, 23, 47, 97, 103, 197, 379, 419, 691, 761, 1427, 1543, 2557, 2789, 4637, 5039, 5519, 9049, 9851, 16103, 17609, 19289, 28687, 31319, 34123, 55381, 60167, 65687, 97499, 106243, 115757, 171529, 186437, 202987, 220861, 326537, 354979, 386501, 570643, 620201, 674837

Offset

1,1

Comments

The first six terms agree with A055496.

Links

Table of n, a(n) for n=1..43.

Mathematica

fQ[n_]:=PowerMod[15, n, n]==0;
Prime[Select[Range[1000000], fQ]]

Crossrefs

Cf. A003593, A055496.

Sequence in context: A266550 A081973 A357292 * A055496 A105120 A084403

Adjacent sequences: A334273 A334274 A334275 * A334277 A334278 A334279

Keyword

nonn

Author

Yancheng Lu, May 20 2020

Status

approved