cp's OEIS Frontend

A244218 The ending points of runs of consecutive terms with the same parity in A014418 (n represented in Greedy Catalan Base).

%I A244218 #9 Jun 25 2014 13:10:54
%S A244218 0,1,2,3,5,6,7,8,10,11,12,13,14,15,16,17,19,20,21,22,24,25,26,27,28,
%T A244218 29,30,31,33,34,35,36,38,39,40,41,42,43,44,45,47,48,49,50,52,53,54,55,
%U A244218 56,57,58,59,61,62,63,64,66,67,68,69,70,71,72,73,75,76,77,78,80,81
%N A244218 The ending points of runs of consecutive terms with the same parity in A014418 (n represented in Greedy Catalan Base).
%C A244218 The ending points of runs in A244220 and A244221.
%C A244218 Positions where A014418(n+1) <> A014418(n) modulo 2. (Same is true for A244161).
%H A244218 Antti Karttunen, <a href="/A244218/b244218.txt">Table of n, a(n) for n = 0..4120</a>
%F A244218 a(0) = 0, a(n) = A244226(n) + A244218(n-1).
%o A244218 (Scheme, with _Antti Karttunen_'s IntSeq-library, two alternative definitions)
%o A244218 (definec (A244218 n) (if (zero? n) 0 (+ (A244226 n) (A244218 (- n 1)))))
%o A244218 (define A244218 (NONZERO-POS 0 0 (lambda (n) (modulo (- (A014418 (+ n 1)) (A014418 n)) 2))))
%Y A244218 Cf. A014418, A244161, A244220, A244221, A244219 (gives the corresponding starting points).
%Y A244218 Partial sums of A244226.
%K A244218 nonn
%O A244218 0,3
%A A244218 _Antti Karttunen_, Jun 23 2014