OFFSET
0,3
FORMULA
Empirical g.f.: (4*x^12+2*x^11-2*x^10-2*x^9+4*x^8+x^7-2*x^6+x^5+2*x^4+x^3+1) / ((x-1)^2*(x^4+x^3+x^2+x+1)*(x^8-x^6+x^4-x^2+1)). - Colin Barker, Nov 23 2015
MATHEMATICA
a[0] = a[1] = 1; a[n_] := a[n] = a[n - 1] + Mod[a[n - 2], 5]; Table[a@ n, {n, 0, 60}] (* Michael De Vlieger, Nov 24 2015 *)
PROG
(PARI) first(m)=my(v=vector(m)); v[1]=1; v[2]=1; for(i=3, m, v[i]=v[i-1]+v[i-2]%5); v
(Magma) [n le 2 select 1 else Self(n-1)+Self(n-2) mod 5: n in [1..60]]; // Vincenzo Librandi, Nov 24 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Anders Hellström, Nov 23 2015
STATUS
approved