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.

Showing 1-3 of 3 results.

A128672 Numbers m such that m^k does not divide the denominator of the m-th generalized harmonic number H(m,k) nor the denominator of the m-th alternating generalized harmonic number H'(m,k), for k = 2.

Original entry on oeis.org

20, 42, 100, 110, 156, 272, 294, 342, 500, 506, 812, 930, 1210, 1332, 1640, 1806, 2028, 2058, 2162, 2500, 2756, 3422, 3660, 4422, 4624, 4970, 5256, 6162, 6498, 6806, 7832, 9312, 10100, 10506, 11026, 11342, 11638, 11772, 12500, 12656, 13310, 14406, 16002, 17030
Offset: 1

Views

Author

Alexander Adamchuk, Mar 20 2007

Keywords

Comments

Generalized harmonic numbers are defined as H(m,k) = Sum_{j=1..m} 1/j^k. Alternating generalized harmonic numbers are defined as H'(m,k) = Sum_{j=1..m} (-1)^(j+1)/j^k.
Sequence contains all geometric progressions of the form (p-1)*p^k for k > 0 and some primes p > 3. Note the factorization of initial terms of {a(n)} = {4*5, 6*7, 4*5^2, 10*11, 12*13, 16*17, 6*7^2, 18*19, 4*5^3, 22*23, 28*29, 30*31, 10*11^2, 36*37, 40*41, 42*43, 12*13^2, 6*7^3, 46*47, 4*5^4, 52*53, 58*59, 60*61, 66*67, 16*17^2, 70*71, 72*73, 78*79, 18*19^2, 82*83, ...}. The smallest term that does not fit this pattern is 11026 = ((149-1)/2) * 149.

Links

Crossrefs

Similar sequences for generalized harmonic numbers with different k: A125581 (k=1), A128673 (k=3), A128674 (k=4), A128675 (k=5); A128676 (k=6).
For the least numbers k > 0 such that k^n does not divide the denominator of H(k,n) nor the denominator of H'(k,n), see A128670. See also A128671(n) = A128670(prime(n)).
Cf. A001008, A002805, A058313, A058312, A007406, A007407, A119682, A125581, A126196, A126197, A128674, A128675, A128676, A128673, A128670, A129671.

Programs

  • Mathematica
    k=2; f=0; g=0; Do[ f=f+1/n^k; g=g+(-1)^(n+1)*1/n^k; kf=Denominator[f]; kg=Denominator[g]; If[ !IntegerQ[kf/n^k] && !IntegerQ[kg/n^k], Print[n] ], {n,1,7000} ]

Extensions

Edited and extended by Max Alekseyev, May 07 2010

A128673 Numbers m such that m^k does not divide the denominator of the m-th generalized harmonic number H(m,k) nor the denominator of the m-th alternating generalized harmonic number H'(m,k), for k = 3.

Original entry on oeis.org

94556602, 141834903, 189113204, 283669806, 450820422
Offset: 1

Views

Author

Alexander Adamchuk, Apr 18 2007

Keywords

Comments

Generalized harmonic numbers are defined as H(m,k) = Sum_{j=1..m} 1/j^k. Alternating generalized harmonic numbers are defined as H'(m,k) = Sum_{j=1..m} (-1)^(j+1)/j^k.
Note that {a(n)} contains the following geometric progressions: ((16843-1)/3)*16843^m found by Max Alekseyev, ((16843-1)/2)*16843^m found by Max Alekseyev, ((16843-1)*2/3)*16843^m, (16843-1)*16843^m, 20826*21647^m found by Max Alekseyev, ((2124679-1)/3)*2124679^m, ((2124679-1)/2)*2124679^m, ((2124679-1)*2/3)*2124679^m, (2124679-1)*2124679^m. Here {16843, 2124679} = A088164 are the only two currently known Wolstenholme Primes: primes p such that {2p-1} choose {p-1} == 1 mod p^4. See more details in Comments at A128672 and A125581.

Links

Crossrefs

Cf. A001008, A002805, A058313, A058312.
Cf. A007406, A007407, A119682, A007410, A120296, A099828.
Cf. A125581, A126196, A126197, A128672, A128674, A128675, A128676, A128670, A128671.
Cf. A088164 (Wolstenholme primes).

Programs

  • Mathematica
    k=3; f=0; g=0; Do[ f=f+1/n^k; g=g+(-1)^(n+1)*1/n^k; kf=Denominator[f]; kg=Denominator[g]; If[ !IntegerQ[kf/n^k] && !IntegerQ[kg/n^k], Print[n] ], {n, 1, 450820422} ]

A128670 Least number k > 0 such that k^n does not divide the denominator of generalized harmonic number H(k,n) nor the denominator of alternating generalized harmonic number H'(k,n).

Original entry on oeis.org

77, 20, 94556602, 42, 444, 20, 104, 42, 76, 20, 77, 110, 3504, 20, 903, 42, 1107, 20, 104, 42, 77, 20, 2948, 110, 136, 20, 76, 42, 903, 20, 77, 42, 268, 20, 7004, 110, 1752, 20, 19203, 42, 77, 20, 104, 42, 76, 20, 370, 110, 1107, 20, 77, 42, 12246, 20, 104, 42
Offset: 1

Views

Author

Alexander Adamchuk, Mar 24 2007

Keywords

Comments

Generalized harmonic numbers are defined as H(m,k) = Sum_{j=1..m}1/j^k. Alternating generalized harmonic numbers are defined as H'(m,k) = Sum_{j=1..m} (-1)^(j+1)/j^k.
Some apparent periodicity in {a(n)} (not without exceptions): a(n) = 20 for n = 2 + 4m, a(n) = 42 for n = 4 + 12m and 8 + 12m, a(n) = 76 for n = 9 + 18m, a(n) = 77 for n = 1 + 10m, a(n) = 104 for n = 7 + 12m, a(n) = 110 for n = 12m, a(n) = 136 for n = 25 + 32m, etc.
See more details in Comments at A128672 and A125581.

Links

Crossrefs

Cf. A001008, A002805, A058313, A058312, A007406, A007407, A119682, A007410, A120296, A125581, A126196, A126197, A128672, A128673, A128674, A128675, A128676, A128671, A128670.

Extensions

More terms and b-file from Max Alekseyev, May 07 2010
Showing 1-3 of 3 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.