cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A247079 Numbers for which the harmonic mean of nontrivial divisors is an integer and which are not a square of prime numbers.

This page as a plain text file.
%I A247079 #33 Dec 10 2016 19:36:23
%S A247079 345,1050,1645,4386,6489,8041,13026,23881,88473,115957,255041,342637,
%T A247079 377201,1497517,2132021,2428489,3256261,3847001,4114285,4646101,
%U A247079 5054221,6816865,7218641,7587901,13384681,14872837,17897737,20901553,23807821,25863653,28207957
%N A247079 Numbers for which the harmonic mean of nontrivial divisors is an integer and which are not a square of prime numbers.
%C A247079 That's the numbers which are in A247078 and not in A001248.
%C A247079 a(149) >= 2*10^11. - _Hiroaki Yamanouchi_, Nov 20 2014
%H A247079 Daniel Lignon and Hiroaki Yamanouchi, <a href="/A247079/b247079.txt">Table of n, a(n) for n = 1..148</a> (terms a(1)-a(40) from Daniel Lignon)
%e A247079 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.
%o A247079 (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
%Y A247079 Cf. A001599 (harmonic numbers), A247078.
%K A247079 nonn
%O A247079 1,1
%A A247079 _Daniel Lignon_, Nov 17 2014
%E A247079 a(15)-a(24) from _Michel Marcus_, Nov 17 2014