|
%I #4 Jul 16 2015 00:34:06
%S 1,2,3,4,5,6,7,8,9,10,22,12,52,70,30,112,136,18,190,20,21,44,115,24,
%T 175,104,27,140,319,30,124,160,66,238,280,36,370,418,156,40,205,42,
%U 301,88,45,230,517,48,637,50,102,364,424,54,110,616,228,754,826,60,427,248,63
%N Least common multiple of n and its digit sum.
%C a(n)=n for Niven (or Harshad) numbers (A005349). - _Robert G. Wilson v_, Nov 20 2004
%t f[n_] := LCM[n, Plus @@ IntegerDigits[n]]; Table[ f[n], {n, 63}] (* _Robert G. Wilson v_, Nov 20 2004 *)
%K base,easy,nonn
%O 1,2
%A Gaetan Polard (gaetan27(AT)hotmail.com), Nov 18 2004
%E More terms from _Robert G. Wilson v_, Nov 20 2004
|
