A121623 Floor((prime(n)/n)^n).

2, 2, 4, 9, 51, 103, 498, 1012, 4649, 42070, 89055, 738321, 3054404, 6649146, 27548565, 210132966, 1537632445, 3475617204, 25067027254, 101057153476, 230767621110, 1638690855904, 6592587402477, 45739388949584

Offset

1,1

Links

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

Mathematica

Table[Floor[(Prime[n]/n)^n], {n, 25}] (* Harvey P. Dale, Aug 11 2011 *)

Crossrefs

Cf. A121624.

Sequence in context: A006182 A267339 A308434 * A267347 A296386 A296643

Adjacent sequences: A121620 A121621 A121622 * A121624 A121625 A121626

Keyword

easy,nonn

Author

Jason Earls, Aug 11 2006

Status

approved