OFFSET
1,1
COMMENTS
Niven (or Harshad) numbers are divisible by the sum of their digits, and correspond to sequence A005349.
LINKS
FORMULA
a(n) = n * A144262(n).
EXAMPLE
For n = 3, we have:
.
k 3*k Niven?
- --- ------
1 3 Yes
2 6 Yes
3 9 Yes
4 12 Yes
5 15 No
so a(3) = 15.
MATHEMATICA
a[n_]:=Module[{k=1}, While[Divisible[k*n, Total[IntegerDigits[k*n]]], k++]; k*n]; Array[a, 61]
PROG
(PARI) a(n, base=10) = forstep (m=n, oo, n, if (m%sumdigits(m, base), return (m)))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Rémy Sigrist, Oct 21 2022
STATUS
approved