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.

A132657 a(n) is the product of the least prime > n^2 and the greatest prime < (n+1)^2.

This page as a plain text file.
%I A132657 #18 Aug 27 2022 18:31:44
%S A132657 6,35,143,391,899,1739,3233,5293,8051,11413,17653,24883,33389,43931,
%T A132657 56977,72731,92881,118829,145699,176039,212197,254701,308911,357163,
%U A132657 424663,492179,566609,660293,756611,864371,987307,1120697,1257923
%N A132657 a(n) is the product of the least prime > n^2 and the greatest prime < (n+1)^2.
%H A132657 Robert Israel, <a href="/A132657/b132657.txt">Table of n, a(n) for n = 1..10000</a>
%F A132657 a(n) = A007491(n) * A053001(n+1).
%e A132657 a(1) = 6 = 2*3 = (smallest prime in [1^2,2^2]) * (largest prime in [1^2,2^2]).
%e A132657 a(2) = 35 = 5*7 = (smallest prime in [2^2,3^2]) * (largest prime in [2^2,3^2]).
%p A132657 seq(nextprime(n^2)*prevprime((n+1)^2,n=1..100); # _Robert Israel_, Jan 26 2020
%t A132657 Table[Prime[PrimePi[n^2] + 1]*Prime[PrimePi[(n + 1)^2]], {n, 1, 40}] (* _Stefan Steinerberger_, Nov 20 2007 *)
%t A132657 NextPrime[#[[1]]]NextPrime[#[[2]],-1]&/@Partition[Range[40]^2,2,1] (* _Harvey P. Dale_, Aug 27 2022 *)
%o A132657 (PARI) for(n=1,33,print1(nextprime(n^2)*precprime((n+1)^2),", ")) \\ _Hugo Pfoertner_, Jan 26 2020
%Y A132657 Cf. A000040, A001358, A007491, A014085, A053000, A053001, A053607, A077766, A077767, A132435.
%K A132657 easy,nonn
%O A132657 1,1
%A A132657 _Jonathan Vos Post_, Nov 15 2007
%E A132657 More terms from _Stefan Steinerberger_, Nov 20 2007