OFFSET
1,1
COMMENTS
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
EXAMPLE
9 is a term because 9^2 = 81 = 40 + 41, neither of which are square.
MATHEMATICA
Select[Range[1, 131, 2], AllTrue[{Floor[#^2/2], Ceiling[#^2/2]}, ! IntegerQ@ Sqrt@ # &] &] (* Michael De Vlieger, Dec 11 2015 *)
PROG
(PARI) select( is(n)={bittest(n, 0) && !issquare(n^2\2) && !issquare(n^2\/2)}, [0..140]) \\ Corrected Jul 06 2021, thanks to an observation by Bill McEachen
CROSSREFS
KEYWORD
nonn
AUTHOR
M. F. Hasler, May 08 2015
STATUS
approved