login
A171432
Primes that are congruent to 5 mod n, where n is the index of the prime.
4
2, 3, 5, 23, 53, 137, 480881, 480941, 480989, 481001, 481469, 3524099, 3524113, 3524281, 3524309, 70117933, 189961799, 189961907, 189961997, 189962177, 189962609, 189963941, 189963959, 189968729, 514274867, 514282961, 3779851157, 10246935913, 10246936309, 10246936463
OFFSET
1,1
LINKS
MATHEMATICA
Prime@ Select[Range[10^5], Mod[Prime[#] - 5, #] == 0 &] (* Giovanni Resta, Feb 25 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
a(13) from Harvey P. Dale, Sep 21 2014
Missing a(1)-a(3), a(17) and beyond from Giovanni Resta, Feb 23 2020
STATUS
approved