|
Search: id:A134948
|
|
|
| A134948 |
|
Self-factorial numbers: numbers n with property that for each single digit d of n, we can also see the decimal expansion of d! as a substring of n. |
|
+0
3
|
|
| 1, 2, 10, 11, 12, 21, 22, 24, 100, 101, 102, 110, 111, 112, 120, 121, 122, 124, 201, 210, 211, 212, 221, 222, 224, 241, 242, 244, 424, 1000, 1001, 1002, 1010, 1011, 1012, 1020, 1021, 1022, 1024, 1100, 1101, 1102, 1110, 1111, 1112, 1120, 1121, 1122, 1124, 1200
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
David Applegate, Table of n, a(n) for n = 1..300
|
|
EXAMPLE
|
24 is a self-factorial number because we can see both 2! = 2 and 4! = 24 in the decimal exapnsion 24.
|
|
MAPLE
|
isA134948 := proc(n) local nbase10, dgs, d, dfac ; nbase10 := convert(n, base, 10) ; dgs := convert(nbase10, set) ; for d in dgs do dfac := convert(d!, base, 10) ; if verify(dfac, nbase10, 'sublist') = false then RETURN(false) ; fi ; od: RETURN(true) ; end: for n from 1 to 10000 do if isA134948(n) then printf("%d ", n) ; fi ; od: - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 05 2008
|
|
PROGRAM
|
For C++ program see the Applegate link in A135463.
|
|
CROSSREFS
|
Cf. A134698, A134947, A134439, A134692.
Sequence in context: A105116 A136819 A136816 this_sequence A060045 A000462 A032930
Adjacent sequences: A134945 A134946 A134947 this_sequence A134949 A134950 A134951
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Alexander Povolotsky (apovolot(AT)gmail.com), Feb 02 2008
|
|
EXTENSIONS
|
a(1) - a(18) computed by njas, Feb 02 2008
a(19) onwards from David Applegate, Feb 09 2008
More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 05 2008
|
|
|
Search completed in 0.002 seconds
|
