A077494 a(n) = smallest k such that the digit sum of 7k is n.

143, 3, 16, 2, 6, 1, 5, 9, 4, 8, 12, 7, 11, 24, 28, 14, 27, 67, 71, 57, 97, 128, 114, 127, 257, 414, 427, 557, 714, 997, 857, 1257, 1414, 1427, 4257, 2857, 5714, 8427, 8557, 9857, 11427, 14257, 12857, 28557, 55714, 42857, 71427, 85714, 99857, 112857, 128557

Offset

2,1

Links

Table of n, a(n) for n=2..52.

Formula

A077493(n)/7

Mathematica

sk7[n_]:=Module[{k=1}, While[Total[IntegerDigits[7k]]!=n, k++]; k]; Array[ sk7, 60, 2] (* Harvey P. Dale, Apr 07 2014 *)

Crossrefs

Cf. A069532, A069534, A077493.

Sequence in context: A375331 A235457 A200557 * A217142 A306090 A296887

Adjacent sequences: A077491 A077492 A077493 * A077495 A077496 A077497

Keyword

base,nonn

Author

Amarnath Murthy, Nov 07 2002

Extensions

Corrected and extended by Ray Chandler, Aug 03 2003

Status

approved