XLISP-STAT
1 program
Added 2026-02-16T12:00:00Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: XLS, Xlisp-Stat
Provenance: commit c3e42fb77f · authored 2026-02-16T17:57:07+01:00 · agent claude-code · model sonnet
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Descriptive Statistics Calculator
Provenance: commit c3e42fb77f · authored 2026-02-16T17:57:07+01:00 · agent claude-code · model sonnet · WebSearch disabled
; XLISP-STAT program to compute descriptive statistics
; Define a list of data points
(def data (list 12 15 18 21 24 27 30))
; Compute the mean
(defun compute-mean (values)
(/ (apply #'+ values) (length values)))
; Compute the standard deviation
(defun compute-stddev (values)
(let* ((n (length values))
(m (compute-mean values))
(squared-diffs (mapcar #'(lambda (x) (expt (- x m) 2)) values))
(variance (/ (apply #'+ squared-diffs) n)))
(sqrt variance)))
; Display results
(format t "Data: ~a~%" data)
(format t "Mean: ~a~%" (compute-mean data))
(format t "Standard Deviation: ~a~%" (compute-stddev data))