cp's OEIS Frontend

A336922 a(n) = A331410(n) - A005087(n).

%I A336922 #7 Aug 10 2020 00:19:54
%S A336922 0,0,0,0,1,0,0,0,1,1,1,0,1,0,1,0,2,1,2,1,0,1,1,0,3,1,2,0,3,1,0,0,1,2,
%T A336922 1,1,3,2,1,1,2,0,2,1,2,1,1,0,1,3,2,1,3,2,2,0,2,3,3,1,1,0,1,0,2,1,3,2,
%U A336922 1,1,2,1,4,3,3,2,1,1,2,1,3,2,2,0,3,2,3,1,4,2,1,1,0,1,3,0,2,1,2,3,4,2,2,1,1
%N A336922 a(n) = A331410(n) - A005087(n).
%H A336922 Antti Karttunen, <a href="/A336922/b336922.txt">Table of n, a(n) for n = 1..65537</a>
%F A336922 a(n) = A331410(n) - A005087(n).
%F A336922 a(n) = A336921(n) + A046660(A000265(n)).
%o A336922 (PARI)
%o A336922 A005087(n) = omega(n>>valuation(n,2));
%o A336922 A331410(n) = if(!bitand(n,n-1),0,1+A331410(n+(n/vecmax(factor(n)[, 1]))));
%o A336922 A336922(n) = (A331410(n) - A005087(n));
%Y A336922 Cf. A000265, A005087, A054784 (positions of zeros), A331410, A336467, A336921, A336923.
%Y A336922 Cf. also A336469.
%K A336922 nonn
%O A336922 1,17
%A A336922 _Antti Karttunen_, Aug 09 2020