A133450: correction, more terms, Mmca
Maximilian Hasler
maximilian.hasler at gmail.com
Wed Dec 26 22:26:44 CET 2007
this seq. appears to be just every other term of
http://www.research.att.com/~njas/sequences/A056929
Difference between n^2 and average of smallest prime greater than n^2
and largest prime less than n^2.
As such it becomes a bit less interesting in itself (IMHO)...
%I A133450
%S A133450 0, 1, 2, 0, 1, 0, 1, 2, 0, 1, 1, 2, 1, 4, 3, -2, -2
%F A133450 a(n)=A056929(2n)
%Y A133450 Cf. A056929
%o A133450 (PARI) A133450(n)=4*n^2-(precprime(4*n^2)+nextprime(4*n^2))/2
%A A133450 Maximilian F. Hasler (Maximilian.Hasler(AT)gmail.com), Dec 26 2007
In order not to mix up Neil's scripts, I resist against puting the
obvious PARI code for A056929 in this very same e-mail (just remove
the "4*"s) - anyway, that other seq. already has the corresponding
Maple code.
On Dec 23, 2007 4:32 PM, zak seidov <zakseidov at yahoo.com> wrote:
> Neil, Alexander,
>
> 1.
> %e A133450 a(5)=5 because 100 - (89 + 101)/2 = 5
> should be
> %e A133450 a(5)=1 because 100 - (97 + 101)/2 = 1
>
> 2.
> More terms:
>
> %S A133450
> 0,1,2,0,1,0,1,2,0,1,1,2,1,4,3,-2,-2,2,1,1,-4,-5,-5,1,10,1,3,7,-2,0,4,0,3,-5,4,0,2,12,0,-9,-2,6,-6,-3,3,0,2,1,-3,10,-9,1,10,-3,1,0,4,2,-2,5,1,1,8,-12,5,-1,8,-2,0,0,-3,-1,1,2,8,-4,12,3,4,5,1,-2,-10,0,10,0,-6,2,7,9,-10,2,-1,-2,-2,0,-2,4,0,1
>
> 3.
> Mmca code:
> Table[n^2-(Prime[PrimePi[n^2]]+Prime[PrimePi[n^2]+1])/2,{n,2,200,2}]
> - Zak Seidov (zakseidov at yahoo.com)
>
More information about the SeqFan
mailing list