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 A274584 #11 Apr 03 2023 10:36:13 %S A274584 4,8,9,10,14,15,16,18,20,21,22,26,28,30,32,33,34,35,38,39,40,42,45,51, %T A274584 52,54,60,62,63,65,66,72,74,75,76,82,93,94,98,105,106,111,112,119,121, %U A274584 122,123,124,132,135,136,140,142,144,145,152,156,158,160,172,180 %N A274584 Composite numbers n such that primitive part of Fibonacci(n) is prime. %C A274584 For every n > 1, A105602(a(n)) > 1. %H A274584 Arkadiusz Wesolowski, <a href="/A274584/b274584.txt">Table of n, a(n) for n = 1..350</a> %H A274584 C. K. Caldwell, Top Twenty page, <a href="https://t5k.org/top20/page.php?id=40">Fibonacci Primitive Part</a> %o A274584 (Magma) lst:=[]; for n in [4..180] do if not IsPrime(n) then d:=Divisors(n); p:=Truncate(&*[Fibonacci(d[i])^MoebiusMu(Truncate(n/d[i])): i in [1..#d]]); if IsPrime(p) then Append(~lst, n); end if; end if; end for; lst; %Y A274584 Cf. A061446. Supersequence of A061254. %K A274584 nonn %O A274584 1,1 %A A274584 _Arkadiusz Wesolowski_, Jun 29 2016