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.

A115244 Indices of primes generated by Fung and Ruby's prime generating polynomial A050268.

This page as a plain text file.
%I A115244 #11 Mar 03 2016 22:53:38
%S A115244 402,299,206,118,24,78,141,191,224,257,272,279,276,264,242,211,167,
%T A115244 112,38,72,162,256,350,448,558,670,786,913,1042,1181,1319,1462,1620,
%U A115244 1777,1942,2119,2289,2473,2664,2851,3051,3250,3458,3684
%N A115244 Indices of primes generated by Fung and Ruby's prime generating polynomial A050268.
%C A115244 PrimePi[Negative Prime]=0 :Absolute value is necessary because of this.
%H A115244 G. C. Greubel, <a href="/A115244/b115244.txt">Table of n, a(n) for n = 0..7419</a>
%F A115244 a(n) = PrimePi(Abs(A050268(n))).
%p A115244 map(numtheory:-pi,select(isprime, [seq(abs(36*n^2 - 810* n + 2753), n=0..300)])); # _Robert Israel_, Mar 03 2016
%t A115244 Table[PrimePi[Abs[36*n^2 - 810*n + 2753]], {n, 0, 43}]
%t A115244 a := Select[Table[36 n^2 - 810 n + 2753, {n, 0, 200}], PrimeQ];
%t A115244 PrimePi[Abs[a]] (* _G. C. Greubel_, Feb 08 2016 *)
%Y A115244 Cf. A005846, A050268, A117081.
%K A115244 nonn
%O A115244 0,1
%A A115244 _Roger L. Bagula_, May 11 2006
%E A115244 Name edited by _Robert Israel_, Mar 03 2016