Сохранение определенных значений XML-узла с помощью R xmlEventParse

У меня есть большой XML-файл, который мне нужно проанализировать с помощью xmlEventParse в R . К сожалению, онлайн-примеры сложнее, чем мне нужно, и я просто хочу пометить соответствующий тег узла, чтобы сохранить соответствующий текст узла (не атрибут), каждый текст в отдельном списке, см. Комментарии в приведенном ниже коде:

library(XML)
z <- xmlEventParse(
    "my.xml", 
    handlers = list(
        startDocument   =   function() 
        {
                cat("Starting document\n")
        },  
        startElement    =   function(name,attr) 
        {
                if ( name == "myNodeToMatch1" ){
                    cat("FLAG Matched element 1\n")
                }
                if ( name == "myNodeToMatch2" ){
                    cat("FLAG Matched element 2\n")
                }
        },
        text            =   function(text) {
                if ( # Matched element 1 .... )
                    # Store text in element 1 list
                if ( # Matched element 2 .... )
                    # Store text in element 2 list
        },
        endDocument     =   function() 
        {
                cat("ending document\n")
        }
    ),
    addContext = FALSE,
    useTagName = FALSE,
    ignoreBlanks = TRUE,
    trim = TRUE)
z$ ... # show lists ??

У меня вопрос, как реализовать этот флаг в R (профессионально :)? Плюс: Какой лучший выбор для оценки N произвольных узлов на соответствие ... if name = "myNodeToMatchN" ... узлы, избегающие совпадения регистра?

my.xml может быть просто наивным XML, например

  Text in NodeToMatch1
  
    Text in NodeToMatch2
    ...