0

出于某种原因,当我尝试 Cc Ck 包含代码的程序时:

(defun give-rank-vec (file-1 file-2)
  (let* ((cm-size (array-dimension (Swc (make-ff-array file-1)
                                        (make-ff-array file-2)) 
                                    0))
         (rank-dump-vec (make-array `(,cm-size)))     
         (Swc' (Swc (make-ff-array file-1)
                    (make-ff-array file-2))) 
         (Sbc' (Sbc (make-ff-array file-1) 
                    (make-ff-array file-2))))
    (dotimes (j cm-size) 
      (setf (svref rank-dump-vec j) 
            (/ (get-element Sbc' j j) 
               (get-element Swc' j j)))))   
   rank-dump-vec)  

我收到一条错误消息,提示“变量rank-dump-vec未定义”。我不确定为什么会这样——我相信反引号和逗号是可以的。我错过了什么吗?

4

1 回答 1

2

您最后的参考rank-dump-vec是在您的let*表格之外。在前面移动它)

于 2013-02-01T13:56:10.813 回答