|
%I #8 Nov 15 2017 05:59:41
%S 1,2,2,5,2,5,5,14,2,5,5,14,5,14,14,41,2,5,5,14,5,14,14,41,5,14,14,41,
%T 14,41,41,122,2,5,5,14,5,14,14,41,5,14,14,41,14,41,41,122,5,14,14,41,
%U 14,41,41,122,14,41,41,122,41,122,122,365,2,5,5,14
%N a(n) = (A048883(n)+1)/2.
%C Rows of A079318 when written as a triangle converge to this sequence.
%F a(n) = A151712(n)/2.
%e If written as a triangle:
%e 1;
%e 2;
%e 2,5;
%e 2,5,5,14;
%e 2,5,5,14,5,14,14,41;
%e 2,5,5,14,5,14,14,41,5,14,14,41,14,41,41,122;
%t a048883[n_] := 3^DigitCount[n, 2, 1];
%t a[n_] := (a048883[n] + 1)/2;
%t Array[a, 70, 0] (* _Jean-François Alcover_, Nov 15 2017 *)
%Y Cf. A048883, A079314, A079318, A151712.
%K nonn
%O 0,2
%A _Omar E. Pol_, Jul 19 2009, Jul 23 2009
%E More terms from _Max Alekseyev_, Feb 23 2012
|
