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,1

Comments

Subsequence of A002998.

Links

Table of n, a(n) for n=1..30.

Formula

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

Example

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

Mathematica

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

Prog

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

Crossrefs

Cf. A000040, A002998.

Sequence in context: A029978 A360986 A122764 * A195302 A064157 A257483

Adjacent sequences: A256883 A256884 A256885 * A256887 A256888 A256889

Keyword

nonn,base

Author

Michel Lagneau, Apr 12 2015

Status

approved