A077163 n-th power of next n numbers.

1, 4, 9, 64, 125, 216, 2401, 4096, 6561, 10000, 161051, 248832, 371293, 537824, 759375, 16777216, 24137569, 34012224, 47045881, 64000000, 85766121, 2494357888, 3404825447, 4586471424, 6103515625, 8031810176, 10460353203

Offset

1,2

Links

Table of n, a(n) for n=1..27.

Formula

a(n) = n^A002024(n) = n^round(sqrt(2*n)). - Antonio G. Astudillo (afg_astudillo(AT)hotmail.com), Nov 01 2002

Maple

A077163 := n->n^round(sqrt(2*n));

Mathematica

npn[n_]:=Module[{t=(n(n+1))/2}, Range[t-n+1, t]^n]; Flatten[Array[npn, 10]] (* Harvey P. Dale, Mar 08 2015 *)

Prog

(Python)
from math import isqrt
def A077163(n): return n**(isqrt(n<<3)+1>>1) # Chai Wah Wu, Jun 19 2024

Crossrefs

Sequence in context: A263675 A140483 A124683 * A231812 A069711 A062067

Adjacent sequences: A077160 A077161 A077162 * A077164 A077165 A077166

Keyword

nonn

Author

Amarnath Murthy, Oct 31 2002

Extensions

More terms from Antonio G. Astudillo (afg_astudillo(AT)hotmail.com), Nov 01 2002

Status

approved