A061812 Numbers k such that floor(Pi*k) is a square.

0, 3, 8, 26, 32, 46, 54, 92, 115, 199, 268, 306, 326, 368, 390, 436, 796, 828, 861, 963, 1071, 1146, 1304, 1345, 1429, 1472, 1560, 2193, 2246, 2300, 2465, 2636, 2873, 2995, 3120, 3312, 3377, 3443, 3713, 3782, 3922, 3993, 4137, 4738, 4816, 5297, 6062, 6239

Offset

0,2

Links

Harry J. Smith, Table of n, a(n) for n = 0..1000

Example

Floor(Pi*861) = 2704 = 52^2, so 861 is a term;
floor(Pi*1146) = 3600 = 60^2, so 1146 is a term.

Mathematica

Select[Range[0, 7000], IntegerQ[Sqrt[Floor[Pi #]]]&] (* Harvey P. Dale, May 14 2011 *)

Prog

(PARI) for(n=0, 1200, if(issquare(floor(Pi*n)), print(n)))
(PARI) { n=-1; for (a=0, 3714376, if (issquare(floor(Pi*a)), write("b061812.txt", n++, " ", a)) ) } \\ Harry J. Smith, Jul 28 2009

Crossrefs

Cf. A022844.

Sequence in context: A097713 A009392 A130648 * A009452 A206141 A281972

Adjacent sequences: A061809 A061810 A061811 * A061813 A061814 A061815

Keyword

easy,nice,nonn

Author

Jason Earls, Jul 01 2001

Extensions

More terms from Naohiro Nomoto, Oct 04 2001

Status

approved