login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A024449 4th elementary symmetric function of the first n+3 primes. 4

%I

%S 210,2927,20581,107315,414849,1376640,4224150,11063618,27395788,

%T 62364155,129081579,252768753,480307611,885449578,1541654028,

%U 2623783892,4318819858,6832984023,10644660237,16195499543,24304992465,36231495836

%N 4th elementary symmetric function of the first n+3 primes.

%p SymmPolyn := proc(L::list,n::integer)

%p local c,a,sel;

%p a :=0 ;

%p sel := combinat[choose](nops(L),n) ;

%p for c in sel do

%p a := a+mul(L[e],e=c) ;

%p end do:

%p a;

%p end proc:

%p A024449 := proc(n)

%p [seq(ithprime(k),k=1..n+3)] ;

%p SymmPolyn(%,4) ;

%p end proc: # _R. J. Mathar_, Sep 23 2016

%o (PARI) e4(v)=sum(i=1,#v-3,v[i]*sum(j=i+1,#v-2,v[j]*sum(k=j+1,#v-1,v[k]*vecsum(v[k+1..#v]))))

%o a(n)=e4(primes(n)) \\ _Charles R Greathouse IV_, Jun 15 2015

%K nonn

%O 1,1

%A _Clark Kimberling_

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 18 18:52 EDT 2019. Contains 324215 sequences. (Running on oeis4.)