OFFSET
1,3
EXAMPLE
{1},
{1, 2},
{1, 2, 3},
{1, 2, 3, 4},
{1, 2, 3, 4, 1},
{1, 2, 3, 4, 1, 1, 2},
{1, 2, 3, 4, 1, 1, 2, 1, 2, 3},
{1, 2, 3, 4, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4},
{1, 2, 3, 4, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 1, 2, 3, 4, 1},
{1, 2, 3, 4, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 1, 2, 3, 4, 1, 1, 2, 3, 4, 1, 1, 2},
{1, 2, 3, 4, 1, 1, 2, 1, 2, 3, 1, 2, 3, 4, 1, 2, 3, 4, 1, 1, 2, 3, 4, 1, 1, 2, 1, 2, 3, 4, 1, 1, 2, 1, 2, 3}
MATHEMATICA
SubstitutionSystem[{1 -> {1, 2}, 2 -> {3}, 3 -> {4}, 4 -> {1}}, {1}, 10] // Flatten (* Jean-François Alcover, Jul 01 2023 *)
CROSSREFS
KEYWORD
nonn,tabf,easy
AUTHOR
Roger L. Bagula, May 02 2008
EXTENSIONS
Edited by N. J. A. Sloane, May 06 2008
STATUS
approved