A094092 a(n) = floor(sqrt(n)^sqrt(n)).

1, 1, 2, 4, 6, 8, 13, 18, 27, 38, 53, 73, 101, 139, 189, 256, 344, 460, 612, 811, 1070, 1406, 1842, 2403, 3125, 4050, 5233, 6742, 8662, 11098, 14183, 18080, 22993, 29173, 36933, 46656, 58816, 73998, 92917, 116455, 145689, 181940, 226821, 282303, 350786, 435197, 539091

Offset

1,3

Links

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

Mathematica

Table[Floor[Sqrt[n]^Sqrt[n], 1000], {n, 1, 50}]

Prog

(PARI) a(n) = floor(sqrt(n)^sqrt(n)); \\ Stefano Spezia, Sep 05 2025

Crossrefs

Cf. A094054, A094093.

Sequence in context: A376624 A039846 A367218 * A387118 A072791 A058320

Adjacent sequences: A094089 A094090 A094091 * A094093 A094094 A094095

Keyword

nonn

Author

Matthijs Coster, Apr 29 2004

Extensions

More terms from Labos Elemer, Apr 30 2004

a(45)-a(47) from Stefano Spezia, Sep 05 2025

Status

approved