%I A020475
%S A020475 0,2,1,2,2,4,2,6,4,6,6,10,5,12,6,8,8,16,10,18,10,14,14,22,10,20,18,18,
               14,
%T A020475 28,11,30,16,26,30,26,22,36,30,30,22,40,20,42,26,26,30,46,20,42,34,32,
               34,
%U A020475 52,26,46,33,50,42,58,26,60,30,46,32,50,48,66,58,50,44,70,40,72,66,46,
               58
%N A020475 a(n) is number of k for which C(n,k) is divisible by n.
%C A020475 Note that n is prime iff a(n)=n-1. - T. D. Noe (noe(AT)sspectra.com), 
               Feb 23 2006
%H A020475 T. D. Noe, <a href="b020475.txt">Table of n, a(n) for n = 0..1000</a>
%F A020475 a(n)=n+1-A007012(n) - T. D. Noe (noe(AT)sspectra.com), Feb 23 2006
%t A020475 Table[cnt=0; Do[If[Mod[Binomial[n,k],n]==0, cnt++ ], {k,0,n}]; cnt,{n,
               0,100}] - T. D. Noe (noe(AT)sspectra.com), Feb 23 2006
%Y A020475 Sequence in context: A139318 A054541 A102722 this_sequence A131183 A133770 
               A163373
%Y A020475 Adjacent sequences: A020472 A020473 A020474 this_sequence A020476 A020477 
               A020478
%K A020475 nonn
%O A020475 0,2
%A A020475 David W. Wilson (davidwwilson(AT)comcast.net)
%E A020475 More terms from T. D. Noe (noe(AT)sspectra.com), Feb 23 2006