This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A169814 #19 Jul 07 2023 06:39:49
%S A169814 0,3,1,6,1,4,1,12,15,14,1,8,1,8,7,24,1,20,1,28,25,28,1,16,13,22,9,16,
%T A169814 1,22,1,48,53,50,59,40,1,52,63,56,1,38,1,56,53,56,1,32,27,38,19,44,1,
%U A169814 36,31,32,29,38,1,44,1,32,27,96,113,86,1,100,105,94,1,80,1,110,99,104,113,86
%N A169814 a(n) = n XOR phi(n).
%H A169814 Amiram Eldar, <a href="/A169814/b169814.txt">Table of n, a(n) for n = 1..10000</a>
%F A169814 a(n) = 1 <=> n in { A065091 }. - _Alois P. Heinz_, Jul 06 2023
%p A169814 a:= n-> Bits[Xor](n, numtheory[phi](n)):
%p A169814 seq(a(n), n=1..89); # _Alois P. Heinz_, Jul 06 2023
%t A169814 Table[BitXor[n,EulerPhi[n]],{n,80}] (* _Harvey P. Dale_, Sep 18 2011 *)
%o A169814 (PARI) a(n)=bitxor(n,eulerphi(n)) \\ _Charles R Greathouse IV_, Feb 21 2013
%Y A169814 Cf. A000010, A065091, A070883, A169810, A169811, A169812, A169813.
%K A169814 nonn,base
%O A169814 1,2
%A A169814 _N. J. A. Sloane_, May 28 2010