OFFSET

1,3

LINKS

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

FORMULA

EXAMPLE

1008 = 2*2*2*3*3*7 has 8 unitary divisors {1,1008,7,144,9,112,16,63}, 8 divides 1008 and the quotient is 126, a term in the sequence.

MATHEMATICA

f[n_] := n / 2^PrimeNu[n]; f /@ Select[Range[340], IntegerQ[f[#]] &] (* Amiram Eldar, Jul 16 2019 *)

CROSSREFS

KEYWORD

nonn

AUTHOR

STATUS

approved