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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A025195 [ 4th elementary symmetric function of {sqrt(k)} ], k = 1,2,...,n. 1
4, 35, 144, 442, 1120, 2491, 5027, 9405, 16562, 27752, 44608, 69217, 104194, 152764, 218848, 307162, 423311, 573901, 766646, 1010488, 1315718, 1694111 (list; graph; refs; listen; history; text; internal format)
OFFSET

4,1

LINKS

Table of n, a(n) for n=4..25.

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:

A025195 := proc(n)

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

    SymmPolyn(%, 4) ;

    floor(%) ;

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

CROSSREFS

Sequence in context: A185592 A296280 A011195 * A005552 A127519 A128811

Adjacent sequences:  A025192 A025193 A025194 * A025196 A025197 A025198

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 May 19 02:29 EDT 2019. Contains 323377 sequences. (Running on oeis4.)