Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

how do I average in scheme?

Name: Anonymous 2010-12-26 21:31

im learning scheme and im not very good its my first languages what am i doing wrong

(define (average nums)
   (/ (+ (car nums) (average (cdr nums))) 2))

then i do (average (list 2 3 4 5 6)) but it doesnt work
also how can i do that (average 2 3 4 5 6) gives me the average without doing a list?

please help

Name: Anonymous 2010-12-27 0:39

>>4

What's the point of loop/letrec in your recursive example? Why not just something like this:


(define (average . numbers)
  (define average' (nums count)
    (if (null? nums) (/ nums count)
        (+ (car nums) (average' (cdr nums)))))
  (average' numbers (length numbers)))

Newer Posts
Don't change these.
Name: Email:
Entire Thread Thread List