racket

0熱度

1回答

圖像I定義的這種類型的： (define-type Example [E1(salary number?)] [E2(salary number?) (age number?)] [E3(salary number?) (name string?)] [E4(random number?)]) 現在我得到與某些實施例類型的列表，像 (define e1(

2熱度

2回答

在列表球拍中計數數字

我有疑問，我使用的是球拍，我想列出一個列表的數字，但我不能。我試着用長，但我想，因爲（countDigits「（4 5 6 78））> 5 的答案是5這是行不通的，但我不知道怎麼樣，我有一個數字計數的代碼，但我不知道如何在列表中執行。 ¿我該怎麼做？

4熱度

2回答

如何設置語言HTDP/BSL在REPL

我有以下htdp/bsl程序保存爲example.rkt： #lang htdp/bsl (+ 1 1) 當上述使用racket example.rkt運行時，輸出爲預期（即2）。然而，當我嘗試使用htdp/bsl作爲語言（racket -I htdp/bsl）啓動REPL，出現以下錯誤： Welcome to Racket v6.3. default-load-handler: can

0熱度

1回答

和矩陣球拍

我試圖做一個函數在拍那筆2矩陣，使用地圖和運用，問題是，我只用地圖這樣 (define (sumM x y) (map(lambda (x y) (map + x y)) x y)) (sumM '((10 10 10) (5 5 5)) '((1 1 1) (2 2 2))) 它給了我： (sumM '((10 10 10) (5 5 5)) '((1 1 1) (2 2 2))) ->'((1

0熱度

1回答

Datalog代碼在Racket中不起作用

我想將this Prolog code移植到Racket中的Datalog，使用this page底部的示例。 #lang datalog edge(a, b). edge(b, c). edge(c, d). edge(d, a). path(X, Y) :- edge(X, Y). path(X, Y) :- edge(X, Z), path(Z, Y). path(X, Y)?

0熱度

1回答

壞語法錯誤使用#lang普拉伊

我對這段代碼 deleted ，更具體地說，這個錯誤得到一個不好的語法錯誤定義類型： xxx:22.0: define-type: bad syntax in: xxx #(739 316) 我新的語言，所以任何人都會友善地告訴我我的代碼有什麼問題，以及如何擺脫錯誤？

1熱度

1回答

GUI組件佈局/方案

我使用下面的代碼爲一個小的GUI程序： #lang racket/gui (define ff (new frame% [label "Adjust widths"] [height 100] [width 300])) (new message% [parent ff][label "testing"]) (new text-field%

0熱度

1回答

如何在不以根用戶身份運行的程序中以root身份寫入文件？

我有一個程序，不應該作爲根運行，因爲它根據用戶的名字和其他東西做事情。但是，我可能需要編寫一個（並且應該）只能以root身份寫入的文件。我可以做什麼，但寧可不寫，將文件寫入一些臨時文件，然後(system "sudo mv /tmp/myfile /destination/myfile")。這將sudo要求輸入密碼，以root身份移動文件，然後該程序將繼續以普通用戶身份運行。如果用戶不能使用su

0熱度

1回答

找到除數的數量

我需要在#lang球拍中寫一個函數來確定一個正整數所具有的除數量。（實施例：6具有4個除數; 1,2,3,6）到目前爲止，我有：（定義（分AB）（如果（= 0（模AB））#T＃ f））的我需要使用這個輔助函數來寫函數（除數-高達NK），該其計算除數的數n 1和k之間具有（所以它計算ñ 的約數的數直到值k）。

0熱度

1回答

有什麼方法可以使用遞歸寬度優先實現來創建二叉樹的副本？

本質上講，我試圖做的是採取與數據定義 binary_tree: number | (symbol binary_tree binary_tree) 二叉樹和創造，每個葉片（數字）替換爲計數器的號樹的新版本。我試圖從左到右，然後從上到下這樣做，所以使用寬度優先搜索似乎是按順序訪問每個節點的明顯選擇。但是，我的問題是這樣的。我需要積累一個新的二叉樹來返回它。因爲我們正在訪問每個節點，是否有任何可能