A306957 a(n) = n!*binomial(10,n).

1, 10, 90, 720, 5040, 30240, 151200, 604800, 1814400, 3628800, 3628800, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0

Offset

0,2

Comments

If this map is iterated, there is a cycle of length 4: 0 -> 1 -> 10 -> 3628800 -> 0.

References

P. Kiss, A generalization of a problem in number theory, Math. Sem. Notes Kobe Univ., 5 (1977), no. 3, 313-317. MR 0472667 (57 #12362).

Links

Table of n, a(n) for n=0..70.

P. Kiss, A generalization of a problem in number theory, [Hungarian], Mat. Lapok, 25 (No. 1-2, 1974), 145-149.

H. J. J. te Riele, Iteration of number-theoretic functions, Nieuw Archief v. Wiskunde, (4) 1 (1983), 345-360. See Example I.1.d.

Index entries for linear recurrences with constant coefficients, signature (1).

Mathematica

Table[n! Binomial[10, n], {n, 0, 60}] (* Vincenzo Librandi, Mar 18 2019 *)

Prog

(Magma) [Factorial(n)*Binomial(10, n): n in [0..60]]; // Vincenzo Librandi, Mar 18 2019

Crossrefs

Sequence in context: A377195 A228418 A306958 * A319893 A319874 A159733

Adjacent sequences: A306954 A306955 A306956 * A306958 A306959 A306960

Keyword

nonn

Author

N. J. A. Sloane, Mar 17 2019

Status

approved