The R Project SVN R-packages

Rev

Rev 7747 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7747 Rev 8141
Line 81... Line 81...
81
  xmlSize(f)
81
  xmlSize(f)
82
 
82
 
83
 
83
 
84
  o = c("<x>dog</x>", "<omg:x>cat</omg:x>")
84
  o = c("<x>dog</x>", "<omg:x>cat</omg:x>")
85
  node = parseXMLAndAdd(o, nsDefs  = c("http://cran.r-project.org",
85
  node = parseXMLAndAdd(o, nsDefs  = c("http://cran.r-project.org",
86
                                       omg = "http://www.omegahat.net"))
86
                                       omg = "https://www.omegahat.net"))
87
  xmlNamespace(node[[1]])
87
  xmlNamespace(node[[1]])
88
  xmlNamespace(node[[2]])
88
  xmlNamespace(node[[2]])
89
 
89
 
90
  tt = newXMLNode("myTop")
90
  tt = newXMLNode("myTop")
91
  node = parseXMLAndAdd(o, tt, nsDefs  = c("http://cran.r-project.org",
91
  node = parseXMLAndAdd(o, tt, nsDefs  = c("http://cran.r-project.org",
92
                                           omg = "http://www.omegahat.net"))
92
                                           omg = "https://www.omegahat.net"))
93
  tt
93
  tt
94
}
94
}
95
 
95
 
96
 
96
 
97
}
97
}