0,2
a(n) = p^n Product (p^n - p^k) for k=0 to n-1
FoldList[ #1*12^#2 (12^#2-1)&, 1, Range[ 20 ] ]
Sequence in context: A181194 A114534 A147692 * A003915 A046439 A031188
Adjacent sequences: A028671 A028672 A028673 * A028675 A028676 A028677
nonn
Olivier Gerard (olivier.gerard(AT)gmail.com)