|
%I #5 Mar 31 2012 12:35:05
%S 1,19,89,425,2043,9861,47723,231399,1123605,5461905,26573735,
%T 129379137,630262495,3071700043,14976139061,73039059807,356304015623,
%U 1738508587487,8484132138387,41409427571489,202134928523711
%N Number of base 19 n-digit numbers with adjacent digits differing by two or less.
%C [Empirical] a(base,n)=a(base-1,n)+5^(n-1) for base>=2n-1; a(base,n)=a(base-1,n)+5^(n-1)-2 when base=2n-2
%o (S/R) stvar $[N]:(0..M-1) init $[]:=0 asgn $[]->{*} kill +[i in 0..N-2](($[i]`-$[i+1]`>2)+($[i+1]`-$[i]`>2))
%Y Cf. Base 19 differing by one or less A126373.
%K nonn,base
%O 0,2
%A _R. H. Hardin_, Dec 28 2006
|
