A162784 a(n) = (A048883(n)+1)/2.

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, 14, 41, 41, 122, 2, 5, 5, 14, 5, 14, 14, 41, 5, 14, 14, 41, 14, 41, 41, 122, 5, 14, 14, 41, 14, 41, 41, 122, 14, 41, 41, 122, 41, 122, 122, 365, 2, 5, 5, 14

Offset: 0

Author

Omar E. Pol, Jul 19 2009, Jul 23 2009

Keywords

• nonn

Comments

Rows of A079318 when written as a triangle converge to this sequence.

Examples

			If written as a triangle:
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,14,41,41,122;
		

Crossrefs

Cf. A048883, A079314, A079318, A151712.

Programs

Mathematica

a048883[n_] := 3^DigitCount[n, 2, 1];
a[n_] := (a048883[n] + 1)/2;
Array[a, 70, 0] (* Jean-François Alcover, Nov 15 2017 *)

Formula

a(n) = A151712(n)/2.

Extensions

More terms from Max Alekseyev, Feb 23 2012