OFFSET
1,2
PROG
(PARI) {m=75; v=[]; for(n=2, m, v=concat(v, vecsort(eval(setminus(Set(divisors(fibonacci(n))), Set(v)))))); z=100; u=vector(z); for(j=1, #v, if(v[j]<=z, u[v[j]]=j)); i=1; while(u[i]>0, print1(u[i], ", "); i++)} - (Klaus Brockhaus, Aug 17 2006)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Jun 16 2006
EXTENSIONS
More terms from Klaus Brockhaus, Aug 17 2006
STATUS
approved