|
%I #27 Jul 10 2023 02:44:50
%S 4,7,13,26,44,46,47,53,64,67,73,86,104,106,107,113,124,127,133,146,
%T 164,166,167,173,184,187,193,206,224,226,227,233,244,247,253,266,284,
%U 286,287,293,304,307,313,326,344,346,347,353,364,367,373,386,404,406,407
%N Numbers k such that the last digit of F(k) is 3 where F(k) is the k-th Fibonacci number.
%C Numbers that are congruent to {4, 7, 13, 26, 44, 46, 47, 53} mod 60. - _Amiram Eldar_, Jan 01 2022
%H <a href="/index/Rec#order_09">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,0,0,0,0,0,1,-1).
%F G.f.: x*(7*x^8+6*x^7+x^6+2*x^5+18*x^4+13*x^3+6*x^2+3*x+4) / ((1-x)^2*(1+x)*(1+x^2)*(1+x^4)). - _Colin Barker_, Jun 16 2013
%F a(n) ~ 15*n/2. - _Stefano Spezia_, Jul 09 2023
%t Select[Range[500],Mod[Fibonacci[#],10]==3&] (* _Harvey P. Dale_, Jan 24 2012 *)
%t LinearRecurrence[{1,0,0,0,0,0,0,1,-1},{4,7,13,26,44,46,47,53,64},60] (* _Harvey P. Dale_, Apr 10 2022 *)
%Y Cf. A000045, A003893.
%K nonn,base,easy
%O 1,1
%A _Benoit Cloitre_, Aug 07 2002
|
