(MAGMAMagma) I:=[4, 6, 8, 12, 14, 16, 24]; [n le 7 select I[n] else Self(n-1)+Self(n-6)-Self(n-7): n in [1..60]]; // Vincenzo Librandi, Oct 09 2017
(MAGMAMagma) I:=[4, 6, 8, 12, 14, 16, 24]; [n le 7 select I[n] else Self(n-1)+Self(n-6)-Self(n-7): n in [1..60]]; // Vincenzo Librandi, Oct 09 2017
proposed
approved
editing
proposed
G.f.: 2*x*(1 + x^2)*(2 + x - x^2 + x^3 + 2*x^4) / ((1 - x)^2*(1 + x)*(1 - x + x^2)*(1 + x + x^2)). - Colin Barker, Dec 13 2018
(PARI) Vec(2*x*(1 + x^2)*(2 + x - x^2 + x^3 + 2*x^4) / ((1 - x)^2*(1 + x)*(1 - x + x^2)*(1 + x + x^2)) + O(x^59)) \\ Colin Barker, Dec 13 2018
approved
editing
reviewed
approved
proposed
reviewed
editing
proposed
Numbers kn k such that the final digit of k^k is 6.
proposed
editing
editing
proposed
Numbers n kn such that the final digit of nk^n k is 6.
<a href="/index/Rec#order_07">Index entries for linear recurrences with constant coefficients</a>, signature (1, 0, 0, 0, 0, 1, -1).
LinearRecurrence[{1, 0, 0, 0, 0, 1, -1}, {4, 6, 8, 12, 14, 16, 24}, 59] (* Ray Chandler, Mar 08 2017 *)
nonn,base,easy
approved
editing