diff --git a/basis/math/statistics/statistics.factor b/basis/math/statistics/statistics.factor
index 5cf4e2b56c..12dac7c672 100644
--- a/basis/math/statistics/statistics.factor
+++ b/basis/math/statistics/statistics.factor
@@ -333,9 +333,6 @@ ALIAS: corr sample-corr
 : cum-max ( seq -- seq' )
     dup ?first [ max ] cum-map ;
 
-: probabilities ( seq -- probabilities )
-    [ histogram values ] [ length ] bi v/n ;
-
 : entropy ( probabilities -- n )
     dup sum '[ _ / dup log * ] map-sum neg ;