cp's OEIS Frontend

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.

A199978 Nonprime numbers whose multiplicative digital root is 0.

This page as a plain text file.
%I A199978 #10 Aug 03 2014 14:01:35
%S A199978 10,20,25,30,40,45,50,52,54,55,56,58,60,65,69,70,78,80,85,87,90,95,96,
%T A199978 100,102,104,105,106,108,110,120,125,130,140,145,150,152,154,155,156,
%U A199978 158,159,160,165,169,170,178,180,185,187,190,195,196,200,201,202
%N A199978 Nonprime numbers whose multiplicative digital root is 0.
%C A199978 Complement of A199977 with respect to A034048.
%e A199978 Number 58 is in sequence because 5*8 = 40, 4*0 = 0.
%t A199978 digRoot[n_] := Module[{k = n}, While[k > 9, k = Times @@ IntegerDigits[k]]; k]; Select[Range[300], ! PrimeQ[#] && digRoot[#] == 0 &] (* _T. D. Noe_, Nov 23 2011 *)
%Y A199978 Cf. A199977 (primes whose multiplicative digital root is 0).
%K A199978 nonn,base
%O A199978 1,1
%A A199978 _Jaroslav Krizek_, Nov 13 2011