# NOT RUN {
query_txt <- "for $i in 1 to 2 return <xml>Text { $i }</xml>"
query_obj <- Query(Session, query_txt)
print(Full(query_obj)) ## Return "0b" "<xml>Text 1</xml>" "0b" "<xml>Text 2</xml>"
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab