Example adding arbitrary semantics about eml HOT 2 CLOSED

rdfa <- '<subject about="http://some.namespace#1838" xmlns:o="http:/oboe-core#">
             <meta property="o:entity" content="Air" datatype="xsd:string"/>
             <meta property="o:characteristic" content="Temperature" datatype="xsd:string"/>
             <meta property="o:unit" content="Celsius" datatype="xsd:string"/>
            </subject>'
eml_write(dat, additionalMetadata = new("additionalMetadata", metadata = rdfa))

require(XML)
rdfa <- newXMLNode("subject", 
                        attrs=c(about="#1838"), 
                        namespaceDefinitions = c(o="http:/oboe-core#"), 
                        .children = list(
             newXMLNode("meta", attrs = c(property="o:entity", content="Air", datatype="xsd:string")),
             newXMLNode("meta", attrs = c(property="o:characteristic", content="Temperature", datatype="xsd:string")),
             newXMLNode("meta", attrs = c(property="o:unit", content="Celsius", datatype="xsd:string"))
            ))

eml <- eml(dat, creator="Carl Boettiger <[email protected]>", additionalMetadata = new("additionalMetadata", metadata = rdfa))