login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A084062 Main diagonal of number array A084061. 7
1, 1, 6, 54, 656, 10000, 182952, 3899224, 94769152, 2584929024, 78145100000, 2592261435104, 93586594074624, 3651967705305088, 153140949522798720, 6866498202750000000, 327772442129447518208, 16593897777705323921408 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

G. C. Greubel, Table of n, a(n) for n = 0..380

FORMULA

a(n) = ( (n + sqrt(n))^n + (n - sqrt(n))^n )/2.

MAPLE

seq( `if`(n=0, 1, round(( (n + sqrt(n))^n + (n - sqrt(n))^n )/2)), n=0..20); # G. C. Greubel, Jan 03 2020

MATHEMATICA

Table[If[n==0, 1, Round[((n+Sqrt[n])^n + (n-Sqrt[n])^n)/2]], {n, 0, 20}] (* G. C. Greubel, Jan 03 2020 *)

PROG

(PARI) vector(21, n, if(n==0, 1, round( ( (n-1 + sqrt(n-1))^(n-1) + (n-1 - sqrt(n-1))^(n-1) )/2 )) ) \\ G. C. Greubel, Jan 03 2020

(MAGMA) [1] cat [Round(( (n +Sqrt(n))^n + (n -Sqrt(n))^n )/2): n in [1..20]]; // G. C. Greubel, Jan 03 2020

(Sage) [1]+[round(( (n +sqrt(n))^n + (n -sqrt(n))^n )/2) for n in (1..30)] # G. C. Greubel, Jan 03 2020

CROSSREFS

Cf. A084063, A084095.

Sequence in context: A081132 A158831 A034001 * A292633 A137591 A292716

Adjacent sequences:  A084059 A084060 A084061 * A084063 A084064 A084065

KEYWORD

easy,nonn,changed

AUTHOR

Paul Barry, May 11 2003

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 January 22 16:37 EST 2020. Contains 331152 sequences. (Running on oeis4.)