%I #9 Nov 22 2017 01:15:04
%S 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
%T 0,0,0,0,0,0,0,0,0,0,0,0,1,-1,0,0,0,0,0,0,0,1,-1,0,0,0,0,0,0,0,0,0,0,
%U 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
%N The difference A156257(n)-A074292(n).
%C Related to the position and frequency of runs of length 2 in the Kolakoski sequence A000002.
%C Possible values are -1, 0, 1, and a 1 seems to be always followed soon by a -1, indicating that the two sequences A074292 and A156257 are not equal but rather close (this might help to show the equality of the proportions of 1 and 2 in the Kolakoski sequence).
%H Jean-Christophe Hervé, <a href="/A248805/b248805.txt">Table of n, a(n) for n = 1..5000</a>
%p A248805 := proc(n)
%p A156257(n)-A074292(n) ;
%p end proc:
%p seq(A248805(n),n=1..80) ; # _R. J. Mathar_, Nov 15 2014
%Y Cf. A000002, A074292, A156257.
%K sign
%O 1,1
%A _Jean-Christophe Hervé_, Oct 11 2014