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 A070635 #40 Feb 16 2024 10:21:45 %S A070635 0,0,0,0,0,0,0,0,0,0,1,0,1,4,3,2,1,0,9,0,0,2,3,0,4,2,0,8,7,0,3,2,3,6, %T A070635 3,0,7,5,3,0,1,0,1,4,0,6,3,0,10,0,3,3,5,0,5,1,9,6,3,0,5,6,0,4,10,6,2, %U A070635 12,9,0,7,0,3,8,3,11,7,3,15,0,0,2,6,0,7,2,12,8 %N A070635 a(n) = n mod (sum of digits of n). %H A070635 Reinhard Zumkeller, <a href="/A070635/b070635.txt">Table of n, a(n) for n = 1..10000</a> %F A070635 a(A005349(n)) = 0. - _Reinhard Zumkeller_, Mar 10 2008 %F A070635 A188641(n) = A000007(a(n)); a(A065877(n)) > 0. - _Reinhard Zumkeller_, Apr 07 2011 %F A070635 a(A138791(n)) = n and a(m) <> n for m < A138791(n). - _Reinhard Zumkeller_, Nov 07 2011 %t A070635 Table[Mod[n,Total[IntegerDigits[n]]],{n,100}] (* _Harvey P. Dale_, Mar 11 2013 *) %o A070635 (Haskell) %o A070635 a070635 n = n `mod` (a007953 n) %o A070635 -- _Reinhard Zumkeller_, Apr 07 2011 %o A070635 (PARI) a(n) = n % sumdigits(n); \\ _Michel Marcus_, Dec 30 2015 %o A070635 (Magma) [n mod (&+Intseq(n)): n in [1..100]]; // _Vincenzo Librandi_, Dec 30 2015 %Y A070635 Cf. A007953. %Y A070635 Cf. A199238. %K A070635 nonn,base %O A070635 1,14 %A A070635 _Reinhard Zumkeller_, May 13 2002