lisp

    0

    1答えて

    私はSICP本で運動3.5をしていました。 (define (monte-carlo trials experiment) (define (iter trials-remaining trials-passed) (cond ((= trials-remaining 0) (/ trials-passed trials)) ((experiment

    0

    1答えて

    特定のサブストリングが式で見つかった回数をプログラムがカウントするようにしたい。次のコードを書いたが、予想される出力が得られない。 (define (count-occurrences s slist) (if (null? slist) 0 (+ (count-occurrences-in-s-sexp s (car slist)) (count

    3

    2答えて

    我々は以下の持っている: CL-USER> (subtypep 'integer 'number) T T CL-USER> (subtypep 'double-float 'number) T T CL-USER> (subtypep 'vector 'array) T T ので、この: CL-USER> (subtypep '(vector integer) '(arr

    0

    2答えて

    ラケットを使ってフィルタを組み立てようとしています。 私は次のコードを作成しました: "?奇数" "?でも、" 私はいくつかのテストを行って、 (define (filter lista-1 check-function) (define (fil-iter lista-1 check-function lista-2) (cond ((null? lista-1) lista-2)

    0

    1答えて

    大学のプロジェクトでは、私たちは学習スキームに取り組んでいますが、私たちは知識がほとんどない難しい課題に投げかけられています。私たちは "let"、 "cond"、 "and"などのような特定の機能を与えられ、マクロを追加するように求められました。 したがって、コメントはあります。 私は「指揮一部をやってみましたし、この ((equal? (car e) 'cond) (env (c

    0

    1答えて

    次のLispベースのルーチンを実行しています。 元の図は、pathA/drawing.dwgでlispの途中まで書かれたものです。次にコードはsaveを実行し、別のパス、たとえばpathB/drawing.dwgに名前を複製します。 残りのコードは、新しいパスpathB/drawing.dwgにある間にファイルに対して実行されます。これは、起こっているいくつかのことがあり、適用されているためpat

    0

    1答えて

    私はLISPを初めて使用しています。私はテキストファイルの作成に問題があります。私は、料理の本や他のチュートリアルだけでなく、ここでは、以下の例を読んでいるが、私は同じエラーを取得しておいてください。 "Incorrect keyword arguments in (:DIRECTION :OUTPUT :IF-EXSISTS

    0

    1答えて

    で定義されたリストに値を追加し、私が何をしtriyingだものは以下の通りです: 私はスキーム で辞書に値を追加しますので、私のように辞書を定義関数を作成する必要がありますリストのリストは、それは次のように: (define Dictionary '(("key 1" "value 1") ("key 2" "value"))) を今すぐ値を加算する機能のために: 要素がnullでない場合、私

    1

    1答えて

    私はラケットと博士ラケットを使用しています。 plotと呼ばれる素晴らしいライブラリがあり、グラフを2Dまたは3Dでプロットすることができます。私はこの方程式をプロットしようとすると、しかし (plot3d (surface3d (lambda (x y) (* x 3)) (- 10) 10 (- 10) 10)) : パッケージインポートした後: (require plot) を私はf

    0

    1答えて

    私はRacketのNLPプロジェクトに取り組んでいます。 このコードは正常に動作します。しかし、私はそれを辿ることができればと思います。 私はgenerate-next関数の動作をトレースするのに問題があります。 私のコードです: #lang racket (require racket/trace) (require rackunit) (define english-1