どうすればリストスキームの各項目の最初の文字を取得できますか？

Question

リストの最初の単語をすべて抽出します。 例：

（最初の「ハローワールドASD fdas QWERTY）

リターン：F qをW

H。例えば

(define (first-char lst) 
    (map (lambda (w) 
     (string->symbol 
      (string 
      (string-ref 
      (symbol->string w) 0)))) 
     lst)) 

：

Answer 1

はこれを試してみてください

(first-char '(hello world asd fdas qwerty)) 
=> '(h w a f q)