login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A074838 Numbers m such that sum(d|m, 1/core(d) ) is an integer where core(x) is the squarefree part of x. 1
1, 6, 8, 16, 20, 24, 54, 60, 72, 96, 126, 128, 180, 216, 243, 256, 384, 441, 486, 500, 504, 540, 648, 704, 729, 864, 891, 972, 1100, 1152, 1260, 1500, 1536, 1620, 1782, 1792, 1944, 2016, 2048, 2112, 2205, 2560, 3300, 3456, 3528, 3564, 3645, 3888, 4096 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Amiram Eldar, Table of n, a(n) for n = 1..1000

MATHEMATICA

f[p_, e_] := If[OddQ[e], p, 1]; sqf[n_] := Times @@ (f @@@ FactorInteger[n]); seqQ[n_] := IntegerQ @ DivisorSum[n, 1/sqf[#] &]; Select[Range[2^12], seqQ] (* Amiram Eldar, Apr 02 2020 *)

PROG

(PARI) isok(m) = denominator(sumdiv(m, d, 1/core(d))) == 1; \\ Michel Marcus, Apr 02 2020

CROSSREFS

Cf. A007913.

Sequence in context: A315934 A315935 A315936 * A315937 A315938 A315939

Adjacent sequences:  A074835 A074836 A074837 * A074839 A074840 A074841

KEYWORD

nonn

AUTHOR

Benoit Cloitre, Sep 09 2002

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 June 25 06:20 EDT 2021. Contains 345452 sequences. (Running on oeis4.)