ls-user.lisp

   1 ;;; -*- mode: lisp -*-
   2 ;;; Copyright (c) 2005--2007, by A.J. Rossini <blindglobe@gmail.com>
   3 ;;; See COPYRIGHT file for any additional restrictions (BSD license).
   4 ;;; Since 1991, ANSI was finally finished.  Edited for ANSI Common Lisp.
   5
   6 (defpackage :lisp-stat
   7   (:documentation "Experimentation package for LispStat.  Serious work
   8 should be packaged up elsewhere for reproducibility.")
   9   (:use :common-lisp
  10         :lisp-stat-object-system
  11         :lisp-stat-float
  12         :lisp-stat-math
  13         :lisp-stat-basics
  14         :lisp-stat-regression-linear)
  15   (:shadowing-import-from :lisp-stat-object-system
  16         slot-value call-method call-next-method)
  17   (:shadowing-import-from :lisp-stat-math
  18         expt + - * / ** mod rem abs 1+ 1- log exp sqrt sin cos tan
  19         asin acos atan sinh cosh tanh asinh acosh atanh float random
  20         truncate floor ceiling round minusp zerop plusp evenp oddp
  21         < <= = /= >= > complex conjugate realpart imagpart phase
  22         min max logand logior logxor lognot ffloor fceiling
  23         ftruncate fround signum cis)
  24   (:export
  25
  26    ;; lsobjects.lsp
  27    defproto defmeth send
  28
  29    ;; lsmath.lsp
  30    ^ ** expt + - * / mod rem pmin pmax abs 1+ 1- log exp sqrt sin cos
  31    tan asin acos atan sinh cosh tanh asinh acosh atanh float random
  32    truncate floor ceiling round minusp zerop plusp evenp oddp < <= =
  33    /= >= > complex conjugate realpart imagpart phase min max
  34    logand logior logxor lognot ffloor fceiling ftruncate fround
  35    signum cis
  36
  37    ;; matrices.lisp
  38    matrixp num-rows num-cols matmult identity-matrix diagonal row-list
  39    column-list inner-product outer-product cross-product transpose
  40    bind-columns bind-rows
  41
  42    ;; linalg.lisp
  43    chol-decomp lu-decomp lu-solve determinant inverse sv-decomp
  44    qr-decomp rcondest make-rotation
  45    fft make-sweep-matrix sweep-operator ax+y numgrad numhess
  46    split-list eigenp
  47
  48    ;; in linalg.lisp, possibly not supported by matlisp
  49    spline kernel-dens kernel-smooth
  50
  51    ;; optimize.lsp
  52    newtonmax nelmeadmax
  53
  54    ;; lispstat-macros
  55    make-rv-function make-rv-function-1
  56
  57    ;; data.lisp
  58
  59
  60    ;; statistics.lsp
  61    open-file-dialog read-data-file read-data-columns load-data
  62    load-example *variables* *ask-on-redefine* def variables savevar
  63    undef standard-deviation quantile median interquartile-range
  64    fivnum covariance-matrix difference rseq matrix print-matrix solve
  65    backsolve eigenvalues eigenvectors accumulate cumsum combine
  66    lowess
  67
  68    ;; dists
  69    log-gamma uniform-rand normal-cdf normal-quant normal-dens
  70    normal-rand bivnorm-cdf cauchy-cdf cauchy-quant cauchy-dens
  71    cauchy-rand gamma-cdf gamma-quant gamma-dens gamma-rand
  72    chisq-cdf chisq-quant chisq-dens chisq-rand beta-cdf beta-quant
  73    beta-dens beta-rand t-cdf t-quant t-dens t-rand f-cdf f-quant
  74    f-dens f-rand poisson-cdf poisson-quant poisson-pmf poisson-rand
  75    binomial-cdf binomial-quant binomial-pmf binomial-rand
  76
  77 ;;; Here is where we have a problem -- lispstat core should be core
  78 ;;; data management and config problems, with packages providing
  79 ;;; specialized extensions to LispStat, i.e. regression, nonlin
  80 ;;; regression, bayesian regression via laplace approximation, etc.
  81
  82 ;;; The following could be considered "recommended packages", similar
  83 ;;; to the idea of the recommended packages in R.
  84
  85    ;; regression.lsp
  86    regression-model regression-model-proto x y intercept sweep-matrix
  87    basis weights included total-sum-of-squares residual-sum-of-squares
  88    predictor-names response-name case-labels
  89
  90    ;; nonlin.lsp
  91    nreg-model nreg-model-proto mean-function theta-hat epsilon
  92    count-limit verbose
  93
  94    ;; bayes.lsp
  95    bayes-model bayes-model-proto bayes-internals))
  96
  97 (defpackage :lisp-stat-user
  98   (:documentation "Experimentation package for LispStat.
  99 Serious work should be placed in a similar package elsewhere for
 100 reproducibility.  But this should hint as to what needs to be
 101 done for a user- or analysis-package.")
 102   (:nicknames :ls-user)
 103   (:use :common-lisp
 104         :lisp-stat)
 105   (:shadowing-import-from :lisp-stat
 106       slot-value call-method call-next-method
 107
 108       expt + - * / ** mod rem abs 1+ 1- log exp sqrt sin cos tan
 109       asin acos atan sinh cosh tanh asinh acosh atanh float random
 110       truncate floor ceiling round minusp zerop plusp evenp oddp
 111       < <= = /= >= > complex conjugate realpart imagpart phase
 112       min max logand logior logxor lognot ffloor fceiling
 113       ftruncate fround signum cis
 114
 115       <= float imagpart))