1 # This file is part of NIT ( http://www.nitlanguage.org ).
3 # Licensed under the Apache License, Version 2.0 (the "License");
4 # you may not use this file except in compliance with the License.
5 # You may obtain a copy of the License at
7 # http://www.apache.org/licenses/LICENSE-2.0
9 # Unless required by applicable law or agreed to in writing, software
10 # distributed under the License is distributed on an "AS IS" BASIS,
11 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 # See the License for the specific language governing permissions and
13 # limitations under the License.
15 # Simple numerical statistical analysis and presentation
20 # A counter counts occurrences of things
21 # Use this instead of a HashMap[E, Int]
22 class Counter[E
: Object]
25 # Total number of counted occurrences
28 private var map
= new HashMap[E
, Int]
30 # The number of counted occurrences of `e'
31 redef fun [](e
: E
): Int
34 if map
.has_key
(e
) then return map
[e
]
38 redef fun []=(e
: E
, value
: Int)
45 redef fun keys
do return map
.keys
47 redef fun values
do return map
.values
49 # Count one more occurrence of `e'
52 self.map
[e
] = self[e
] + 1
56 # Return an array of elements sorted by occurrences
59 var res
= map
.keys
.to_a
60 var sorter
= new CounterSorter[E
](self)
62 #res.sort !cmp a, b = map[a] <=> map[b]
66 # Display statistical information
70 print
" population: {list.length}"
71 if list
.is_empty
then return
72 print
" minimum value: {self[list.first]}"
73 print
" maximum value: {self[list.last]}"
74 print
" total value: {self.total}"
75 print
" average value: {div(self.total,list.length)}"
76 print
" distribution:"
79 var limit
= self[list
.first
]
81 if self[t
] > limit
then
82 print
" <={limit}: sub-population={count} ({div(count*100,list.length)}%); cumulated value={sum} ({div(sum*100,self.total)}%)"
85 while self[t
] > limit
do
87 if limit
== 0 then limit
= 1
93 print
" <={limit}: sub-population={count} ({div(count*100,list.length)}%); cumulated value={sum} ({div(sum*100,self.total)}%)"
97 private class CounterSorter[E
: Object]
98 super AbstractSorter[E
]
99 var counter
: Counter[E
]
100 redef fun compare
(a
,b
) do return self.counter
.map
[a
] <=> self.counter
.map
[b
]
104 private fun show_counter
(c
: Counter[Int])
107 (new ComparableSorter[Int]).sort
(list
)
109 print
" {e} -> {c[e]} times ({div(c[e]*100, c.total)}%)"
113 # Display exhaustive metrics about the poset
116 var nb_greaters
= new Counter[E
]
117 var nb_direct_greaters
= new Counter[E
]
118 var nb_smallers
= new Counter[E
]
119 var nb_direct_smallers
= new Counter[E
]
120 var nb_direct_edges
= 0
124 nb_edges
+= ne
.greaters
.length
125 nb_direct_edges
+= ne
.direct_greaters
.length
126 nb_greaters
[n
] = ne
.greaters
.length
127 nb_direct_greaters
[n
] = ne
.direct_greaters
.length
128 nb_smallers
[n
] = ne
.smallers
.length
129 nb_direct_smallers
[n
] = ne
.direct_smallers
.length
131 print
"Number of nodes: {self.length}"
132 print
"Number of edges: {nb_edges} ({div(nb_edges,self.length)} per node)"
133 print
"Number of direct edges: {nb_direct_edges} ({div(nb_direct_edges,self.length)} per node)"
134 print
"Distribution of greaters"
135 nb_greaters
.print_summary
136 print
"Distribution of direct greaters"
137 nb_direct_greaters
.print_summary
138 print
"Distribution of smallers"
139 nb_smallers
.print_summary
140 print
"Distribution of direct smallers"
141 nb_direct_smallers
.print_summary
145 # Helper function to display n/d and handle division by 0
146 fun div
(n
: Int, d
: Int): String
148 if d
== 0 then return "na"
149 return ((100*n
/d
).to_f
/100.0).to_precision
(2)