login
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
OFFSET
1,1
COMMENTS
The corresponding GCDs are given by A228811.
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
Sequence in context: A249294 A239274 A235018 * A245954 A248047 A107422
KEYWORD
nonn
AUTHOR
EXTENSIONS
a(14)-a(15) from Charles R Greathouse IV, Sep 04 2013
a(16)-a(21) from Charles R Greathouse IV, Sep 09 2013
STATUS
approved