Read XML file into R

# Load required libraries
library('XML')
library('methods')
library('RMySQL')
library('dplyr')

# Connect to MySQL data base and read in XML table
conn <- dbConnect(
  RMySQL::MySQL(), 
  dbname='global-warming',
  host='127.0.0.1',
  port= 3306,
  user='root', 
  password='TempPassword')
# Importtable into R data.frames
sql_tbl <- dbGetQuery(conn, "select * from co2_xml_demo;")
# Disconnect from the database
dbDisconnect(conn)

[1] TRUE

# Convert the XML to a dataframe and display
xml_data <- xmlToDataFrame(sql_tbl$co2_doc)
xml_data

As can be seen, the value of the first co2 record for australia has been set to 12, as was completed in the SQL query.