for $a in collection("TreeTagger-651865")//article
for $b in $a/element
let $suivant := $b/following-sibling::element[1]
where $b/data[1] = "NOM" and $suivant/data[1] = "ADJ"
return <NOM-ADJ>{$b/data[3]/text(), ' ', $suivant/data[3]/text()}</NOM-ADJ>