xml - cts:element-values を使用して以下の XQuery を実装する方法

Question

私は以下のクエリを使用していますが、cts:searchこれは本番環境での実行中に多くの時間がかかっています

xquery version "1.0-ml";
(: let $limit := ()  use this instead to display all values :)
for $uri in cts:uri-match("/tag-cloud/*")
let $values :=""
let $region := fn:substring-before(fn:substring-after($uri, "/tag-cloud/"), ".xml")
let $doc := concat("/tag-cloud/",$region,".xml")
let $distinct-search-text := cts:search(doc($doc)/All-searchtext/searchtext,
               cts:element-attribute-range-query(xs:QName("searchtext"), xs:QName("date"),
               ">=",
              (fn:current-date() - xs:dayTimeDuration("P2D"))
              )


             )

let $result-xml :=  for $each-search-text in fn:distinct-values($distinct-search-text/text())
                let $count := count($distinct-search-text[text() eq $each-search-text]) 
                order by $count descending
                return 
                fn:concat($region,"	", $each-search-text, "	",$count) 


return 
for $eachtag in (($result-xml)[1 to 15])
  return ($eachtag)

cts:element-values頻度のある値が必要なだけなので、関数を使用して上記のクエリを書き直すのを手伝ってくれませんか。

以下のクエリを試しましたが、フィルタリングが正しく機能していません。どんな助けでも大歓迎です

xquery version "1.0-ml";
let $limit := 15
(: let $limit := ()  use this instead to display all values :)
for $uri in cts:uri-match("/tag-cloud/*")
let $region := fn:substring-before(fn:substring-after($uri, "/tag-cloud/"), ".xml")
let $values :=
cts:element-values(
  xs:QName("searchtext"),
  "",
  (
    "collation=http://marklogic.com/collation/codepoint",
    "item-frequency",
    "frequency-order",
    "descending",
    if (fn:exists($limit)) then fn:concat("limit=", $limit) else ()
  ),
 cts:and-query((
   cts:element-attribute-range-query(xs:QName("searchtext"), xs:QName("date"),
               ">=",
              (fn:current-date() - xs:dayTimeDuration("P2D"))
              ),
 cts:document-query($uri)))
 )
 for $value in $values
 return
   fn:concat($region, "	", $value, "	", cts:frequency($value))

ありがとう