OFFSET
1,1
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..71
MATHEMATICA
Prime@ Select[Range[10^5], Mod[Prime[#] - 7, #] == 0 &] (* Giovanni Resta, Feb 25 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Dec 09 2009
EXTENSIONS
Missing a(1)-a(4), a(16) and beyond from Giovanni Resta, Feb 23 2020
STATUS
approved