A108221 Primes of the form ceiling(sqrt(prime(n))).

2, 2, 3, 3, 5, 5, 5, 7, 7, 7, 7, 11, 11, 11, 11, 11, 13, 13, 13, 13, 13, 17, 17, 17, 17, 17, 17, 17, 19, 19, 19, 19, 19, 19, 23, 23, 23, 23, 23, 23, 23, 29, 29, 29, 29, 29, 29, 29, 29, 29, 31, 31, 31, 31, 31, 31, 31, 31, 37, 37, 37, 37, 37, 37, 37, 37, 37, 41, 41, 41, 41, 41, 41

Offset

1,1

Links

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

Formula

a(n) = ceiling(sqrt(A108222(n))).

Mathematica

Ceiling /@ Sqrt /@ Select[Prime /@ Range[300], PrimeQ[Ceiling[Sqrt[ # ]]] &] (* Ray Chandler, Jul 03 2005 *)

Crossrefs

Sequence in context: A057872 A059974 A045767 * A169682 A082524 A099961

Adjacent sequences: A108218 A108219 A108220 * A108222 A108223 A108224

Keyword

easy,nonn

Author

Giovanni Teofilatto, Jun 16 2005

Extensions

Extended by Ray Chandler, Jul 03 2005

Status

approved