A070045 Primes of the form ceiling(k^1.5) for some integer k.

3, 19, 23, 37, 47, 53, 59, 71, 83, 97, 149, 157, 173, 199, 263, 397, 431, 599, 743, 757, 883, 941, 971, 1031, 1061, 1123, 1381, 1483, 1657, 1693, 1747, 1783, 1801, 1949, 1987, 2237, 2957, 3109, 3331, 3511, 3557, 3719, 4001, 4049, 4073, 4217, 4241, 4339

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Example

Ceiling(2^1.5) = 3 is a prime, so it is in the sequence.
Ceiling(3^1.5) = 6 is not prime, so it is not in the sequence.

Mathematica

Select[Ceiling[Range[400]^(3/2)], PrimeQ]

Prog

(PARI) for (n=1, 1000, if (isprime(ceil(n^1.5)), write("prime15.txt", ceil(n^1.5))))

Crossrefs

The corresponding values of k are in A070044.

Sequence in context: A042231 A191074 A019408 * A323784 A063557 A197541

Adjacent sequences: A070042 A070043 A070044 * A070046 A070047 A070048

Keyword

nonn,easy

Author

Jon Perry, May 03 2002

Extensions

Edited by Dean Hickerson, May 07 2002

Status

approved