%I #9 Jan 27 2014 10:21:30
%S 0,0,1,0,0,4,3,3,1,0,0,1,0,0,13,12,12,10,9,9,10,9,9,4,3,3,1,0,0,1,0,0,
%T 4,3,3,1,0,0,1,0,0,40,39,39,37,36,36,37,36,36,31,30,30,28,27,27,28,27,
%U 27,31,30,30,28,27,27,28,27,27,13,12,12,10,9,9,10,9,9,4,3,3,1,0,0,1,0
%N q(n), negative part of n when n=p(n)-q(n) with p(n), q(n), p(n)+q(n) in A005836, integers written without 2 in base 3.
%H Reinhard Zumkeller, <a href="/A060373/b060373.txt">Table of n, a(n) for n = 0..10000</a>
%o (Haskell)
%o a060373 n = a060372 n - n -- _Reinhard Zumkeller_, Jun 09 2012
%Y Cf. A005836, A060372, A060374.
%K easy,nice,nonn,look
%O 0,6
%A Claude Lenormand (claude.lenormand(AT)free.fr), Apr 02 2001