|
|
A024923
|
|
Partial products of the sequence of prime powers (A000961).
|
|
3
|
|
|
1, 2, 6, 24, 120, 840, 6720, 60480, 665280, 8648640, 138378240, 2352430080, 44696171520, 1028011944960, 25700298624000, 693908062848000, 20123333822592000, 623823348500352000, 19962347152011264000, 738606844624416768000, 30282880629601087488000, 1302163867072846761984000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
PROG
|
(PARI) ispp1(n) = isprimepower(n) || (n==1); \\ A000961
lista(nn) = {my(s=1); for (n=1, nn, if (ispp1(n), s*= n; print1(s, ", ")); ); } \\ Michel Marcus, Mar 26 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Den Roussel (DenRoussel(AT)webtv.net)
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|