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 A349477 #14 Feb 02 2023 06:23:42 %S A349477 1,6,8,10,15,16,21,28,30,39,48,56,57,64,93,111,129,140,183,184,192, %T A349477 195,200,201,210,219,220,237,270,291,309,327,345,381,417,453,471,489, %U A349477 496,543,545,574,579,597,600,633,645,669,672,687,723,765,792,795,798,813 %N A349477 Numbers k such that the sequence of elements of the continued fraction of the harmonic mean of the divisors of k is palindromic. %C A349477 All the harmonic numbers (A001599) are terms of this sequence. %H A349477 Amiram Eldar, <a href="/A349477/b349477.txt">Table of n, a(n) for n = 1..10000</a> %e A349477 8 is a term since the sequence of elements of the continued fraction of the harmonic mean of the divisors of 8, 32/15 = 2 + 1/(7 + 1/2), is {2, 7, 2}, which is palindromic. %t A349477 q[n_] := PalindromeQ[ContinuedFraction[DivisorSigma[0, n] / DivisorSigma[-1, n]]]; Select[Range[1000], q] %Y A349477 A001599 and A349476 are subsequences. %Y A349477 Cf. A099377, A099378, A349473. %K A349477 nonn %O A349477 1,2 %A A349477 _Amiram Eldar_, Nov 19 2021