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 A065877 #19 Dec 04 2024 23:04:32
%S A065877 11,13,14,15,16,17,19,22,23,25,26,28,29,31,32,33,34,35,37,38,39,41,43,
%T A065877 44,46,47,49,51,52,53,55,56,57,58,59,61,62,64,65,66,67,68,69,71,73,74,
%U A065877 75,76,77,78,79,82,83,85,86,87,88,89,91,92,93,94,95,96,97,98,99,101
%N A065877 Non-Niven (or non-Harshad) numbers: numbers which are not a multiple of the sum of their digits.
%C A065877 A188641(a(n)) = 0; A070635(a(n)) > 0. - _Reinhard Zumkeller_, Apr 07 2011
%H A065877 Harry J. Smith, <a href="/A065877/b065877.txt">Table of n, a(n) for n = 1..1000</a>
%e A065877 13 is in the list because 13 is not a multiple of 1 + 3 = 4.
%t A065877 Select[Range[101],!IntegerQ[#/Total[IntegerDigits[#]]] &] (* _Jayanta Basu_, May 05 2013 *)
%o A065877 (PARI) isok(k) = {(k % sumdigits(k)) != 0} \\ _Harry J. Smith_, Nov 03 2009
%o A065877 (Haskell)
%o A065877 import Data.List (findIndices)
%o A065877 a065877 n = a065877_list !! (n-1)
%o A065877 a065877_list = map succ $ findIndices (> 0) $ map a070635 [1..]
%o A065877 -- _Reinhard Zumkeller_, Apr 07 2011
%Y A065877 Complement of A005349. Cf. A003635, A007953, A065878.
%Y A065877 Cf. A188643.
%K A065877 base,nonn
%O A065877 1,1
%A A065877 _Henry Bottomley_, Nov 26 2001