racket

    -1熱度

    1回答

    我寫了這個代碼(完整的球拍),如果一組是另一組的一部分,你能告訴我什麼是錯的嗎? (struct myset (lst)) (define (member? a lst) (cond [(empty? lst) false] [(equal? a (first lst)) true] [else (member? a (rest lst))])) ;; (subset? a b)

    0熱度

    1回答

    我試圖使用這些代碼的對話框中打開文件, #lang racket/gui (require racket/gui/base framework mrlib/path-dialog) (define top-frame (new frame% [label "The Frame"] [min-width 200] [

    0熱度

    2回答

    我嘗試在DrRacket中使用libserialport。 libserialport是https://docs.racket-lang.org/libserialport/index.html。 我通過DrRacket「file-> package manager」安裝libserialport軟件包源代碼。 安裝後,當我在DrRacket中使用(需要libserialport)時,出現錯誤 f

    1熱度

    1回答

    listdiff是一對車,其車輛是L,其CDR是eq?到L或者(cdr L)或者(cdr(cdr L)))等。listdiff的cdr不一定是列表;它可能是任何對象。 listdiff D表示在(cdr D)之前的(car D)的前綴。例如,假設ils是不正確的列表(a i o u。y)。然後(cons ils ils)返回一個空的listdiff,(cons ils(cdr(cdr ils)))

    0熱度

    1回答

    我試圖創建一個函數,它將採用整數參數並返回這些整數與他們在拼出數字中的位置。例如。 (編號2135567667) 「(2十億1.35億567000 667) 我想我會的整數分成右3的組向左與商和餘數。而用句子 「(上千萬元十億萬億萬億) 要輸出句子中突然插入相應的符號。但是存在這樣的情況整個基團將是零,如: (編號1000000) 「(100萬) 或 (1000000001) 10億1 有沒有更好

    -1熱度

    2回答

    我是新來的球拍和方案,我試圖在一起映射列表內搭列表中的每個組合的加funtion的組合,並添加喜歡如下: ;The returned combinations ((1 3) (2 3) (1 4) (2 4) (3 4) (1 5) (2 5) (3 5) (4 5) (1 6) (2 6) (3 6) (4 6) (5 6) (1 2) (2 2) (3 2) (4 2) (5 2) (6 2

    0熱度

    1回答

    compose功能首先應用最後一個功能,即它以相反的順序應用發送的功能。例如: ((compose sqrt add1) 8) 上面會ADD1到8,然後找到SQRT 9. 欲因此創建該第二個第一施加第一發送功能,並且然後,一個mycompose功能第三等,在上面的例子中,首先應用sqrt,然後add1。我可以管理以下: (define (mycompose L arg) (let l

    0熱度

    2回答

    因此,p-cons程序將x和y作爲輸入並返回一個匿名程序,它將z作爲輸入(並記住x和y?) 我在努力理解的是當我在REPL中運行該程序時: (p-car (p-cons 1 2)) 它返回1和2與p-cdr,這是他們打算做什麼。但是我不明白他們如何能夠訪問p-cons過程的值?有人可以解釋這是如何工作的,而我可能沒有完全掌握? 這裏是程序: (define (p-cons x y)

    1熱度

    2回答

    如果我想在運行時選擇性地需要模塊,我可以使用[dynamic-require'1。如果我想要求已安裝包這個偉大的工程,例如: (dynamic-require 'racket/match 'match) 這將(提供我已經racket/match安裝),需要racket/match和評估的match該庫結合。 但是,當我想要一個本地的,未安裝的模塊時,我遇到了麻煩。比方說,我有一些模塊調用eat

    0熱度

    3回答

    所以我的輸入是一些列表l,並且該函數的目標是獲取所有肯定的結果並用這些正值創建一個新列表。這是我目前有: (define (positives l) (define (poscheck l) (cond ((negative? (car l)) '()) ((null? l) '()) (else (poscheck (cdr l))))) (li