A051003 Beastly (or hateful) numbers: numbers containing the string 666 in their decimal expansion.

666, 1666, 2666, 3666, 4666, 5666, 6660, 6661, 6662, 6663, 6664, 6665, 6666, 6667, 6668, 6669, 7666, 8666, 9666, 10666, 11666, 12666, 13666, 14666, 15666, 16660, 16661, 16662, 16663, 16664, 16665, 16666, 16667, 16668, 16669, 17666, 18666

Offset: 1

Author

Eric W. Weisstein

Keywords

• nonn
• less
• easy
• base

Links

• Jens Kruse Andersen, Table of n, a(n) for n = 1..1000
• Tony Padilla and Brady Haran, The Most Evil Number, Numberphile video (2018)
• Eric Weisstein's World of Mathematics, Beast Number

Crossrefs

Cf. A131645, A057564, A002282, A138563, A043515, A046720, A186086.

Programs

Mathematica

Select[Range[18666], ! StringFreeQ[ToString[#], "666"] &] (* Arkadiusz Wesolowski, Sep 08 2011 *)