%I A101437
%S A101437 1,0,1,1,2,3,3,6,6,8,11,13,17,15,25,30,34,34,46,47,42,61,72,82,76,86,93,
%T A101437 95,102,130,145,163,153,148,172,230,205,226,214,182,230,231,272,322,329,
%U A101437 315,340,373,354,356,378,431,510,457,498,565,558,468,528,591,613,578
%N A101437 a(1) = 1; a(n+1) = sum{k=1 to n} a(n+1-k)(mod k).
%H A101437 Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a> 
               (listed in lieu of email address)
%e A101437 a(7) = a(6)(mod 1) + a(5)(mod 2) + a(4)(mod 3) + a(3)(mod 4) + a(2)(mod 
               5) + a(1)(mod 6) = 0 + 0 + 1 + 1 + 0 + 1 = 3.
%t A101437 a[1] = 1; a[n_] := a[n] = Sum[Mod[a[n - k], k], {k, 1, n - 1}]; Table[ 
               a[n], {n, 62}] (from Robert G. Wilson v Jan 25 2005)
%Y A101437 Sequence in context: A023821 A075258 A127779 this_sequence A039856 A143715 
               A159685
%Y A101437 Adjacent sequences: A101434 A101435 A101436 this_sequence A101438 A101439 
               A101440
%K A101437 nonn
%O A101437 1,5
%A A101437 Leroy Quet Jan 18 2005
%E A101437 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 25 2005