A005128 Number of k for which n does not divide Stirling_2 subset numbers S(n, k).

1, 0, 2, 2, 4, 2, 5, 2, 8, 7, 7, 2, 10, 2, 9, 10, 16, 2, 16, 2, 16, 11, 13, 2, 20, 15, 13, 22, 20, 2, 13, 2, 32, 14, 11, 20, 32, 2, 18, 18, 33, 2, 33, 2, 26, 31, 20, 2, 44, 28, 34, 20, 31, 2, 47, 23, 38, 19, 18, 2, 42, 2, 15, 37, 64, 29, 37, 2, 33, 22, 43, 2, 58, 2, 26, 57, 40, 42

Offset

0,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..10000

Mathematica

Prepend[ Array[ Length[ Select[ Table[ StirlingS2[ #, k ]/#, {k, 0, #} ], !IntegerQ[ # ]& ] ]&, 100 ], 1 ]

Crossrefs

Cf. A048993.

Sequence in context: A353845 A217895 A328720 * A187782 A129296 A300837

Adjacent sequences: A005125 A005126 A005127 * A005129 A005130 A005131

Keyword

nonn

Author

Olivier Gérard

Status

approved