|
Search: id:A134642
|
|
| |
|
| 0, 1, 15, 21, 27, 30, 39, 45, 54, 57, 75, 78, 99, 108, 114, 120, 135, 141, 147, 156, 177, 180, 198, 201, 210, 216, 225, 228, 194, 198, 214, 222, 238, 242, 294, 298, 334, 346, 358, 366, 414, 422, 434, 446, 482, 486, 538, 542, 558, 566, 582, 586, 694, 698, 714
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
MATHEMATICA
|
a = {}; b = {}; Do[AppendTo[b, n]; w =Permutations[b]; Do[j = FromDigits[w[[m]], n + 1]; If[PrimeQ[j], AppendTo[a, j]], {m, 1, Length[w]}], {n, 0, 10}]; a (*Artur Jasinski*)
|
|
CROSSREFS
|
Cf. A134640, A134641.
Adjacent sequences: A134639 A134640 A134641 this_sequence A134643 A134644 A134645
Sequence in context: A070811 A138594 A131651 this_sequence A072974 A082686 A102030
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Nov 05 2007, Nov 07 2007
|
|
|
Search completed in 0.002 seconds
|
