# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a037844 Showing 1-1 of 1 %I A037844 #13 Jan 19 2018 15:21:20 %S A037844 0,0,0,0,1,0,0,0,0,1,2,0,0,1,1,1,1,0,1,2,0,0,1,0,0,0,0,1,2,1,1,2,2,2, %T A037844 2,0,1,2,0,0,1,1,1,1,1,2,3,1,1,2,1,1,1,0,1,2,1,1,2,2,2,2,0,1,2,0,0,1, %U A037844 1,1,1,0,1,2,0,0,1,0,0,0,0,1,2,1,1,2,2,2,2,1 %N A037844 Sum{d(i-1)-d(i): d(i)Table of n, a(n) for n = 1..10000 %p A037844 A037844 := proc(n) %p A037844 a := 0 ; %p A037844 dgs := convert(n,base,3); %p A037844 for i from 2 to nops(dgs) do %p A037844 if op(i,dgs) 0 &]], {n, 1, z}]; (*A037844*) %Y A037844 Cf. A037853, A297330. %K A037844 nonn,base %O A037844 1,11 %A A037844 _Clark Kimberling_ %E A037844 Definition corrected by _R. J. Mathar_, Oct 16 2015 %E A037844 Updated by _Clark Kimberling_, Jan 18 2018 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE