%I #6 Apr 10 2017 12:28:44
%S 0,0,0,0,2,0,0,0,2,8,8,0,12,0,0,0,2,8,11,12,16,10,3,0,9,22,18,0,12,0,
%T 0,0,2,8,30,32,11,6,26,8,19,22,0,40,1,12,37,0,17,36,18,36,7,18,16,0,
%U 27,48,13,0,12,0,0,0,2,8,30,32,53,50,40,56,32,44,2,24,73,26,61,32,14,76,28,4,34,0,64,72,86,4,73,48,16,54,11,0,33
%N Main diagonal of A284270.
%H Antti Karttunen, <a href="/A284273/b284273.txt">Table of n, a(n) for n = 1..8192</a>
%H <a href="/index/Bi#binary">Index entries for sequences related to binary expansion of n</a>
%F a(n) = A277699(n) mod n = A048720(n, A065621(n)) mod n.
%o (Scheme)
%o (define (A284273 n) (A284270bi n n)) ;; A284270bi, see A284270.
%o (define (A284273 n) (modulo (A277699 n) n))
%Y Cf. A048720, A065621, A277699, A284270.
%K nonn,base
%O 1,5
%A _Antti Karttunen_, Apr 10 2017