A256136 a(n) = 6^A000120(n).
1, 6, 6, 36, 6, 36, 36, 216, 6, 36, 36, 216, 36, 216, 216, 1296, 6, 36, 36, 216, 36, 216, 216, 1296, 36, 216, 216, 1296, 216, 1296, 1296, 7776, 6, 36, 36, 216, 36, 216, 216, 1296, 36, 216, 216, 1296, 216, 1296, 1296, 7776, 36, 216, 216, 1296, 216, 1296, 1296, 7776, 216, 1296, 1296, 7776, 1296, 7776
Offset: 0
Keywords
Examples
Also, written as an irregular triangle in which the row lengths are the terms of A011782, the sequence begins: 1; 6; 6, 36; 6, 36, 36, 216; 6, 36, 36, 216, 36, 216, 216, 1296; ...
Programs
-
Mathematica
6^# & /@ Nest[Join[#, # + 1] &, {0}, 6] (* Michael De Vlieger, Mar 20 2015, after IWABUCHI Yu(u)ki at a000120 *) -
PARI
a(n) = 6^hammingweight(n); \\ Michel Marcus, Mar 21 2015
Formula
G.f.: Product_{k>=0} (1 + 6*x^(2^k)). - Ilya Gutkovskiy, Feb 28 2017
Extensions
More terms from Michael De Vlieger, Mar 20 2015
Comments