A123624 Smallest multiple m of n such that mu(m) = mu(n), where mu=A008683.

6, 30, 30, 8, 30, 210, 42, 16, 18, 210, 66, 24, 78, 210, 210, 32, 102, 36, 114, 40, 210, 330, 138, 48, 50, 390, 54, 56, 174, 2310, 186, 64, 330, 510, 210, 72, 222, 570, 390, 80, 246, 2310, 258, 88, 90, 690, 282, 96, 98, 100, 510, 104, 318, 108, 330, 112, 570, 870

Offset

1,1

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Formula

a(n) = n * A123623(n).

Mathematica

s={}; Do[i=1; Until[MoebiusMu[i*n]==MoebiusMu[n], i++]; AppendTo[s, i*n], {n, 58}]; s (* James C. McMahon, Nov 23 2024 *)

Crossrefs

Cf. A085653.

Sequence in context: A260017 A375287 A351773 * A287733 A066197 A078638

Adjacent sequences: A123621 A123622 A123623 * A123625 A123626 A123627

Keyword

nonn

Author

Reinhard Zumkeller, Oct 03 2006

Status

approved