0,2
a(n) = p^n Product (p^n - p^k) for k=0 to n-1
FoldList[ #1*6^#2 (6^#2-1)&, 1, Range[ 20 ] ]
Sequence in context: A006473 A115459 A135421 * A005801 A079601 A140762
Adjacent sequences: A028665 A028666 A028667 * A028669 A028670 A028671
nonn
Olivier Gerard (olivier.gerard(AT)gmail.com)