A221707 Numbers n such that A216377(n) = 1.

2, 4, 8, 12, 16, 20, 25, 29, 34, 39, 44, 49, 55, 60, 65, 71, 82, 88, 94, 105, 111, 117, 123, 136, 142, 148, 154, 167, 173, 180, 186, 193, 199, 206, 212, 219, 225, 232, 239, 252, 259, 266, 279, 286, 293, 300, 307, 314, 321, 328, 335, 342, 349, 356, 363, 370

Offset: 1

Author

N. J. A. Sloane, Jan 25 2013

Keywords

• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A216377, A221708.

Programs

Mathematica

Select[Range[2,400],IntegerDigits[#!,#][[1]]==1&] (* Harvey P. Dale, Aug 14 2020 *)

Extensions

More terms from Alois P. Heinz, Jan 28 2013