A145447 a(n) = the smallest square (and/or cube) > n-th prime

4, 4, 8, 8, 16, 16, 25, 25, 25, 36, 36, 49, 49, 49, 49, 64, 64, 64, 81, 81, 81, 81, 100, 100, 100, 121, 121, 121, 121, 121, 144, 144, 144, 144, 169, 169, 169, 169, 169, 196, 196, 196, 196, 196, 216, 216, 216, 225, 256, 256, 256, 256, 256, 256, 289, 289, 289, 289

Offset

1,1

Comments

a(n) = min(A145445(n), A145446(n) )= min ([A104103(n)]^2, [A104147(n)]^3)

Links

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

Mathematica

Table[Min[{Ceiling[Prime[n]^(1/3)]^3, Ceiling[Prime[n]^(1/2)]^2}], {n, 100}]

Crossrefs

A104103, A104147, A145445, A145446

Sequence in context: A377783 A328527 A378249 * A204989 A101921 A093340

Adjacent sequences: A145444 A145445 A145446 * A145448 A145449 A145450

Keyword

nonn

Author

Zak Seidov, Oct 10 2008

Status

approved