_R. H. Hardin (rhhardin(AT)att.net), _, Dec 28 2006
_R. H. Hardin (rhhardin(AT)att.net), _, Dec 28 2006
proposed
approved
nonn,base,new
approved
proposed
nonn,new
nonn
Ron R. H. Hardin (rhhardin(AT)att.net), Dec 28 2006
nonn,new
nonn
Ron Hardin (rhhrhhardin(AT)cadenceatt.comnet), Dec 28 2006
[empiricalEmpirical] a(base,n)=a(base-1,n)+A025014(n+1) for base>=4.int(n/2)+1
nonn,new
nonn
Number of base 16 circular n-digit numbers with adjacent digits differing by 4 or less.
1, 16, 124, 796, 5924, 44916, 348652, 2743036, 21801764, 174565444, 1405459324, 11362215276, 92138276228, 748875775404, 6097017988948, 49701864868956, 405539673414148, 3311264043438796, 27050524930821556, 221065493126829404
0,2
[empirical] a(base,n)=a(base-1,n)+A025014(n+1) for base>=4.int(n/2)+1
(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))
nonn
Ron Hardin (rhh(AT)cadence.com), Dec 28 2006
approved