%I A124999
%S A124999 1,5,23,101,467,2165,10055,46709,216995,1008101,4683383,21757829,
%T A124999 101081459,469599317,2181641639,10135364501,47086382915,218751625157,
%U A124999 1016265649367,4721317472933,21934066839827,101900219778101
%N A124999 Number of base 5 circular n-digit numbers with adjacent digits differing 
               by 3 or less.
%C A124999 [Empirical] a(base,n)=a(base-1,n)+A025012(n+1) for base>=3.int(n/2)+1
%o A124999 (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))
%Y A124999 Sequence in context: A034958 A085350 A113443 this_sequence A120902 A054441 
               A102285
%Y A124999 Adjacent sequences: A124996 A124997 A124998 this_sequence A125000 A125001 
               A125002
%K A124999 nonn
%O A124999 0,2
%A A124999 Ron Hardin (rhhardin(AT)att.net), Dec 28 2006