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 A276643 #56 Jun 20 2017 23:37:29 %S A276643 1,4,10,20,35,56,84,120,165,220,282,348,415,480,540,592,633,660,670, %T A276643 660,633,592,540,480,415,348,282,220,165,120,84,56,35,20,10,4,1 %N A276643 Number of distinct 4-digit vehicle plates whose sum is n. %C A276643 a(n) is the number of weak compositions (ordered partitions) into four parts 0, 1, 2, ..., 9. - _Joerg Arndt_, May 02 2017 %C A276643 The 4th row of A213651. - _Omar E. Pol_, May 02 2017 %C A276643 a(n) is the number of integers in the range 0 to 9999 whose sum of digits = n. There are 10000 numbers in the range 0 to 9999 and in this sequence they are distributed according to the sum of their digits (n). - _Miquel Cerda_, Jun 14 2017 %e A276643 a(0) = 1 because 0000 is the only plate which sums to 0. %e A276643 a(1) = 4 because there are 4 plates which sum to 1: 0001, 0010, 0100 and 1000. %e A276643 a(2) = 10 because there are 10 numbers whose digits sum to 2: 2, 11, 20, 101, 110, 200, 1001, 1010, 1100, 2000. - _Miquel Cerda_, Jun 14 2017 %t A276643 Length /@ Split@ Sort@ Map[Total, IntegerDigits@ Range[0, 10^4 - 1]] (* _Michael De Vlieger_, May 03 2017 *) %o A276643 (R) %o A276643 library(dplyr) %o A276643 data=expand.grid(0:9, 0:9, 0:9, 0:9, KEEP.OUT.ATTRS = FALSE) %o A276643 data %>% %o A276643 mutate(n=Var1+Var2+Var3+Var4) %>% %o A276643 group_by(n) %>% %o A276643 summarise(value=n()) -> suc %o A276643 View(suc) %o A276643 (PARI) { my(x='x+O('x^44)); Vec(sum(k=0,9,x^k)^4) } \\ _Joerg Arndt_, May 02 2017 %Y A276643 Cf. A213651. %K A276643 nonn,fini,full,base %O A276643 0,2 %A A276643 _Antonio Sánchez Chinchón_, May 02 2017