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.
%I A337920 #35 Jan 30 2021 04:07:09 %S A337920 5,9,11,13,17,20,21,23,25,29,32,33,35,37,38,39,41,43,44,45,47,49,50, %T A337920 51,53,54,55,56,57,59,61,62,64,65,67,68,69,71,73,75,77,79,81,83,84,85, %U A337920 86,89,90,91,92,93,94,95,97,98,101,104,105,107,109,110,111,113 %N A337920 Numbers k such that d(k) = d(k+1), where d(k) = A058312(k) is the denominator of the k-th alternating harmonic number. %C A337920 The asymptotic density of this sequence is 1 (Wu and Chen, 2019). %H A337920 Amiram Eldar, <a href="/A337920/b337920.txt">Table of n, a(n) for n = 1..10000</a> %H A337920 Bing-Ling Wu and Yong-Gao Chen, <a href="https://doi.org/10.1016/j.jnt.2018.11.026">On the denominators of harmonic numbers, II</a>, Journal of Number Theory, Vol. 200 (2019), pp. 397-406. %e A337920 5 is a term since A058312(5) = A058312(6) = 60. %t A337920 d[n_] := Denominator @ Sum[(-1)^(k + 1)/k, {k, 1, n}]; Position[Partition[d[Range[120]], 2, 1], {x_, x_}] // Flatten %Y A337920 Cf. A058312, A065454 (analogous with denominators of harmonic numbers). %K A337920 nonn %O A337920 1,1 %A A337920 _Amiram Eldar_, Jan 29 2021