A062078 - OEIS

A062078

LCM of the digits of n.

1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 2, 2, 6, 4, 10, 6, 14, 8, 18, 0, 3, 6, 3, 12, 15, 6, 21, 24, 9, 0, 4, 4, 12, 4, 20, 12, 28, 8, 36, 0, 5, 10, 15, 20, 5, 30, 35, 40, 45, 0, 6, 6, 6, 12, 30, 6, 42, 24, 18, 0, 7, 14, 21, 28, 35, 42, 7, 56, 63

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

Seiichi Manyama, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harry J. Smith)

FORMULA

a(n) <= 2520. - Sean A. Irvine, Mar 18 2023

EXAMPLE

a(25) = 10, a(24) = 4.

MAPLE

a:= n-> ilcm(convert(n, base, 10)[]):

seq(a(n), n=1..99); # Alois P. Heinz, May 15 2024

MATHEMATICA

Table[LCM@@IntegerDigits[n], {n, 120}] (* Harvey P. Dale, Feb 19 2017 *)

PROG

(PARI) { for (n=1, 1000, x=n; a=1; while (x>9, a=lcm(a, x-10*(x\10)); x\=10); a=lcm(a, x); write("b062078.txt", n, " ", a) ) } \\ Harry J. Smith, Jul 31 2009

CROSSREFS

Cf. A007954, A052423.

Sequence in context: A175423 A175421 A175420 * A371281 A031347 A087471

Adjacent sequences: A062075 A062076 A062077 * A062079 A062080 A062081

KEYWORD

nonn,base

AUTHOR

Amarnath Murthy, Jun 15 2001

STATUS

approved