From f39af49f8365cbd768251d62a884e16b520566d3 Mon Sep 17 00:00:00 2001 From: Keita Haga Date: Tue, 18 Jan 2011 23:19:21 +0900 Subject: [PATCH] math.statistics: in some words, interchanging the positions of the $examples and a $description --- basis/math/statistics/statistics-docs.factor | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/basis/math/statistics/statistics-docs.factor b/basis/math/statistics/statistics-docs.factor index 85c1f4a0cc..63263e603c 100644 --- a/basis/math/statistics/statistics-docs.factor +++ b/basis/math/statistics/statistics-docs.factor @@ -75,27 +75,27 @@ HELP: histogram { "seq" sequence } { "hashtable" hashtable } } +{ $description "Returns a hashtable where the keys are the elements of the sequence and the values are the number of times they appeared in that sequence." } { $examples { $example "! Count the number of times an element appears in a sequence." "USING: prettyprint math.statistics ;" "\"aaabc\" histogram ." "H{ { 97 3 } { 98 1 } { 99 1 } }" } -} -{ $description "Returns a hashtable where the keys are the elements of the sequence and the values are the number of times they appeared in that sequence." } ; +} ; HELP: histogram! { $values { "hashtable" hashtable } { "seq" sequence } } +{ $description "Takes an existing hashtable and uses " { $link histogram } " to continue counting the number of occurrences of each element." } { $examples { $example "! Count the number of times the elements of two sequences appear." "USING: prettyprint math.statistics ;" "\"aaabc\" histogram \"aaaaaabc\" histogram! ." "H{ { 97 9 } { 98 2 } { 99 2 } }" } -} -{ $description "Takes an existing hashtable and uses " { $link histogram } " to continue counting the number of occurrences of each element." } ; +} ; HELP: sorted-histogram { $values @@ -115,41 +115,41 @@ HELP: sequence>assoc { "seq" sequence } { "quot" quotation } { "exemplar" "an exemplar assoc" } { "assoc" assoc } } +{ $description "Iterates over a sequence, allowing elements of the sequence to be added to a newly created " { $snippet "assoc" } " according to the passed quotation." } { $examples { $example "! Iterate over a sequence and increment the count at each element" "USING: assocs prettyprint math.statistics ;" "\"aaabc\" [ inc-at ] H{ } sequence>assoc ." "H{ { 97 3 } { 98 1 } { 99 1 } }" } -} -{ $description "Iterates over a sequence, allowing elements of the sequence to be added to a newly created " { $snippet "assoc" } " according to the passed quotation." } ; +} ; HELP: sequence>assoc! { $values { "assoc" assoc } { "seq" sequence } { "quot" quotation } } +{ $description "Iterates over a sequence, allowing elements of the sequence to be added to an existing " { $snippet "assoc" } " according to the passed quotation." } { $examples { $example "! Iterate over a sequence and add the counts to an existing assoc" "USING: assocs prettyprint math.statistics kernel ;" "H{ { 97 2 } { 98 1 } } clone \"aaabc\" [ inc-at ] sequence>assoc! ." "H{ { 97 5 } { 98 2 } { 99 1 } }" } -} -{ $description "Iterates over a sequence, allowing elements of the sequence to be added to an existing " { $snippet "assoc" } " according to the passed quotation." } ; +} ; HELP: sequence>hashtable { $values { "seq" sequence } { "quot" quotation } { "hashtable" hashtable } } +{ $description "Iterates over a sequence, allowing elements of the sequence to be added to a hashtable according to the passed quotation." } { $examples { $example "! Count the number of times an element occurs in a sequence" "USING: assocs prettyprint math.statistics ;" "\"aaabc\" [ inc-at ] sequence>hashtable ." "H{ { 97 3 } { 98 1 } { 99 1 } }" } -} -{ $description "Iterates over a sequence, allowing elements of the sequence to be added to a hashtable according to the passed quotation." } ; +} ; ARTICLE: "histogram" "Computing histograms" "Counting elements in a sequence:"