A103950 a(n) is the number of distinct n-th powers of functions {1, 2, 3, 4, 5, 6} -> {1, 2, 3, 4, 5, 6}.

1, 46656, 13356, 11026, 5721, 12942, 3136, 13806, 5601, 9286, 5952, 13806, 1921, 13806, 6816, 8422, 5601, 13806, 3136, 13806, 4737, 9286, 6816, 13806, 1921, 12942, 6816, 9286, 5601, 13806, 2272, 13806, 5601, 9286, 6816, 12942, 1921, 13806, 6816

Offset: 0

Author

David Wasserman, Feb 23 2005

Keywords

• nonn
• easy

Comments

For n > 4, a(n+60) = a(n).

Links

• Ray Chandler, Table of n, a(n) for n = 0..10000
• Index entries for linear recurrences with constant coefficients, signature (-1, -2, -2, -2, -1, 0, 1, 2, 2, 2, 1, 1).

Crossrefs

Cf. A102687, A102709, A103947-A103949.

Row n=6 of A247026.

Programs

Mathematica

Join[{1, 46656, 13356, 11026, 5721},LinearRecurrence[{-1, -2, -2, -2, -1, 0, 1, 2, 2, 2, 1, 1},{12942, 3136, 13806, 5601, 9286, 5952, 13806, 1921, 13806, 6816, 8422, 5601},34]] (* Ray Chandler, Sep 08 2015 *)

Formula

G.f.: (120*x^16 +1860*x^15 +8520*x^14 +43110*x^13 +48594*x^12 +67518*x^11 +57786*x^10 +26294*x^9 -27373*x^8 -89675*x^7 -122940*x^6 -160740*x^5 -136773*x^4 -117696*x^3 -60014*x^2 -46657*x -1) / ((x -1)*(x +1)*(x^2 -x +1)*(x^2 +1)*(x^2 +x +1)*(x^4 +x^3 +x^2 +x +1)). - Colin Barker, Aug 07 2013