A304679 A prime-multiplicity (or run-length) describing recurrence: a(n+1) = A181821(a(n)).
3, 4, 6, 18, 450, 205439850, 241382525361273331926149714645357743772646450
Offset: 0
Keywords
Examples
The list of multisets with Heinz numbers in the sequence is A014643. The number of k's in row n + 1 is equal to the k-th term of row n. The length of row n is A014644(n). 3: {2} 4: {1,1} 6: {1,2} 18: {1,2,2} 450: {1,2,2,3,3} 205439850: {1,2,2,3,3,4,4,4,5,5,5}
Crossrefs
Programs
-
Mathematica
Function[m,Times@@Prime/@m]/@NestList[Join@@Table[Table[i,{#[[i]]}],{i,Length[#]}]&,{2},6]
Comments