R - parse unaligned XML attribute to data frame -

-

i have xml file structure.

<?xml version="1.0" encoding="utf-8"?> <b>     <c name="foo" stuff="89" attr="first line&#xa;second line"/>     <c name="bar" id="ontime" stuff="23" attr="blahs"/>     <c id="delay" name="dog"  newattr="clahs"/>     ... </b>

as can see attribute quite messy; missing values , unaligned. convert following data frame (or other table-like structure) in r language further analysis.

╔══════════╦══════════════╦══════════════════════════════════╦════════════════╦═════════╗ ║   name   ║ stuff        ║ attr                             ║ id             ║ newattr ║ ╠══════════╬══════════════╬══════════════════════════════════╬════════════════╬═════════╣ ║ 1 foo    ║  89          ║ "first line&#xa;second line"     ║ na             ║  na     ║ ║ 2 bar    ║  23          ║ "blahs"                          ║ "ontime"       ║  na     ║ ║ 3 dog    ║  na          ║      na                          ║ "delay"        ║ "clahs" ║ ╚══════════╩══════════════╩══════════════════════════════════╩════════════════╩═════════╝

i have failed miserably due limited r , parsing experience. have feeling xapplysapply may work, couldn't figure out how set path.

another technique explore code identify new attributes itself. in other words, no attribute's name hard-coded in code. example, when sees line 3, automatically add new column data frame , name "newattr".

thank help.

------------------- added on july 18, 2015 -----------------------

here brute force approach. there better way since it's super slow (6 hours handle single ~250mb xml on modern personal laptop).

myxmltodataframe2 <- function(file) {   xl <- xmltolist(xmlparse(file))   xl <- unname(xl)    # initialize data frame   df <- data.frame(t(xl[[1]]), stringsasfactors = false)    number_of_attribute <- length(df)   number_of_row <- length(xl)    (i in 2:number_of_row) {     # examine each element in new row     (j in 1:length(xl[[i]])) {       df[i,attributes(xl[[i]])$names[j]] <- xl[[i]][[j]]         }   }   df }

we need complete example. na data problematic fill.

here's started: 

library(xml)  xml <- '<b> <c name="foo" stuff="89" attr="first line&#xa;second line"/> <c name="bar" id="ontime" stuff="23" attr="blahs"/> <c id="delay" name="dog"  attr="clahs"/> </b>'  xml <- xmlparse(xml)  attr_vals <- unlist(xpathapply(xmlparse(xml), "//b/c/@attr")) stuff_vals <- unlist(xpathapply(xmlparse(xml), "//b/c/@stuff")) ids_vals <- unlist(xpathapply(xmlparse(xml), "//b/c/@id"))

Comments

Post a Comment

Popular posts from this blog

qt - Using float or double for own QML classes -

-
i've created components , helper methods using c++ , qt used in qml gui. of methods calculate gui elements (size, transformations, scene graph items creation). target arm 32 bit using opengl / eglfs render output. opengl using float , qml using real (defined double ). what should use in c++ do not lose precision? if use qreal ( double ) shouldn't lose precision. if git grep float in qtbase.git , can find out bit more: dist/changes-5.2.0-**************************************************************************** dist/changes-5.2.0-* important behavior changes * dist/changes-5.2.0-**************************************************************************** dist/changes-5.2.0- dist/changes-5.2.0- - qt compiled qreal typedef'ed double on dist/changes-5.2.0: platforms. qreal float on arm chipsets before. guarantees more dist/changes-5.2.0- consistent behavior between platforms qt supports, binary dist/chan...
Read more

Create Outlook appointment via C# .Net -

-
i need create outlook appointment using microsoft.office.interop.outlook , while can work locally on own workstation , works if run web application via server's browser, not work when connect server externally. hence, think might permission issue. i changed application pool identity " localsystem " don't access denied error. unfortunately, doesn't work. the app behaves if appointment created, appointment doesn't appear in outlook. here include file on top of aspx.cs page using outlook = microsoft.office.interop.outlook; here code using pop appointment. outlook.application apptapp = new outlook.application(); outlook.appointmentitem appt = apptapp.createitem(outlook.olitemtype.olappointmentitem) outlook.appointmentitem; appt.subject = txtfirstname.text + " " + txtlastname.text; appt.body = txtcomment.text; appt.alldayevent = false; appt.start = datetime.parse(txtreminderdate.text + " 8:00 am"); appt.end = datetime.p...
Read more

ios - Swift Array Resetting Itself -

-
i have 2 arrays: pointhistory , datehistory . have nstimer , , when timer runs out, action called. in action appending int pointhistory , , current date string datehistory . here timer action: func timeraction() { let steppervalue = int(stepper.value) employee.numberofpoints = steppervalue networking.saveemployee(employee, completion: { (error) -> void in if error != nil { let alert = uialertcontroller(title: "error", message: "there error updating \(self.employee.name)'s points", preferredstyle: .alert) let alertaction = uialertaction(title: "ok", style: .cancel, handler: nil) alert.addaction(alertaction) self.presentviewcontroller(alert, animated: true, completion: nil) } }) var dateformatter = nsdateformatter() dateformatter.dateformat = "mm-dd-yyyy" dateformatter.timezone = nstimezone.localtimezone() var date = nsdate() var ...
Read more