title: how do I make a function to find the mean of a function in scheme
body: <pre><code>((define (sum list)
  (if(null? list)
     0
     (+(car list)(sum(cdr list)))))
  
  (define (mean list)
    (if(null? list)
       0
      
       (/ (sum list) (length list))))
  (mean (list 1 2 3 4))
  </code></pre>
  <p>so apparently the mean being returned is 2 1/2 but it should be 2 just 2 as 10/5 is 2 what should I do to make correct mean??</p>