login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A086130 a(n) = lcm(n, A003415(n)). 8
0, 2, 3, 4, 5, 30, 7, 24, 18, 70, 11, 48, 13, 126, 120, 32, 17, 126, 19, 120, 210, 286, 23, 264, 50, 390, 27, 224, 29, 930, 31, 160, 462, 646, 420, 180, 37, 798, 624, 680, 41, 1722, 43, 528, 585, 1150, 47, 336, 98, 450, 1020, 728, 53, 162, 880, 1288, 1254, 1798, 59 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Michael De Vlieger, Table of n, a(n) for n = 1..10000

EXAMPLE

If n=prime, lcm(prime,1)=prime.

MATHEMATICA

Table[LCM[n, If[Abs@ n < 2, 0, n Total[#2/#1 & @@@ FactorInteger[Abs@ n]]]], {n, 59}] (* Michael De Vlieger, Feb 05 2017, after Michael Somos at A003415 *)

PROG

(PARI) a(n) = lcm(n, sum(i=1, #f=factor(n)~, n/f[1, i]*f[2, i]) ); \\ Michel Marcus, Dec 11 2013

CROSSREFS

Cf. A003415.

Sequence in context: A220891 A220890 A250260 * A024636 A004845 A124128

Adjacent sequences:  A086127 A086128 A086129 * A086131 A086132 A086133

KEYWORD

nonn

AUTHOR

Labos Elemer, Jul 23 2003

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 23 13:58 EDT 2019. Contains 325254 sequences. (Running on oeis4.)