|
|
A228810
|
|
Numbers k, excluding primes and squares of primes, such that gcd(k, numerator of H(k-1)) > 1, where the harmonic number H(j) = Sum_{i=1..j} 1/i.
|
|
1
|
|
|
88, 1290, 9339, 102619, 102729, 116424, 116512, 343594, 372889, 904428, 1129909, 1129942, 1130019, 1280554, 1280664, 2351307, 12723966, 12728166, 12809227, 12818637, 12869013
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The corresponding GCDs are given by A228811.
|
|
LINKS
|
|
|
PROG
|
(PARI) isA000430(n)=isprime(n) || (issquare(n, &n) && isprime(n))
H=0; for(n=2, 1e6, H+=1/(n-1); if(!isA000430(n) && gcd(n, numerator(H))>1, print1(n", "))) \\ Charles R Greathouse IV, Sep 04 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|