OFFSET
0,2
COMMENTS
[Empirical] a(base,n)=a(base-1,n)+A025012(n+1) for base>=3.int(n/2)+1
FORMULA
Conjectures from Colin Barker, Jun 02 2017: (Start)
G.f.: (1 - 2*x)*(1 + 2*x + 3*x^2) / ((1 - x)*(1 - 4*x - 3*x^2)).
a(n) = 1 + (2-sqrt(7))^n + (2+sqrt(7))^n for n>0.
a(n) = 5*a(n-1) - a(n-2) - 3*a(n-3) for n>3.
(End)
PROG
(S/R) stvar $[N]:(0..M-1) init $[]:=0 asgn $[]->{*} kill +[i in 0..N-1](($[i]`-$[(i+1)mod N]`>3)+($[(i+1)mod N]`-$[i]`>3))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
R. H. Hardin, Dec 28 2006
STATUS
approved