DrRacket/Schema: Vertragsverletzung, Zahl erwartet?

Also ich habe 3 definierten Funktionen in scheme sumlist summiert alle zahlen in einer Liste, und meinen Sie, gibt mir den Mittelwert der Liste. mean2 Anrufe bedeuten und tut die gleiche Sache, aber ich bekomme eine Fehlermeldung. Es sagt, der Fehler kommt von sumlist Funktion.

(define (sumlist lst)(if(null? lst)0 (+(car lst)(sumlist(cdr lst)))))
(define mean (lambda x(/(sumlist x)(length x))))
(define mean2 (lambda x(mean x)))

Dies ist, wie rufe ich die Funktionen

(mean 1 2 3 4 5)
=>3               ;it works

(mean2 1 2 3 4 5)
+: contract violation
expected: number?
given: '(1 2 3 4 5)
argument position: 1st
other arguments...:
0

Ich bin immer noch neues zu Schema habe gerade eingeführt, um es Letzte Woche, aber es ist wirklich frustrierend..was mache ich falsch?

InformationsquelleAutor user2968401 | 2013-12-09
  1. 6

    Weil (define (x . y) ...) ist das gleiche wie (define x (lambda y ...)),
    die folgenden Implementierungen von identity sind die gleichen

    (define (fun arg1)
  arg1)

(define fun 
  (lambda (arg1)
     arg1)

    Während der folgenden Umsetzung list sind die gleichen

    (define (fun . args)
  args)

(define fun 
  (lambda args
     args)

    So, wenn Sie Sie anwenden (mean2 2 3 4 5) x ist die Liste (2 3 4 5), und (mean '(2 3 4 5)) auch umschließt alle Argumente in einer Liste angezeigt, sodass der Aufruf sumlist verwandelt sich in (sumlist '((2 3 4 5))). In sumlist Sie versuchen zu tun (+ '(2 3 4 5) 0) das wird nicht funktionieren, da + erwartet zahlen als Argumente, keine Listen. Um dies zu beheben, müssen Sie definieren mean2 als einer der:

    ;; Just make an alias to mean
(define mean2 mean)

;; wrap mean
(define (mean2 x) 
  (mean x))

;; use apply 
(define (mean2 . x)
   (apply mean x)) ; apply undoes list

    Ich würde verwenden Sie die Methoden in der Reihenfolge des Erscheinens. Manchmal mit gilt ist der beste, aber nicht, wenn Sie nur alias oder wickeln.

    • Ich hasse das System, aber Sie sind genial. Dank
    • Menschen, die Antwort-Schema Fragen kompetent dazu neigen, zu lieben Schema, so zu sagen, dass Sie Hass-Schema ist unwahrscheinlich beliebt Sie zu Ihnen. Ich weiß, für eine Tatsache, dass, wenn ich vermeiden, Beantwortung von Fragen, wo die OP sagt, dass Sie hassen Schema.
    • Das ist schade, denn das System kann werden, eine erhellende Erfahrung. In Teil da-Regelung ist so viel anders, und in vielerlei Hinsicht leistungsfähiger als die traditionellen "C-Stil" Sprachen. Möchten Sie einen guten editor, der uns maches Klammer (emacs, vim, vielleicht dr. Schläger?), und sollte auch eine Haltung der mehr als nur "lass mich das absolute minimum, um pass dieser Kurs" - die Sie zu haben scheinen, da Sie dies geschrieben 🙂
    • Sie Jungs, die Einnahme mein Kommentar so ernst nehmen.
    InformationsquelleAutor Sylwester
Schreibe einen Kommentar