%I #4 Mar 18 2014 17:58:17
%S 3,3,2,3,2,3,2,2,3,2,2,3,2,2,2,3,2,2,2,3,2,2,2,2,3,2,2,2,2,3,2,2,2,2,
%T 2,3,2,2,2,2,2,3,2,2,2,2,2,2,3,2,2,2,2,2,2,3,2,2,2,2,2,2,2,3,2,2,2,2,
%U 2,2,2,3,2,2,2,2,2,2,2,2,3,2,2,2,2,2
%N First differences of A078633.
%C a(n) = A078633(n+1) - A078633(n);
%C 2 <= a(n) <= 3;
%C a(A049068(n)) = 2; a(A002620(n)) = 3;
%C A237347(n) = abs(A167752(n)) + 2.
%H Reinhard Zumkeller, <a href="/A237347/b237347.txt">Table of n, a(n) for n = 1..10000</a>
%o (Haskell)
%o a237347 n = a237347_list !! (n-1)
%o a237347_list = zipWith (-) (tail a078633_list) a078633_list
%K nonn
%O 1,1
%A _Reinhard Zumkeller_, Mar 18 2014