Search: id:A101437 Results 1-1 of 1 results found. %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, Home Page (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 Search completed in 0.001 seconds