This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A094410 #15 Aug 20 2021 04:21:02 %S A094410 442,1891,6601,8149,13981,17119,17711,30889,40501,52701,68101,78409, %T A094410 88601,88831,115231,138601,145351,150121,153781,191351,199801,218791, %U A094410 265881,266071,316561,332949,342271,348517,407353,453151,456301,464101 %N A094410 Numbers k that divide Fibonacci(k-1) but do not divide Fibonacci(k) - 1. %H A094410 Giovanni Resta, <a href="/A094410/b094410.txt">Table of n, a(n) for n = 1..1000</a> %t A094410 Select[Range[50000], ! Mod[Fibonacci[ # ] - 1, # ] == 0 && Mod[Fibonacci[ # - 1], # ] == 0 &] %o A094410 (PARI) fibmod(n,m)=(Mod([0,1;1,1],m)^n*[0;1])[1,1] %o A094410 is(n)=fibmod(n-1,n)==0 && fibmod(n,n)!=1 \\ _Charles R Greathouse IV_, Nov 04 2016 %Y A094410 Cf. A000045, A069106, A094394, A094409. %K A094410 nonn %O A094410 1,1 %A A094410 _Eric Rowland_, May 01 2004 %E A094410 More terms from _David Wasserman_, May 08 2007