|
%I #6 Feb 22 2014 22:22:59
%S 0,0,0,0,1,1,2,2,3,4,5,5,6,6,7,8,9,9,10,11,12,13,14,14,15,15,16,17,18,
%T 18,19,20,21,22,23,24,25,25,26,27,28,28,29,29,30,31,32,32,33,34,35,36,
%U 37,37,38,39,40,41,42,43,44,44,45,46,47,48,49,49,50,51,52
%N Number of nonludic numbers (A192607) not greater than n.
%H Antti Karttunen, <a href="/A236863/b236863.txt">Table of n, a(n) for n = 0..10000</a>
%F a(0)=0, a(n) = n - A192512(n).
%o (Scheme) (define (A236863 n) (if (zero? n) n (- n (A192512 n))))
%Y Cf. A065855, A091245, A237427.
%K nonn
%O 0,7
%A _Antti Karttunen_, Feb 07 2014
|
