%I A122761
%S A122761 1,2,6,1,3,9,2,6,18,54,1,3,9,27,81,2,6,18,54,162,486,1,3,9,27,81,243,
%T A122761 729,2,6,18,54,162,486,1458,4374,1,3,9,27,81,243,729,2187,6561,2,6,18,
%U A122761 54,162,486,1458,4374,13122,39366,1,3,9,27,81,243,729,2187,6561,19683
%N A122761 "Completed" Cantor based power of three triangular array: t(n,m)=3^n*(1+Mod[n,
               2]): power sets as {1,0}set +{0,2}set={1,2}set.
%D A122761 Lynn Arthur Steen and J. Arthur Seebach, Jr., Counterexamples in Topology, 
               Dover, New York, 1978, pp. 57-58
%F A122761 t(n,m)=3^n*(1+Mod[n,2])
%e A122761 1
%e A122761 2, 6
%e A122761 1, 3, 9
%e A122761 2, 6, 18, 54
%e A122761 1, 3, 9, 27, 81
%e A122761 2, 6, 18, 54, 162, 486
%e A122761 1, 3, 9, 27, 81, 243, 729
%t A122761 c[n_] := 1 + Mod[n, 2] T3[n_, m_] := 3^n*c[m] c0 = Table[Table[T3[n, 
               m], {n, 0, m}], {m, 0, 10}]; Flatten[c0] MatrixForm[c0]
%Y A122761 Sequence in context: A078434 A021892 A121601 this_sequence A100469 A124320 
               A156146
%Y A122761 Adjacent sequences: A122758 A122759 A122760 this_sequence A122762 A122763 
               A122764
%K A122761 nonn,tabl,uned
%O A122761 1,2
%A A122761 Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 21 2006