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

247, 364, 481, 715, 832, 1066, 1183, 1417, 1534, 1651, 2119, 2236, 2353, 2470, 2704, 2821, 3055, 3172, 3406, 3523, 3640, 4108, 4225, 4342, 4810, 5044, 5161, 5512, 6214, 6331, 7033, 7150, 7501, 8203, 8320, 9022, 10075, 10192, 10309, 10426, 10543, 10660, 11128, 11245

Offset: 1

Author

Zak Seidov, Mar 15 2017

Keywords

• nonn
• base

Examples

			a(1) = A143164(16) = 247 = 19*13,
a(90) = A143164(1186) = 25402 = 1954*13.
		

Links

• Alois P. Heinz, Table of n, a(n) for n = 1..38073

Crossrefs

Intersection of A008595 and A143164.

Cf. A007953.

Programs

Mathematica

With[{k = 13}, Select[Range@ 12000, Total@ IntegerDigits@ # == k && Divisible[#, k] &]] (* Michael De Vlieger, Mar 16 2017 *)

PARI

for(k=1,1000,if(13==sumdigits(m=13*k),print1(m",")))