OFFSET
1,3
COMMENTS
For n > 2: a(n) = A257053(n,0). - Reinhard Zumkeller, Apr 15 2015
LINKS
Harry J. Smith, Table of n, a(n) for n=1..1000
MATHEMATICA
Table[Floor[Sqrt@ Prime@ n]^2, {n, 60}] (* Michael De Vlieger, Jul 03 2016 *)
PROG
(PARI) { for (n=1, 1000, a=sqrtint(prime(n))^2; write("b065730.txt", n, " ", a) ) } \\ Harry J. Smith, Oct 28 2009
(Haskell)
a065730 = a048760 . a000040 -- Reinhard Zumkeller, Apr 15 2015
(Magma) [Floor(Sqrt(NthPrime(n)))^2: n in [1..70]] // Vincenzo Librandi, Jan 05 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Labos Elemer, Nov 15 2001
STATUS
approved