login
Even sums of 2 consecutive odious numbers (A000069).
1

%I #12 Aug 31 2020 03:52:32

%S 6,24,30,40,54,72,86,96,102,120,126,136,150,160,166,184,198,216,222,

%T 232,246,264,278,288,294,312,326,344,350,360,374,384,390,408,414,424,

%U 438,456,470,480,486,504,510,520,534,544,550,568,582,600,606,616,630

%N Even sums of 2 consecutive odious numbers (A000069).

%C All the terms in this sequence are evil numbers (A001969).

%H Amiram Eldar, <a href="/A234648/b234648.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = A234011(A036554(n)) = A225822(n) + (-1)^n.

%t odQ[n_] := OddQ @ DigitCount[n, 2, 1]; Select[Plus @@@ Partition[Select[ Range[320], odQ], 2, 1], EvenQ] (* _Amiram Eldar_, Aug 31 2020 *)

%Y Intersection of A005843 and A234011.

%Y Cf. A000069, A001969, A036554, A131323, A225822.

%K nonn,base

%O 1,1

%A _Gerasimov Sergey_, Dec 29 2013