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 A225780 #9 Jan 30 2025 18:37:42
%S A225780 1,2,3,4,5,6,7,8,9,10,12,18,20,21,24,27,30,36,40,42,45,48,50,54,60,63,
%T A225780 70,72,80,81,84,90,100,102,108,111,117,120,126,135,144,153,162,171,
%U A225780 180,200,201,204,207,209,210,216,222,225,234,240,243,252,261,270
%N A225780 Numbers such that both n and its reversal are divisible by sum of digits of n.
%C A225780 Subset of A005349 - first member of A005349 missing here is 110.
%H A225780 Harvey P. Dale, <a href="/A225780/b225780.txt">Table of n, a(n) for n = 1..1000</a>
%e A225780 117 is a member since both 117 and 711 are divisible by 9.
%t A225780 d[n_]:=IntegerDigits[n]; sod[n_]:=Total[d[n]]; rev[n_]:=FromDigits[Reverse[d[n]]]; Select[Range[270],IntegerQ[#/(x = sod[#])] && IntegerQ[rev[#]/x] &]
%t A225780 Select[Range[300],With[{t=Total[IntegerDigits[#]]},Mod[#,t]==Mod[IntegerReverse[#],t]==0&]] (* _Harvey P. Dale_, Jan 30 2025 *)
%Y A225780 Cf. A005349.
%K A225780 nonn,base
%O A225780 1,2
%A A225780 _Jayanta Basu_, May 15 2013