0,2
a(n) = p^n Product (p^n - p^k) for k=0 to n-1
FoldList[ #1*13^#2 (13^#2-1)&, 1, Range[ 20 ] ]
Sequence in context: A035838 A035824 A006112 * A090851 A045230 A180551
Adjacent sequences: A028672 A028673 A028674 * A028676 A028677 A028678
nonn
Olivier Gerard (olivier.gerard(AT)gmail.com)