Function: math-nlfit-get-sigmas

math-nlfit-get-sigmas is a byte-compiled function defined in calc-nlfit.el.gz.

Signature

(math-nlfit-get-sigmas GRAD XLIST PPARMS CHISQ)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-nlfit.el.gz
(defun math-nlfit-get-sigmas (grad xlist pparms _chisq)
  (let* ((sgs nil)
         (covar (math-nlfit-find-covar grad xlist pparms))
         (n (1- (length covar)))
         (N (length xlist))
         (i 1))
    (when (> N n)
      (while (<= i n)
        (setq sgs (cons (calcFunc-sqrt (nth i (nth i covar))) sgs))
        (setq i (1+ i)))
      (setq sgs (reverse sgs)))
    (list sgs covar)))