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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A024523 a(n) = 3rd elementary symmetric function of {1, p(1), p(2), ..., p(n-1)}, where p(0) = 1. 2
6, 61, 348, 1646, 5754, 17535, 44268, 102412, 227750, 452531, 869928, 1576686, 2666994, 4341745, 6932756, 10845872, 16266454, 24022575, 34629762, 48484870, 67169634, 91475603, 123389134, 165725172, 219251334, 284875003, 365853566 (list; graph; refs; listen; history; text; internal format)
OFFSET

3,1

LINKS

Table of n, a(n) for n=3..29.

MAPLE

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

    local c, a, sel;

    a :=0 ;

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

    for c in sel do

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

    end do:

    a;

end proc:

A024523 := proc(n)

    [1, seq(ithprime(k), k=1..n-1)] ;

    SymmPolyn(%, 3) ;

end proc: # R. J. Mathar, Sep 23 2016

CROSSREFS

Sequence in context: A324200 A077682 A055331 * A252873 A068171 A069633

Adjacent sequences:  A024520 A024521 A024522 * A024524 A024525 A024526

KEYWORD

nonn

AUTHOR

Clark Kimberling

STATUS

approved

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 April 18 10:38 EDT 2019. Contains 322209 sequences. (Running on oeis4.)