cp's OEIS Frontend

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.

A283737 Numbers with digit sum 13 that are multiples of 13.

This page as a plain text file.
%I A283737 #29 Apr 07 2020 19:41:35
%S A283737 247,364,481,715,832,1066,1183,1417,1534,1651,2119,2236,2353,2470,
%T A283737 2704,2821,3055,3172,3406,3523,3640,4108,4225,4342,4810,5044,5161,
%U A283737 5512,6214,6331,7033,7150,7501,8203,8320,9022,10075,10192,10309,10426,10543,10660,11128,11245
%N A283737 Numbers with digit sum 13 that are multiples of 13.
%H A283737 Alois P. Heinz, <a href="/A283737/b283737.txt">Table of n, a(n) for n = 1..38073</a>
%e A283737 a(1) = A143164(16) = 247 = 19*13,
%e A283737 a(90) = A143164(1186) = 25402 = 1954*13.
%t A283737 With[{k = 13}, Select[Range@ 12000, Total@ IntegerDigits@ # == k && Divisible[#, k] &]] (* _Michael De Vlieger_, Mar 16 2017 *)
%o A283737 (PARI) for(k=1,1000,if(13==sumdigits(m=13*k),print1(m",")))
%Y A283737 Intersection of A008595 and A143164.
%Y A283737 Cf. A007953.
%K A283737 nonn,base
%O A283737 1,1
%A A283737 _Zak Seidov_, Mar 15 2017