OFFSET
1,1
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..46
EXAMPLE
Mod(7,4)=3, Mod(17,7)=3.
MATHEMATICA
Prime@ Select[Range[10^5], Mod[Prime[#] - 3, #] == 0 &] (* Giovanni Resta, Feb 25 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Dec 08 2009
EXTENSIONS
a(14) from Harvey P. Dale, Oct 21 2016
Terms a(1)-a(2), a(17) and beyond from Giovanni Resta, Feb 23 2020
STATUS
approved