认识一下这些工具, 备用。
- Flatten@Table[n, {n, 9}, {n}]
复制代码 OEIS--A002024
{1, 2, 2, 3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9}
- Flatten@Table[2 n - 1, {n, 9}, {n}]
复制代码 OEIS--A131507, 没有这通项。
{1, 3, 3, 5, 5, 5, 7, 7, 7, 7, 9, 9, 9, 9, 9, 11, 11, 11, 11, 11, 11, 13, 13, 13, 13, 13, 13, 13, 15, 15, 15, 15}
- Flatten@Table[2 n - 1, {n, 9}, {2 n - 1}]
复制代码 OEIS--A001650, 没有这通项。
{1, 3, 3, 3, 5, 5, 5, 5, 5, 7, 7, 7, 7, 7, 7, 7, 9, 9, 9, 9, 9, 9, 9, 9, 9, 11, 11, 11, 11, 11, 11, 11, 11, 11,11,11}
- Flatten@Table[2 n - 3, {n, 2, 9}, {n}]
复制代码 OEIS--还没有。
{1, 1, 3, 3, 3, 5, 5, 5, 5, 7, 7, 7, 7, 7, 9, 9, 9, 9, 9, 9, 11, 11, 11, 11, 11, 11, 11, 13, 13, 13, 13, 13, 13, 13}
- Flatten@Table[n, {n, 9}, {2 n - 3}]
复制代码 OEIS--还没有。
{2, 3, 3, 3, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8} |