

A070044


Numbers k such that ceiling(k^1.5) is prime.


1



2, 7, 8, 11, 13, 14, 15, 17, 19, 21, 28, 29, 31, 34, 41, 54, 57, 71, 82, 83, 92, 96, 98, 102, 104, 108, 124, 130, 140, 142, 145, 147, 148, 156, 158, 171, 206, 213, 223, 231, 233, 240, 252, 254, 255, 261, 262, 266, 267, 275, 284, 297, 299, 300, 315, 322, 343, 354
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,1


LINKS

Table of n, a(n) for n=0..57.


EXAMPLE

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


MATHEMATICA

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


PROG

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


CROSSREFS

The corresponding primes are in A070045.
Sequence in context: A329648 A206331 A053013 * A129850 A037073 A329407
Adjacent sequences: A070041 A070042 A070043 * A070045 A070046 A070047


KEYWORD

nonn


AUTHOR

Jon Perry, May 03 2002


EXTENSIONS

Edited by Dean Hickerson, May 07 2002


STATUS

approved



