A344636 Numbers k such that half the numbers from 0 to k inclusive contain the digit "1".
1, 17, 23, 161, 269, 271, 1457, 3397, 3419, 3421, 13121, 44685, 118097, 674909, 674933, 1062881
Offset: 1
Examples
1 is a term since among the numbers 0,1 exactly half contain a digit "1". 17 is a term since among the numbers 0,1,2,...,17 exactly half contain a digit "1".
References
- Andrew Hilton, 101 Puzzles to Solve on your Microcomputer, 1984, HARRAP, page 57.
Programs
-
Mathematica
Select[2Range@2000,Length@Select[Range[0,#-1],MemberQ[IntegerDigits@#,1]&]==#/2&]-1 (* Giorgos Kalogeropoulos, Jul 28 2021 *)
Comments