Question

在方案中实现对数函数。

logB函数足以计算对数

(define logB 
  (lambda (x b)
        (/ (log x) (log b)) 
    )
  )

然后，我还需要这两个功能。为什么我需要这两个功能？

此

(define logSpace
 (lambda (a b n x)
   (expt 10 (+ a (/ (* x (- b a)) (- n 1))))
       )
 )

和这一个

 (define LogFunc
  (lambda (min max n x)         
    (logSpace
     (cond ((= min 0)    (logB 0.01 10))            
           ((< min 0)    (logB (* min -1) 10))
           (else         (logB min 10))) 

     (cond ((= max 0)    (logB 0.01 10))
           ((< max 0)    (logB (* max -1) 10))
           (else         (logB max 10))) 
     n 
     x)
)

）

Answer 1

你不需要它们。

或许或许你误解了你被问过的问题？

方案中的日志空间实现

1 个答案: