A366202 Numbers x such that (x^2 AND x) is not a square, where AND is the bitwise logical-and operation.

21, 23, 25, 39, 42, 43, 45, 47, 49, 51, 55, 58, 73, 75, 78, 79, 83, 85, 86, 87, 91, 93, 95, 97, 99, 101, 103, 106, 107, 109, 110, 111, 113, 115, 117, 122, 140, 141, 142, 143, 149, 150, 151, 153, 154, 155, 158, 159, 162, 163, 166, 167, 169, 170, 171, 172, 175

Offset: 1

Author

Alex Ratushnyak, Oct 04 2023

Keywords

• nonn
• base

Comments

Numbers x such that A213541(x) is not in A000290.

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000290, A213541.

Programs

Mathematica

Select[Range[200],!IntegerQ[Sqrt[BitAnd[#^2,#]]]&] (* Harvey P. Dale, Nov 17 2024 *)