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
  25   (:export
  26    ;; lsobjects.lsp : should this become a prototype object?
  27    defproto defmeth send
  28
  29    ;; data.lisp
  30
  31
  32    ;; lsmath.lsp
  33    ^ ** expt + - * / mod rem pmin pmax abs 1+ 1- log exp sqrt sin cos
  34    tan asin acos atan sinh cosh tanh asinh acosh atanh float random
  35    truncate floor ceiling round minusp zerop plusp evenp oddp < <= =
  36    /= >= > complex conjugate realpart imagpart phase min max
  37    logand logior logxor lognot ffloor fceiling ftruncate fround
  38    signum cis
  39
  40    ;; statistics.lsp
  41    open-file-dialog read-data-file read-data-columns load-data
  42    load-example *variables* *ask-on-redefine* def variables savevar
  43    undef standard-deviation quantile median interquartile-range
  44    fivnum covariance-matrix difference rseq matrix print-matrix solve
  45    backsolve eigenvalues eigenvectors accumulate cumsum combine
  46    lowess
  47
  48    ;; probability
  49
  50
  51
  52 ;;; Here is where we have a problem -- lispstat core should be core
  53 ;;; data management and config problems, with packages providing
  54 ;;; specialized extensions to LispStat, i.e. regression, nonlin
  55 ;;; regression, bayesian regression via laplace approximation, etc.
  56
  57 ;;; The following could be considered "recommended packages", similar
  58 ;;; to the idea of the recommended packages in R.
  59
  60    ;; regression.lsp
  61    regression-model regression-model-proto x y intercept sweep-matrix
  62    basis weights included total-sum-of-squares residual-sum-of-squares
  63    predictor-names response-name case-labels
  64
  65    ;; nonlin.lsp
  66    nreg-model nreg-model-proto mean-function theta-hat epsilon
  67    count-limit verbose
  68
  69    ;; bayes.lsp
  70    bayes-model bayes-model-proto bayes-internals
  71
  72    ;; optimize.lsp
  73    newtonmax nelmeadmax
  74
  75    ))
  76
  77 (defpackage :lisp-stat-user
  78   (:documentation "Experimentation package for LispStat.
  79 Serious work should be packaged up elsewhere for reproducibility.  But
  80 this should provide a hint as to what could be done for a user-package
  81 or analysis-package.")
  82   (:nicknames :ls-user)
  83   (:use :common-lisp
  84         :lisp-stat)
  85   (:shadowing-import-from :lisp-stat
  86
  87       slot-value call-method call-next-method
  88
  89       expt + - * / ** mod rem abs 1+ 1- log exp sqrt sin cos tan
  90       asin acos atan sinh cosh tanh asinh acosh atanh float random
  91       truncate floor ceiling round minusp zerop plusp evenp oddp
  92       < <= = /= >= > complex conjugate realpart imagpart phase
  93       min max logand logior logxor lognot ffloor fceiling
  94       ftruncate fround signum cis
  95
  96       <= float imagpart
  97       ))