OFFSET
0,2
COMMENTS
Subset of A060735.
LINKS
Michael De Vlieger, Table of n, a(n) for n = 0..3494 (* rows n = 0..349, flattened *)
FORMULA
EXAMPLE
Rows n = 0..9:
n\k | 0 1 2 3 4
-------------------------------------------------------------
0 | 1 . . . .
1 | 2 4 . . .
2 | 6 12 24 . .
3 | 30 60 120 . .
4 | 210 420 840 1680 .
5 | 2310 4620 9240 18480 .
6 | 30030 60060 120120 240240 480480
7 | 510510 1021020 2042040 4084080 8168160
8 | 9699690 19399380 38798760 77597520 155195040
9 | 223092870 446185740 892371480 1784742960 3569485920
MATHEMATICA
nn = 16;
MapIndexed[Set[P[First[#2] - 1], #1] &,
FoldList[Times, 1, Prime@ Range[nn + 1] ] ];
Union@ Flatten@
Table[P[i]*2^Range[0, Floor[Log2[Prime[i + 1] ] ] ], {i, 0, nn}]
CROSSREFS
KEYWORD
nonn,tabf,easy
AUTHOR
Michael De Vlieger, Nov 17 2024
STATUS
approved