Thách thức là tạo ra một chương trình sắp xếp danh sách các từ, chỉ có điều các từ cần phải theo thứ tự của một bảng chữ cái ngẫu nhiên.

Chương trình của bạn sẽ chấp nhận một chuỗi các từ được phân tách bằng dấu phẩy và một bảng chữ cái mới.
Chương trình của bạn sẽ xuất ra mọi từ theo cùng một cách theo thứ tự mới được sắp xếp.

Thí dụ:

Đầu vào:

home,oval,cat,egg,network,green bcdfghijklmnpqrstvwxzaeiouy

Đầu ra:

cat,green,home,network,egg,oval

Đây là một môn đánh gôn , vì vậy người chiến thắng là người có chương trình ngắn nhất.

Đây là thử thách đầu tiên của tôi vì vậy mọi cải tiến cho câu hỏi / thử thách đều được đánh giá cao.

CJam, 26 19 17 byte

rr:A;',/{Af#}$',*

Hãy thử trực tuyến.

Trường hợp thử nghiệm

$ cjam sort.cjam <<< 'home,oval,cat,egg,network,green bcdfghjklmnpqrstvwxzaeiouy'
cat,green,home,network,egg,oval

Làm thế nào nó hoạt động

rr                    " Read two whitespace-separated tokens from STDIN. ";
  :A;                 " Save the second token (the alphabet) in A.       ";
     ',/              " Split the remaining token at commas.             ";
        {Af#}$        " Sort by the chunks' characters' indexes in A.    ";
               ',*    " Join, separating by commas.                      ";

Bash + coreutils, 37 byte

tr ,$2 \\na-z<<<$1|sort|tr \\na-z ,$2

Đầu ra:

$ ./alphasort.sh home,oval,cat,egg,network,green bcdfghijklmnpqrstvwxyzaeiouy
cat,green,home,network,egg,oval, $ 

Pyth , 19 ký tự

j\,o_mx_zdNchczd\,

Kiểm tra:

$ pyth -c "j\,o_mx_zdNchczd\," <<< 'home,oval,cat,egg,network,green bcdfghjklmnpqrstvwxzaeiouy'
cat,green,home,network,egg,oval

Giải trình:

                            Implicit: d=" "
                            Implicit: z=input()
j\,                         ",".join(
   o                                 order_by(lambda N:
    _                                                  rev(
     m                                                     map(lambda d:
      x_zd                                                              rev(z).index(d),
      N                                                                 N),
    chczd\,                                            z.split(" "[0].split(",")

Về cơ bản, nó sắp xếp các khối, với một khóa của danh sách các chỉ mục của các ký tự trong chuỗi, sau đó nối chúng trên dấu phẩy. Các doanh nghiệp đảo ngược ngắn hơn so với việc tách chuỗi một lần nữa.

Ruby, 53 50 byte

a,b=$*
$><<a.split(?,).sort_by{|w|w.tr b,'a-z'}*?,

Tôi đang sử dụng Ruby trđể thay thế bảng chữ cái tùy chỉnh a-ztrước khi sắp xếp. Đầu vào là thông qua đối số dòng lệnh.

Con trăn

w,a=input().split()
print(",".join(sorted(w.split(","),key=lambda s:"".join(["abcdefghijklmnopqrstuvwxyz"[a.find(c)]for c in s]))))

Cần có nhiều chỗ để cải thiện.

JavaScript (E6) 102 119

Sắp xếp với chức năng ánh xạ 'M' dựa trên bảng chữ cái trong biến 'a'
Với IO sử dụng cửa sổ bật lên (prompt + alert)

x=prompt().split(/[ ,]/),
a=x.pop(),
M=w=>[10+a.search(c)for(c of w)]+'',
alert(x.sort((a,b)=>M(a)>M(b)))

Là hàm (có thể kiểm tra) với tham số 1 chuỗi, trả về mảng chuỗi (92)

F=x=>(
  M=w=>[10+a.search(c)for(c of w)],
  x=x.split(/[ ,]/),
  a=x.pop(),
  x.sort((a,b)=>M(a)>M(b))
)

Kiểm tra trong bảng điều khiển FireFox / FireBug

F('home,oval,cat,egg,network,green zyxwvtsrqpnmlkjhgfdcbaeiou')

Đầu ra

["network", "home", "green", "cat", "egg", "oval"]

Clojure, 115 byte

#(apply str(butlast(interleave(sort-by(fn[w](apply str(map(zipmap(sort %2)%2)w)))(re-seq #"[a-z]+"%))(repeat \,))))

Ồ, điều này bắt đầu rất tốt với (sort-by(fn[w](mapv(zipmap(sort %2)%2)w)))nhưng sau đó tôi nhận ra rằng veckhông được sắp xếp giống như các chuỗi và việc xen kẽ các dấu phẩy đó cũng cần một lượng mã đáng kể.