A256886 Smallest multiple of prime(n) whose digits sum is divisible by prime(n).

2, 3, 5, 7, 209, 247, 476, 874, 1679, 4988, 8959, 37999, 177899, 99889, 686999, 2989889, 8888999, 9998998, 58999999, 289999997, 499988899, 999899998, 5989989899, 9989999999, 99999999898, 2918999999999, 699999899899, 1999989999989, 4889999999989, 8899999999898

Offset: 1

Author

Michel Lagneau, Apr 12 2015

Keywords

• nonn
• base

Comments

Subsequence of A002998.

Examples

			a(5)=209 is in the sequence because prime(5)=11 divides 2+0+9 and 209.
		

Crossrefs

Cf. A000040, A002998.

Programs

Mathematica

Flatten[Table[Select[Prime[n] Range[10^8],Total[IntegerDigits[#]]==Prime[n]&,1],{n,1,21}]]

PARI

lista(nn) = {forprime(p=2, nn, k = 1; while(((q = k*p) && (sumdigits(q) % p)), k++); print1(q, ", "););} \\ Michel Marcus, Apr 14 2015

Formula

a(n) = A002998(A000040(n)).