%I #5 Jul 26 2017 09:28:02
%S 1,2,1,2,4,2,1,2,1,2,6,2,4,8,4,2,6,2,1,2,1,2,4,2,1,2,1,2,6,2,6,12,6,2,
%T 6,2,4,12,4,8,16,8,4,12,4,2,6,2,6,12,6,2,6,2,1,2,1,2,4,2,1,2,1,2,6,2,
%U 4,8,4,2,6,2,1,2,1,2,4,2,1,2,1,2,6,2,6,12,6,2,6,2,6,30,6,12,24,12,6,30,6,2,6,2,6,12,6,2
%N Filter based on 1-digits of base-3 expansion: a(n) = A278222(A289813(n)).
%H Antti Karttunen, <a href="/A290091/b290091.txt">Table of n, a(n) for n = 0..19683</a>
%o (Scheme) (define (A290091 n) (A278222 (A289813 n)))
%Y Cf. A278222, A289813, A290092, A290093.
%K nonn
%O 0,2
%A _Antti Karttunen_, Jul 25 2017
|