A146097 Bell numbers (A000110) read mod 7.
1, 1, 2, 5, 1, 3, 0, 2, 3, 0, 6, 4, 3, 2, 5, 3, 6, 3, 0, 5, 0, 1, 2, 2, 3, 5, 5, 1, 3, 4, 5, 1, 3, 6, 4, 0, 2, 6, 4, 2, 3, 4, 2, 1, 3, 6, 5, 0, 6, 3, 4, 2, 4, 5, 6, 2, 0, 6, 6, 2, 4, 1, 2, 6, 5, 1, 6, 5, 3, 1, 4, 6, 0, 4, 1, 4, 5, 3, 6, 4, 5, 5, 2, 1, 2, 3, 2, 3, 0, 3, 3, 5, 5, 5, 3, 3, 6, 1, 3, 3, 1, 6, 2, 0, 4
Offset: 0
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 0..10000
- W. F. Lunnon, P. A. B. Pleasants, and N. M. Stephens, Arithmetic properties of Bell numbers to a composite modulus I, Acta Arithmetica 35 (1979), pp. 1-16.
- Index entries for linear recurrences with constant coefficients, order 137257.
Programs
-
Magma
[Bell(n) mod 7: n in [0..100]]; // Vincenzo Librandi, Feb 01 2016
-
Maple
seq(combinat:-bell(n) mod 7, n=0..100); # Robert Israel, Jan 31 2016
-
Mathematica
Mod[BellB[Range[0, 100]], 7] (* G. C. Greubel, Jan 31 2016 *)