mirror of
https://github.com/nhammer514/textfiles-politics.git
synced 2024-10-01 01:15:38 -04:00
25 lines
551 B
Plaintext
25 lines
551 B
Plaintext
|
<html>
|
||
|
|
{
|
||
|
|
let $conspFiles := collection('personTestingOutput')
|
||
|
|
let $ents := $conspFiles//ent
|
||
|
|
let $entTypes := $ents/@type[. = 'NORP'] ! string() => distinct-values()
|
||
|
|
for $e in $entTypes
|
||
|
|
return
|
||
|
|
<table id="{$e}">
|
||
|
|
{
|
||
|
|
let $namesE := $conspFiles//ent[@type=$e]
|
||
|
|
let $distNamesE := $namesE ! normalize-space() => distinct-values() => sort()
|
||
|
|
for $t in $distNamesE
|
||
|
|
let $countT := $conspFiles//ent[. ! normalize-space() = $t] => count()
|
||
|
|
where $countT > 10
|
||
|
|
(: order by $countT descending:)
|
||
|
|
return
|
||
|
|
<tr>
|
||
|
|
<td>{$t}</td>
|
||
|
|
<td>{$countT}</td>
|
||
|
|
</tr>
|
||
|
|
}
|
||
|
|
|
||
|
|
</table>
|
||
|
|
}
|
||
|
|
</html>
|