login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A081647 Integers congruent to 0, 1, 4, 9, 16, 25, 36 or 49 (mod 64) which are not squares. 1
65, 68, 73, 80, 89, 113, 128, 129, 132, 137, 153, 164, 177, 192, 193, 201, 208, 217, 228, 241, 257, 260, 265, 272, 281, 292, 305, 320, 321, 329, 336, 345, 356, 369, 384, 385, 388, 393, 409, 420, 433, 448, 449, 452, 457, 464, 473, 497, 512, 513, 516, 521, 528 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

REFERENCES

Mark A. Herkommer, Number Theory, A Programmer's Guide, McGraw-Hill, New York, 1999, page 315.

LINKS

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

MATHEMATICA

Select[ Range[546], (Mod[ #, 64] == 0 || Mod[ #, 64] == 1 || Mod[ #, 64] == 4 || Mod[ #, 64] == 9 || Mod[ #, 64] == 16 || Mod[ #, 64] == 25 || Mod[ #, 64] == 36 || Mod[ #, 64] == 49) && !IntegerQ[ Sqrt[ # ]] & ]

With[{nn=550}, Select[Complement[Range[nn], Range[Ceiling[ Sqrt[nn]]]^2], MemberQ[ {0, 1, 4, 9, 16, 25, 36, 49}, Mod[#, 64]]&]] (* Harvey P. Dale, Jul 26 2011 *)

CROSSREFS

Sequence in context: A296877 A044875 A174928 * A257444 A045025 A321502

Adjacent sequences:  A081644 A081645 A081646 * A081648 A081649 A081650

KEYWORD

easy,nonn

AUTHOR

Robert G. Wilson v, Mar 26 2003

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 21 21:32 EDT 2021. Contains 347605 sequences. (Running on oeis4.)