Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
antik
gsll
Commits
d4edda0a
Commit
d4edda0a
authored
Jan 01, 2013
by
Liam M. Healy
Browse files
Improved docstrings
parent
1e4343e6
Changes
2
Hide whitespace changes
Inline
Side-by-side
solve-minimize-fit/linear-least-squares.lisp
View file @
d4edda0a
;; Linear least squares, or linear regression
;; Liam Healy <2008-01-21 12:41:46EST linear-least-squares.lisp>
;; Time-stamp: <201
2-12-31 12:30:36
EST linear-least-squares.lisp>
;; Time-stamp: <201
3-01-01 21:29:30
EST linear-least-squares.lisp>
;;
;; Copyright 2008, 2009, 2010, 2011, 2012 Liam M. Healy
;; Copyright 2008, 2009, 2010, 2011, 2012
, 2013
Liam M. Healy
;; Distributed under the terms of the GNU General Public License
;;
;; This program is free software: you can redistribute it and/or modify
...
...
@@ -64,7 +64,9 @@
computed using the weights and returned via the parameters
(cov00, cov01, c0v01) as the next three values. The weighted or
unweighted sum of squares of the residuals from the best-fit line,
\chi^2, is returned in as the last value."
)
\chi^2, is returned as the last value.
Returns: c0, c1, cov00, cov01, cov11, sumsq."
)
(
defmfun
linear-estimate
(
x
c0
c1
cov00
cov01
cov11
)
"gsl_fit_linear_est"
...
...
special-functions/elementary.lisp
View file @
d4edda0a
;; Elementary functions
;; Liam Healy, Mon Mar 20 2006 - 21:43
;; Time-stamp: <201
1
-1
0-29 23:35
:51E
D
T elementary.lisp>
;; Time-stamp: <201
2
-1
2-30 10:59
:51E
S
T elementary.lisp>
;;
;; Copyright 2006, 2007, 2008, 2009, 2011 Liam M. Healy
;; Copyright 2006, 2007, 2008, 2009, 2011
, 2012
Liam M. Healy
;; Distributed under the terms of the GNU General Public License
;;
;; This program is free software: you can redistribute it and/or modify
...
...
@@ -24,14 +24,14 @@
"gsl_sf_multiply_e"
((
x
:double
)
(
y
:double
)
(
ret
(
:pointer
(
:struct
sf-result
))))
:documentation
; FDL
"Multiplies
x and y
returning the product and associated error."
)
"Multiplies
two double-floats
returning the product and associated error."
)
(
defmfun
multiply-err
(
x
dx
y
dy
)
"gsl_sf_multiply_err_e"
((
x
:double
)
(
dx
:double
)
(
y
:double
)
(
dy
:double
)
(
ret
(
:pointer
(
:struct
sf-result
))))
:documentation
; FDL
"Multiplies x and y with associated absolute
"Multiplies
two double floats
x and y with associated absolute
errors dx and dy. The product xy +/- xy \sqrt((dx/x)^2 +(dy/y)^2)
is returned."
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment