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 A118734 #12 May 05 2025 01:30:12
%S A118734 6,15,33,37,42,43,44,46,47,50,54,55,57,58,64,67,70,71,77,82,83,84,85,
%T A118734 90,95,102,106,107,112,116,120,122,126,129,135,136,138,140,142,149,
%U A118734 154,161,168,170,173,176,178,179,180,181,185,193,195,198,200,207,209,210,217
%N A118734 Numbers k such that 2^k and 3^k have even digit sum.
%H A118734 Robert Israel, <a href="/A118734/b118734.txt">Table of n, a(n) for n = 1..10000</a>
%p A118734 filter:= proc(n) convert(convert(2^n,base,10),`+`)::even and convert(convert(3^n,base,10),`+`)::even end proc:
%p A118734 select(filter, [$1..1000]); # _Robert Israel_, Apr 12 2021
%t A118734 Select[Range[220], And @@ ((Mod[ Plus @@ IntegerDigits[ # ], 2] == 0 &) /@ {2^#, 3^#}) &] (* _Ray Chandler_, Jun 10 2006 *)
%Y A118734 Cf. Intersection of A118730 and A118733.
%K A118734 nonn,base
%O A118734 1,1
%A A118734 _Zak Seidov_, May 22 2006
%E A118734 Extended by _Ray Chandler_, Jun 10 2006