A093862 Floor[ prime(n)^{prime(n)/n}], prime(n) = A000040(n).

4, 5, 14, 30, 195, 259, 973, 1089, 3019, 17416, 15956, 68436, 122031, 104011, 173476, 514829, 1399259, 1122753, 2749896, 3732219, 3000994, 6519381, 8421098, 16942907, 51129827, 61096684, 47709104, 56904308, 45489733, 54108081

Offset

1,1

Links

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

Example

a(8) = Floor[19^(19/8)]= Floor[1089.0298962779717053469717333646] = 1089.

Mathematica

Table[Floor[Prime[n]^(Prime[n]/n)], {n, 30}] (* Harvey P. Dale, Jun 02 2019 *)

Crossrefs

Cf. A093861.

Sequence in context: A316415 A007084 A216243 * A041375 A042279 A352683

Adjacent sequences: A093859 A093860 A093861 * A093863 A093864 A093865

Keyword

base,nonn

Author

Amarnath Murthy, Apr 19 2004

Extensions

More terms from Sam Handler (sam_5_5_5_0(AT)yahoo.com), Jul 10 2004

Status

approved