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.

A061075 Greatest prime number p(n) with decimal fraction period of length n.

This page as a plain text file.
%I A061075 #33 Nov 25 2024 19:16:18
%S A061075 3,11,37,101,271,13,4649,137,333667,9091,513239,9901,265371653,909091,
%T A061075 2906161,5882353,5363222357,52579,1111111111111111111,27961,10838689,
%U A061075 8779,11111111111111111111111,99990001,182521213001,1058313049,440334654777631,121499449,77843839397
%N A061075 Greatest prime number p(n) with decimal fraction period of length n.
%H A061075 <a href="/A061075/b061075.txt">Table of n, a(n) for n = 1..352</a>
%H A061075 Makoto Kamada, <a href="https://stdkmd.net/nrr/repunit/phin10.htm">Factorizations of Phi_n(10)</a>
%H A061075 <a href="/index/1#1overn">Index entries for sequences related to decimal expansion of 1/n</a>
%F A061075 a(n) = A006530(A019328(n)). - _Ray Chandler_, May 10 2017
%e A061075 1/271 = 0.0036900369, period of n=5 for p(5)=271.
%t A061075 a[n_] := Cyclotomic[n, 10] // FactorInteger // Last // First; Table[a[n], {n, 1, 26}] (* _Jean-François Alcover_, Aug 05 2013, after Pari *)
%o A061075 (PARI) a(n) = my(p); if(n<1, 0, p=factor(polcyclo(n,10))[,1]; p[#p])
%Y A061075 Cf. A003020, A005422, A006530, A007138, A019328.
%Y A061075 Last terms in rows of A046107.
%K A061075 nonn,nice,base
%O A061075 1,1
%A A061075 Heiner Muller-Merbach (hmm(AT)sozwi.uni-kl.de), May 29 2001
%E A061075 Terms to a(322) in b-file from _Ray Chandler_, Apr 28 2017
%E A061075 a(323)-a(352) in b-file from _Max Alekseyev_, Apr 26 2022