|
%I #7 Mar 31 2012 12:35:02
%S 1,24,196,1284,9836,76524,609940,4928052,40249964,331447308,
%T 2747281456,22892351528,191590111316,1609306726532,13559412142738,
%U 114546085965354,969826269069116,8227091944066248,69907440585587662,594878380136137122
%N Number of base 24 circular n-digit numbers with adjacent digits differing by 4 or less.
%C [Empirical] a(base,n)=a(base-1,n)+A025014(n+1) for base>=4.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]`>4)+($[(i+1)mod N]`-$[i]`>4))
%K nonn,base
%O 0,2
%A _R. H. Hardin_, Dec 28 2006
|
