Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #7 Jan 10 2020 18:13:28
%S 0,0,0,0,0,3,0,0,0,5,0,8,0,7,10,0,0,9,0,15,12,11,0,15,0,13,0,21,0,25,
%T 0,0,22,17,28,27,0,19,26,32,0,33,0,33,36,23,0,32,0,25,34,39,0,27,44,
%U 48,38,29,0,55,0,31,54,0,52,55,0,51,45,63,0,63,0,37,50,57,66,65,0,64,0,41,0,75,68,43,58,77,0,81
%N a(n) = n - A309639(n), where A309639(n) is the index of the least harmonic number H_i whose denominator (A002805) is divisible by n.
%H Antti Karttunen, <a href="/A330734/b330734.txt">Table of n, a(n) for n = 1..65537</a>
%F a(n) = n - A309639(n).
%o (PARI) A330734(n) = (n-A309639(n));
%Y Cf. A000961 (indices of zeros), A309639, A330691, A330692, A330735.
%K nonn
%O 1,6
%A _Antti Karttunen_, Jan 10 2020