A125333 - OEIS

%I #7 Mar 31 2012 12:35:01

%S 1,23,149,767,4621,28193,176297,1117041,7154253,46194005,300221819,

%T 1961587475,12873380521,84800014153,560377791731,3713279813807,

%U 24664451887709,164170230029821,1094761428071549,7312336791110657

%N Number of base 23 circular n-digit numbers with adjacent digits differing by 3 or less.

%C [Empirical] a(base,n)=a(base-1,n)+A025012(n+1) for base>=3.int(n/2)+1

%o (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))

%K nonn,base

%O 0,2

%A _R. H. Hardin_, Dec 28 2006