A178364 Numbers with rounded up arithmetic mean of digits = 4.

4, 16, 17, 25, 26, 34, 35, 43, 44, 52, 53, 61, 62, 70, 71, 80, 109, 118, 119, 127, 128, 129, 136, 137, 138, 145, 146, 147, 154, 155, 156, 163, 164, 165, 172, 173, 174, 181, 182, 183, 190, 191, 192, 208, 209, 217, 218, 219, 226, 227, 228, 235, 236, 237, 244, 245

Offset: 1

Author

Reinhard Zumkeller, May 27 2010

Keywords

• base
• nonn

Comments

A004427(a(n)) = 4;

A000027 = union of A178361, A178362, A178363, A178365, A178366, A178367, A178368, A178369, and this sequence.

Links

• R. Zumkeller, Table of n, a(n) for n = 1..1000

Programs

Mathematica

Select[Range[250],Ceiling[Mean[IntegerDigits[#]]]==4&] (* Harvey P. Dale, Sep 30 2011 *)