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 A351337 #33 Feb 12 2022 13:38:39 %S A351337 169,385,961,1121,3741,3781,4795,4901,6061,6265,6441,6601,6895,6931, %T A351337 7801,8119,9809,9881,10945,13981,14111,15841,18241,18721,19097,20833, %U A351337 23829,24727,29953,30381,30889,31417,34561,37345,38081,40391,42127,45961,47321,49105 %N A351337 Composite terms in A270951. %C A351337 The sequence appears to have no intersection with A128288. %t A351337 q[n_] := CompositeQ[n] && Divisible[Fibonacci[n - 1, 2], n]; Select[Range[50000], q] (* _Amiram Eldar_, Feb 09 2022 *) %o A351337 (PARI) a000129(n) = ([2, 1; 1, 0]^n)[2, 1]; %o A351337 is(n) = (n>1) && !isprime(n) && (Mod(a000129(n-1), n) == 0); \\ _Michel Marcus_, Feb 09 2022; after A270951 %Y A351337 Intersection of A002808 and A270951. %Y A351337 Cf. A128288. %K A351337 nonn %O A351337 1,1 %A A351337 _Bill McEachen_, Feb 08 2022