Scheme: Wie kann ich eine Liste mit Widerständen in einen Vektor ändern?

Question

Wie kann ich diese mit cons erstellte Liste in einen Vektor ändern?

((p b p b p b p b) 
(b p b p b p b p) 
(p b p b p b p b) 
(b p b p b p b p) 
(p b p b p b p b) 
(b p b p b p b p) 
(p b p b p b p b) 
(b p b p b p b p)) 

Dies ist mein Code:

 
(define b "black") 
(define w "white") 

(define (board) 
    (letrec ((ti 
      (lambda (x) 
      (if (eq? x 8) '() 
      (cons (lh x 0) (ti (+ 1 x)))))) 
     (lh 
     (lambda (x y) 
      (if (eq? y 8) '() 
      (cons (if (odd? (+ x y)) 'b 'w) (lh x (+ 1 y))))))) 
    (ti 0))) 

Answer 1

Verwenden Sie die list->vector Funktion auf der gesamten Liste und dann auf jedem sublist vector-map verwenden.

Oder alternativ zuerst map verwenden, um list->vector auf jede Unterliste anzuwenden und dann list->vector auf der gesamten Liste verwenden.

Answer 2

Ist das, was von Ihnen denken?

#(#(p b p b p b p b) 
    #(b p b p b p b p) 
    #(p b p b p b p b) 
    #(b p b p b p b p) 
    #(p b p b p b p b) 
    #(b p b p b p b p) 
    #(p b p b p b p b) 
    #(b p b p b p b p))