Anonymous user
Permutations: Difference between revisions
→{{header|K}}
m (→alternative: removed comparison to perl ntheory. 1.7s for n= 10 is by far slower, but a matter of data) |
|||
Line 2,355:
text some random
text random some</lang>
Alternative:
<lang K>
perm:{x@m@&n=(#?:)'m:!n#n:#x}
perm[!3]
(0 1 2
0 2 1
1 0 2
1 2 0
2 0 1
2 1 0)
perm "abc"
("abc"
"acb"
"bac"
"bca"
"cab"
"cba")
`0:{1_,/" ",/: x}' perm ""$" "\"some random text"
some random text
some text random
random some text
random text some
text some random
text random some
</lang>
=={{header|LFE}}==
|