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 A183107 #12 Aug 08 2024 06:42:58 %S A183107 1,3,4,7,6,8,8,1,9,1,1,11,1,6,3,1,1,3,1,3,4,1,1,3,1,8,8,4,7,1,22,4,3, %T A183107 1,1,3,6,1,7,4,1,33,1,3,9,7,1,3,1,6,3,4,1,8,7,4,3,6,1,1,3,1,1,22,1,6, %U A183107 7,3,8,3,4,7,6,1,4,8,8,3,1,1,3,33,6,3,11,7,1 %N A183107 Sum of palindromic divisors of numbers k such that the sum of the palindromic divisors of k is palindromic. %F A183107 a(n) = A088000(A183106(n)). %t A183107 f[k_] := DivisorSum[k, # &, PalindromeQ[#] &]; Select[f /@ Range[150], PalindromeQ] (* _Amiram Eldar_, Aug 08 2024 *) %Y A183107 Cf. A088000, A183106. %K A183107 nonn,base %O A183107 1,2 %A A183107 _Jaroslav Krizek_, Dec 25 2010 %E A183107 More terms from _Amiram Eldar_, Aug 08 2024