OFFSET
1,1
LINKS
Felix Fröhlich, Table of n, a(n) for n = 1..999
PROG
(PARI) forprime(p=1, 1e3, c=2; while(Mod(fibonacci(c-kronecker(c, p)), c)!=0 || ispseudoprime(c), c++); print1(c, ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Felix Fröhlich, Dec 19 2014
STATUS
approved