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.

A134127 Largest prime in the partials sums of primes in A134125 which have integer averages.

This page as a plain text file.
%I A134127 #18 Apr 30 2024 01:47:28
%S A134127 3,5,11,19,31,233,739,2207,4871,47933,76103,82723,128663,391273,
%T A134127 521041,769423,2036833,3724997,14722933,31957817,87574217,167518933,
%U A134127 478372393,656640899,749613233,861934273,9083114473,29862785453,95892456511,160534630967,566082728429,574273844491
%N A134127 Largest prime in the partials sums of primes in A134125 which have integer averages.
%C A134127 Add primes to cumulative totals 3 (to 2), 5, 7, 11, 13, 17, 19, etc. But 7, 13, 17 are omitted from the sequence because the sums at counts 3, 5, 6, e.g., do not produce integral quotients.
%F A134127 a(n) = A000040(1+A134126(n)). - _R. J. Mathar_, Jun 10 2008
%e A134127 At a(4), 11 is added to the previous sum 17: 17+11 = 28 and the index count is 4, so 28/4 = 7, which is integral, so 11 is added to the sequence.
%o A134127 (UBASIC) 10 'primes using counters 20 N=3:C=1:R=5:print 2;3,5 30 A=3:S=sqrt(N) 40 B=N\A 50 if B*A=N then N=N+2:goto 30 60 A=A+2:O=A 70 if A<=sqrt(N) then 40 80 C=C+1 90 R=R+N:T=R/C:U=R-N 100 if T=int(T) then print C;U;N;R;T:stop 110 N=N+2:goto 30
%o A134127 (PARI) lista(pmax) = {my(k = 0, s = 2); forprime(p = 3, pmax, k++; s += p; if(!(s % k), print1(p, ", ")));} \\ _Amiram Eldar_, Apr 30 2024
%Y A134127 Cf. A000040, A134125, A134128, A134129.
%K A134127 nonn
%O A134127 1,1
%A A134127 _Enoch Haga_, Oct 09 2007
%E A134127 Edited by _R. J. Mathar_, Jun 10 2008
%E A134127 More terms from _Nathaniel Johnston_, Apr 30 2011
%E A134127 a(29)-a(32) from _Amiram Eldar_, Apr 30 2024