|
|
A247079
|
|
Numbers for which the harmonic mean of nontrivial divisors is an integer and which are not a square of prime numbers.
|
|
2
|
|
|
345, 1050, 1645, 4386, 6489, 8041, 13026, 23881, 88473, 115957, 255041, 342637, 377201, 1497517, 2132021, 2428489, 3256261, 3847001, 4114285, 4646101, 5054221, 6816865, 7218641, 7587901, 13384681, 14872837, 17897737, 20901553, 23807821, 25863653, 28207957
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
345 is not the square of a prime number and the nontrivial divisors of 345 are [3,5,15,23,69,115]. Their harmonic mean is 6/(1/3+1/5+1/15+1/23+1/69+1/115)=9.
|
|
PROG
|
(PARI) isok(n) = !(issquare(n) && isprime(sqrtint(n))) && (d=divisors(n)) && (#d > 2) && (denominator((#d-2)/sum(i=2, #d-1, 1/d[i])) == 1); \\ Michel Marcus, Nov 17 2014
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|