|
%I #12 Sep 08 2015 17:21:35
%S 1,46656,13356,11026,5721,12942,3136,13806,5601,9286,5952,13806,1921,
%T 13806,6816,8422,5601,13806,3136,13806,4737,9286,6816,13806,1921,
%U 12942,6816,9286,5601,13806,2272,13806,5601,9286,6816,12942,1921,13806,6816
%N a(n) is the number of distinct n-th powers of functions {1, 2, 3, 4, 5, 6} -> {1, 2, 3, 4, 5, 6}.
%C For n > 4, a(n+60) = a(n).
%H Ray Chandler, <a href="/A103950/b103950.txt">Table of n, a(n) for n = 0..10000</a>
%H <a href="/index/Rec#order_12">Index entries for linear recurrences with constant coefficients</a>, signature (-1, -2, -2, -2, -1, 0, 1, 2, 2, 2, 1, 1).
%F 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
%t 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 *)
%Y Cf. A102687, A102709, A103947-A103949.
%Y Row n=6 of A247026.
%K nonn,easy
%O 0,2
%A _David Wasserman_, Feb 23 2005
|
