This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A317840 #6 Aug 10 2018 09:06:35
%S A317840 0,1,1,1,1,2,1,1,2,3,1,2,1,3,4,1,1,4,1,3,4,5,1,2,3,5,4,3,1,4,1,1,6,5,
%T A317840 5,4,1,7,6,3,1,8,1,5,6,7,1,2,3,7,6,5,1,8,7,3,8,7,1,4,1,5,10,1,7,6,1,5,
%U A317840 8,9,1,4,1,11,8,7,7,10,1,3,8,11,1,8,7,13,8,5,1,12,7,7,6,9,9,2,1,9,8,7,1,12,1,5,14
%N A317840 Difference between Stern's Diatomic sequence (A002487) and its Möbius transform (A317839).
%H A317840 Antti Karttunen, <a href="/A317840/b317840.txt">Table of n, a(n) for n = 1..16384</a>
%H A317840 <a href="/index/St#Stern">Index entries for sequences related to Stern's sequences</a>
%F A317840 a(n) = -Sum_{d|n, d<n} A008683(n/d)*A002487(d).
%F A317840 a(n) = A002487(n) - A317839(n).
%o A317840 (PARI)
%o A317840 A002487(n) = { my(a=1, b=0); while(n>0, if(bitand(n, 1), b+=a, a+=b); n>>=1); (b); }; \\ From A002487
%o A317840 A317840(n) = -sumdiv(n,d,(d<n)*moebius(n/d)*A002487(d));
%Y A317840 Cf. A002487, A008683, A317837, A317838, A317839, A317841.
%K A317840 nonn
%O A317840 1,6
%A A317840 _Antti Karttunen_, Aug 09 2018