インデックスを使用してリストのリストをソートする方法はありますか？

Question

first、secondなどのリスト操作を使用しなければならない点を除いて、以下のコードではリストをソートできます。整数インデックスしかない場合は、ソートにどのように使用しますか？

#lang racket 
(define lst '(("1" "Z") ("2" "A"))) 

(sort lst #:key second string<?) 

intを適切な操作に変換する関数または構文定義を作成する1つの解決策を考え出すことができます。たとえば、インデックスが0の場合は、firstに変換します。しかし、これは楽しいとは思われません、このタイプのリスト操作はtenthまでしかありませんか？

ありがとうございます！

Answer 1

使用list-ref：

> (define lst '(1 2 3 4 5)) 
> (list-ref lst 0) 
1 
> (list-ref lst 4) 
5 

最初のパラメータが参照するリストであり、2番目はインデックスです。

機能firstからtenthは、実際にはlist-refの省略形です。

Answer 2

1つはまた、コンパレータを指定することができます。

(define (sorter ll i) 
    (sort ll 
     (lambda(a b) 
      (if (string<? (list-ref a i) (list-ref b i)) 
       #t #f)))) 

(define lst '(("1" "Z") ("2" "A"))) 
(sorter lst 0) 
(sorter lst 1) 

出力：

'(("1" "Z") ("2" "A")) 
'(("2" "A") ("1" "Z"))