A097210 Numbers that appear in A076078.

1, 2, 4, 8, 10, 16, 32, 44, 64, 128, 184, 218, 256, 400, 512, 752, 1024, 2048, 3040, 3392, 3748, 4096, 8192, 12224, 16384, 27904, 32768, 49024, 57856, 61064, 64594, 65536, 131072, 196352, 226304, 253808, 262144, 524288, 785920, 954368, 981520, 1048576

Offset: 1

Author

Matthew Vandermast, Aug 01 2004

Keywords

• nonn

Comments

A076078(n) = the number of sets of distinct positive integers with a least common multiple of n.

All powers of 2 are in the sequence. - Robert G. Wilson v, Aug 14 2004

Crossrefs

Cf. A076078, A097211.

Programs

Mathematica

f[n_] := Block[{d = Divisors[n]}, Plus @@ (MoebiusMu[n/d](2^DivisorSigma[0, d] - 1))]; Take[ Union[ Table[ f[n], {n, 2^20}]], 42] (* Robert G. Wilson v, Aug 14 2004 *)