The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A062269 Numbers k such that floor(gamma * k) is a square, where gamma is the Euler-Mascheroni constant (A001620). 1
 0, 1, 2, 3, 7, 8, 16, 17, 28, 29, 44, 45, 63, 64, 85, 86, 111, 112, 141, 142, 174, 210, 211, 250, 251, 293, 294, 340, 341, 390, 391, 444, 445, 501, 502, 562, 563, 626, 627, 693, 694, 765, 839, 840, 917, 918, 998, 999, 1083, 1084, 1172, 1263, 1264, 1359, 1457 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 LINKS Harry J. Smith, Table of n, a(n) for n = 0..1000 MAPLE readlib(issqr): for n from 0 to 2000 do if issqr(floor(gamma*n)) then printf(`%d, `, n) fi od: MATHEMATICA Select[Range[0, 1500], IntegerQ[Sqrt[Floor[# EulerGamma]]]&] (* Harvey P. Dale, Oct 08 2017 *) PROG (PARI) for(n=0, 200, if(issquare(floor(Euler*n)), print(n))) (PARI) { default(realprecision, 30); n=-1; for (m=0, 10^9, if (issquare(floor(Euler*m)), write("b062269.txt", n++, " ", m); if (n==1000, break)) ) } \\ Harry J. Smith, Aug 03 2009 CROSSREFS Cf. A001620 (Euler-Mascheroni constant). Sequence in context: A097095 A101755 A076550 * A244508 A060121 A002964 Adjacent sequences: A062266 A062267 A062268 * A062270 A062271 A062272 KEYWORD easy,nonn AUTHOR Jason Earls, Jul 01 2001 EXTENSIONS More terms from Francisco Salinas (franciscodesalinas(AT)hotmail.com), Jan 05 2002 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified June 10 03:49 EDT 2023. Contains 363187 sequences. (Running on oeis4.)