racket

1熱度

1回答

我需要一些關於抽象find和check-callback函數的建議。代碼工作正常，但似乎有很多不必要的重複。有沒有更優雅的方式來重寫它們？ ;; Model (define-struct contact (name phone)) (define phonebook (list (make-contact 'adam 5551212) (make-contact 'bria

0熱度

1回答

如何檢索球拍/ PLT方案中的按鈕標籤？

我在嘗試Exercise 22.3.3 from HtDP，但不知道如何檢索被點擊的按鈕的標籤。我得到這個消息draw-message: expected <string> as second argument, given: (instantiate (class ...) ...)似乎表明我需要一個字符串，但我得到一個類的實例。回調中的答案是？如果是這樣，我該如何解構它？這是我到目前爲止有：

1熱度

1回答

回溯無限循環

這是Exercise 28.1.2 from HtDP。我已經成功實現了neighbors函數並通過了所有測試用例。 (define Graph (list (list 'A (list 'B 'E)) (list 'B (list 'E 'F)) (list 'C (list 'D)) (list 'D empty)

0熱度

3回答

球拍計劃重新定義常量

我目前使用Drracack作爲一些探索性編程的編輯器的球拍計劃。當我嘗試並重新定義一個函數，我得到了以下信息： define-values: cannot re-define a constant: png->byte-list 現在我來接受，這是語言的屬性，被它挫敗，但那種接受了它。讀了How can you re-define a constant identifier in DrSche

3熱度

1回答

本地vs lambda的習慣用法？

在Exercise 30.1.1 of HtDP中，我開始使用local，然後修改它以使用lambda來回答問題。 (define (add-to-each2 accu a-list) (cond [(empty? a-list) empty] [else (local ((define s (+ accu (first a-list)))) (cons

1熱度

1回答

將函數作爲參數傳遞，但獲得意想不到的結果

我正在使用Racket和「高級學生」語言設置，並且在嘗試編寫函數時需要函數，執行n次並報告時間每次運行都已過去。這是我到目前爲止所做的。 (define (many n fn) (cond [(= n 0) true] [else (many (sub1 n) (local ((define k (time fn))) k))])) 我有一個函數fact計算一個數

1熱度

4回答

如何在DrScheme的列表中用另一個項目替換項目，當給定的參數是兩個項目和一個列表？

當給定的參數是兩個項目和一個列表時，如何在DrScheme的列表中用另一個項目替換項目？

12熱度

3回答

在球拍中包含外部文件

我想包括給定球拍文件中定義的所有功能，以便獲得與複製相同的效果。有可能這樣做嗎？

1熱度

1回答

語法錯誤試圖定義一個塊內部的局部

所以我在拍/計劃下面的代碼塊： (define (inc x) (local (define a 1) (+ x a))) ，當我嘗試在其上運行，或檢查語法（球拍博士）我得到以下錯誤： define: bad syntax in: define 我知道這可能是一件非常愚蠢的事情，但我在這裏做錯了什麼？

5熱度

3回答

在球拍中創建一個空列表

我正在自學LISP，其中包含結構和計算機程序解釋的在線文本，但它與我在學習LISP時使用的球拍程序的細節有所不同。例如，SICP說任何列表的終止元素都是'nil'，但是Racket不支持'nil'。我如何在球拍中創建一個空列表，以便測試我自己的程序？