This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A066600 #15 Dec 05 2024 18:45:44 %S A066600 1,2,4,8,16,14,28,38,67,80,43,86,127,164,94,152,178,248,298,362,337, %T A066600 332,385,446,451,398,499,602,574,698,703,794,805,854,1015,1040,1135, %U A066600 1226,1201,1286,1330,1400,1531,1640,1687,1754,1861,2102,2161,2450,2074 %N A066600 Sum of the digits in the n-th row of Pascal's triangle. %H A066600 Harry J. Smith, <a href="/A066600/b066600.txt">Table of n, a(n) for n = 0..1000</a> %e A066600 The 7th row in Pascal's triangle is 1, 7, 21, 35, 35, 21, 7, 1 and the sum of the digits is 38 hence a(7) = 38. %t A066600 f[n_] := Block[{m = s = 0}, While[m < n + 1, s = s + Apply[ Plus, IntegerDigits[ Binomial[n, m]]]; m++ ]; Return[s]]; Table[ f[n], {n, 0, 50}] %o A066600 (PARI) a(n)={vecsum([sumdigits(x) | x<-binomial(n)])} \\ _Harry J. Smith_, Mar 08 2010 %K A066600 base,easy,nonn %O A066600 0,2 %A A066600 _Amarnath Murthy_, Dec 22 2001 %E A066600 Corrected and extended by _Robert G. Wilson v_, Dec 28 2001 %E A066600 Offset changed from 1 to 0 by _Harry J. Smith_, Mar 08 2010