OFFSET
0,3
COMMENTS
LINKS
Rémy Sigrist, Table of n, a(n) for n = 0..8192
FORMULA
a(n) = 0 iff n is a square.
a(a(n)) <= n.
EXAMPLE
For n = 7,
- 7 XOR 0 = 7 (not a square),
- 7 XOR 1 = 6 (not a square),
- 7 XOR 2 = 5 (not a square),
- 7 XOR 3 = 4 = 2^2,
- hence a(7) = 3.
MATHEMATICA
A330270[n_] := Module[{k = -1}, While[!IntegerQ[Sqrt[BitXor[n, ++k]]]]; k];
Array[A330270, 100, 0] (* Paolo Xausa, Feb 19 2024 *)
PROG
(PARI) a(n) = for (k=0, oo, if (issquare(bitxor(n, k)), return (k)))
(Python)
from itertools import count
from sympy.ntheory.primetest import is_square
def A330270(n): return next(k for k in count(0) if is_square(n^k)) # Chai Wah Wu, Aug 22 2023
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Rémy Sigrist, Dec 08 2019
STATUS
approved