cp's OEIS Frontend

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.

A226643 Numbers n such that the binary XOR of the divisors of n (A178910) is a binary palindrome (A006995) and not a power of 2 (A000079).

This page as a plain text file.
%I A226643 #11 Aug 20 2013 13:25:21
%S A226643 81,162,169,324,338,648,676,1296,1352,2401,2592,2704,3249,4802,5184,
%T A226643 5408,6498,9604,10368,10816,12996,19208,20736,21632,25992,38416,41472,
%U A226643 43264,51984,76832,82944,86528,103968,112225,153664,165888,173056,194481
%N A226643 Numbers n such that the binary XOR of the divisors of n (A178910) is a binary palindrome (A006995) and not a power of 2 (A000079).
%C A226643 A takeoff of A227843.
%t A226643 f[n_] := Fold[ BitXor[#1, #2] &, 0, Divisors@ n]; palQ[n_Integer, base_Integer] := Module[{idn = IntegerDigits[n, base]}, idn == Reverse@ idn]; fQ[n_] := palQ[ f@ n, 2] && ! IntegerQ@ Log2@ n; Select[ Range@ 200000, fQ]
%Y A226643 Cf. A000079, A006995, A178910, A227843.
%K A226643 nonn,base
%O A226643 1,1
%A A226643 _Robert G. Wilson v_, Aug 18 2013