BBC Russian

A115936

Numbers k such that k! contains a pandigital substring.

53, 67, 78, 105, 106, 114, 156, 160, 161, 164, 192, 205, 215, 220, 222, 225, 236, 243, 251, 257, 268, 278, 279, 282, 287, 306, 320, 338, 343, 345, 353, 367, 377, 386, 395, 398, 408, 409, 420, 423, 434, 443, 444, 448, 451, 455, 458, 459, 463, 467, 468, 469

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Table of n, a(n) for n=1..52.

EXAMPLE

53! = 42748832840600255(6429801375)3389399649690343788366813724672000000000000.

MATHEMATICA

Select[Range[500], Count[Sort/@Partition[IntegerDigits[#!], 10, 1], Range[ 0, 9]]>0&] (* Harvey P. Dale, May 23 2017 *)

PROG

(Python)

from math import factorial