|
| |
|
|
A080794
|
|
Numbers n such that the integer digits of n are all contained, in any order, within the integer digits of Prime[n].
|
|
1
| |
|
|
7, 73, 94, 217, 281, 309, 321, 324, 325, 392, 624, 715, 751, 841, 945, 976, 1307, 1384, 1395, 1492, 1532, 1723, 1785, 1970, 2741, 2845, 2956, 2971, 3751, 3805, 4153, 4230, 4321, 4391, 4759, 4978, 4980, 5174, 5317, 5702, 5769, 5789, 5790, 5893, 5903, 5938
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 6347 is included because Prime[6347] = 63347.
|
|
|
MATHEMATICA
| okQ[n_] := Module[{idnp=IntegerDigits[Prime[n]], sidn=Sort[IntegerDigits[n]]}, Intersection[idnp, sidn]==sidn]; Select[Range[10000], okQ]
|
|
|
CROSSREFS
| Sequence in context: A197951 A137730 A157920 * A082719 A188465 A142053
Adjacent sequences: A080791 A080792 A080793 * A080795 A080796 A080797
|
|
|
KEYWORD
| base,easy,nonn
|
|
|
AUTHOR
| Harvey P. Dale (hpd1(AT)nyu.edu), Mar 13 2003
|
| |
|
|
