%I A109664
%S A109664 1,2,8,48,384,4608,64512,1161216,23224320,557383680,16721510400,
%T A109664 535088332800,20333356646400,854000979148800,37576043082547200,
%U A109664 1803650067962265600,97397103669962342400,5843826220197740544000
%N A109664 a(1) = 1; for n>1, a(n) = Sum_{i=1..n-1} a(i)*prime(i).
%t A109664 a[n_] := 1 /; n == 1 a[n_] := Sum[a[i]*Prime[i], {i, 1, n-1}] Table[a[i], 
               {i, 1, 12}]
%Y A109664 Sequence in context: A095989 A124453 A000165 this_sequence A009812 A063075 
               A112541
%Y A109664 Adjacent sequences: A109661 A109662 A109663 this_sequence A109665 A109666 
               A109667
%K A109664 easy,nonn
%O A109664 1,2
%A A109664 Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Aug 06 2005
%E A109664 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 09 2005