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.

A062185 Harmonic mean of digits is 8.

This page as a plain text file.
%I A062185 #7 Nov 21 2013 12:47:30
%S A062185 8,88,888,6999,8888,9699,9969,9996,68999,69899,69989,69998,86999,
%T A062185 88888,89699,89969,89996,96899,96989,96998,98699,98969,98996,99689,
%U A062185 99698,99869,99896,99968,99986,688999,689899,689989,689998,698899,698989
%N A062185 Harmonic mean of digits is 8.
%t A062185 Do[ h = IntegerDigits[n]; If[ Sort[h][[1]] != 0 && Length[h]/Apply[Plus, 1/h] == 8, Print[n]], {n, 1, 10^6}]
%t A062185 Select[Range[700000],DigitCount[#,10,0]==0&&HarmonicMean[IntegerDigits[ #]]==8&] (* _Harvey P. Dale_, Jan 27 2012 *)
%Y A062185 Cf. A062179-A062185, A061383-A061388, A061423-A061425.
%K A062185 base,easy,nonn
%O A062185 1,1
%A A062185 _Vladeta Jovovic_, Jun 12 2001
%E A062185 More terms from _Robert G. Wilson v_, Aug 08 2001