OFFSET
1,1
COMMENTS
Links to sequences of the form n XOR m = n - m are found below with the value of m specified.
LINKS
FORMULA
a(n)= 1+8*n-2*(-1)^n.
G.f. x*(11+4*x+x^2) / ( (1+x)*(x-1)^2 ). - R. J. Mathar, Mar 10 2013
MATHEMATICA
Select[Range[400], BitXor[#, 11]==#-11&] (* or *) LinearRecurrence[{1, 1, -1}, {11, 15, 27}, 50] (* Harvey P. Dale, Jun 05 2021 *)
PROG
(Magma)
XOR := func<a, b | Seqint([ (adigs[i] + bdigs[i]) mod 2 : i in [1..n]], 2)
where adigs := Intseq(a, 2, n)
where bdigs := Intseq(b, 2, n)
where n := 1 + Ilog2(Max([a, b, 1]))>;
m:=11;
for n in [1 .. 500] do
if (XOR(n, m) eq n-m) then n; end if;
end for;
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Brad Clardy, Mar 09 2013
STATUS
approved