I wrote a simple ps macro to work like CL's log. It seems like a candidate for inclusion in PS itself.
Daniel
(defpsmacro log (number &optional base) (cond ((null base) `(*math.log ,number)) ((= base 10) `(* (log ,number) *math.*log10e*)) (t `(/ (log ,number) (log ,base)))))