cp's OEIS Frontend

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.

A061254 Odd composite numbers n such that primitive part of Fibonacci(n) (see A061446) is prime.

This page as a plain text file.
%I A061254 #15 Jan 06 2020 08:34:59
%S A061254 9,15,21,33,35,39,45,51,63,65,75,93,105,111,119,121,123,135,145,185,
%T A061254 195,201,207,209,225,231,235,245,285,287,299,301,321,335,363,399,423,
%U A061254 453,473,693,707,771,1047,1113,1215,1365,1371,1387,1533,1537
%N A061254 Odd composite numbers n such that primitive part of Fibonacci(n) (see A061446) is prime.
%H A061254 David Broadhurst, <a href="/A061254/b061254.txt">Table of n, a(n) for n=1..151 yielding primes or probable primes</a>
%H A061254 J. Brillhart, P. L. Montgomery and R. D. Silverman, <a href="https://doi.org/10.1090/S0025-5718-1988-0917832-6">Tables of Fibonacci and Lucas factorizations</a>, Math. Comp. 50 (1988), 251-260, S1-S15. Math. Rev. 89h:11002.
%t A061254 A061446[n_] := Product[Fibonacci[d]^MoebiusMu[n/d], {d, Divisors[n]}];
%t A061254 Select[Range[1, 1999, 2], CompositeQ[#] && PrimeQ[A061446[#]]&] (* _Jean-François Alcover_, Jul 04 2019 *)
%Y A061254 Cf. A061446, A061447, A061445, A061442, A061443.
%K A061254 nonn
%O A061254 1,1
%A A061254 _David Broadhurst_, Jun 10 2001
%E A061254 Definition corrected by _T. D. Noe_, Dec 14 2006