A249671 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A249671

Integers n such that A249670(n) = n.

1, 364, 86800, 90768, 149856, 632400, 828816, 46462800, 61987600, 148468320, 153972000, 185684160, 187465824, 189300384, 191659104, 193808160, 196219296, 202460352, 204118464, 215399520, 220116960, 221931360, 222778080, 223382880, 228584160, 338116680

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

That is, integers n such that A017665(n)*A017666(n) = n.

LINKS

Table of n, a(n) for n=1..26.

EXAMPLE

sigma(364)/364 = 28/13 and 28*13 = 364, so 364 is in the sequence.

MATHEMATICA

lista[n_Integer] := Select[Range[n], # == Numerator[DivisorSigma[-1, #]] * Denominator[DivisorSigma[-1, #]] &];

lista[10^6] (* Michael De Vlieger, Nov 10 2014 *)