Разбиение списка на схеме

Question

Как бы я идти о создании функции секционирования, что бы взять номер и список разделить список на меньшие списки списков, размер которых определяется числом так что

Partition 3 '(a b c d e f g h) -> '((a b c) (d e f) (g h)) and etc. using take and drop? 

Answer 1

Я дам вам несколько советов, чтобы вы могли найти ответ самостоятельно. Заполняющая пробелы:

(define (partition n lst) 
    (cond (<???>      ; if the list is empty 
     <???>)      ; then return the empty list 
     ((< <???> n)    ; if the lists' length is less than n 
     <???>)      ; return a list with lst as its only element 
     (else      ; otherwise 
     (cons      ; cons a list with the result of 
      (<???> lst n)    ; grabbing the first n elements of lst with 
      (<???> n     ; the result of advancing the recursion and 
       (<???> lst n)))))) ; removing the first n elements of lst 

Очевидно, что вы должны будете использовать take и drop где-то в растворе, как это предусмотрено в описании проблемы. Проверьте свое решение следующим образом:

(partition 3 '(a b c d e f g h)) 
=> '((a b c) (d e f) (g h)) 

(partition 3 '(a b c d e f g h i)) 
=>'((a b c) (d e f) (g h i))