# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a137345 Showing 1-1 of 1 %I A137345 #4 Aug 24 2012 10:50:00 %S A137345 0,1,2,2,3,0,4,4,5,0,6,7,7,0,9,8,9,0,10,0,3,0,12,6,13,13,5,0,15,4,16, %T A137345 16,24,0,20,12,19,0,4,38,21,0,22,22,30,0,24,12,25,25,18,0,27,0,45,51, %U A137345 51,0,30,0,31,0,35,32,35,0,34,0,33,10,36,0,37,0,39,57,14,0,40,12,5,0,42,40 %N A137345 a(n) = binomial( n(n+1)/2, n) mod n. %F A137345 a(n) = A014068(n) mod n. - _R. J. Mathar_, Apr 09 2008 %p A137345 P:=proc(n) local a,b,i; a:=0; for i from 1 by 1 to n do a:=a+i; b:=(binomial(a,i) mod i); print(b); od; end: P(101); %Y A137345 Cf. A139125. %K A137345 easy,nonn %O A137345 1,3 %A A137345 _Paolo P. Lava_ and _Giorgio Balzarotti_, Apr 08 2008, Apr 14 2008 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE