simple_safety_xml {eudract}

creates a simple xml file from the input of a safety_summary object

Description

creates a simple xml file from the input of a safety_summary object

Usage

simple_safety_xml(
  x,
  file,
  schema = system.file("extdata", "simple.xsd", package = "eudract")
)

Arguments

x

an object of class safety_summary, as created by safety_summary.

file

a character string name the file to be created

schema

a character string giving the file path to the schema for the outputxml file. Defaults to the schema provided in this package.

Value

no output is returned, but a file is created as a side-effect.

See Also

eudract_convert safety_summary

Examples

safety_statistics <- safety_summary(safety,
                                    exposed=c("Experimental"=60,"Control"=67))
simple <- tempfile(fileext = ".xml")
eudract <- tempfile(fileext = ".xml")
ct <- tempfile(fileext = ".xml")
simple_safety_xml(safety_statistics, simple)
eudract_convert(input=simple,
                output=eudract)
clintrials_gov_convert(input=simple,
                       original=system.file("extdata", "1234.xml", package ="eudract"),
                output=ct)
## Not run: 
  # This needs a real user account to work
  clintrials_gov_upload(
    input=simple,
    orgname="CTU",
    username="Student",
    password="Guinness",
    studyid="1234"
    )


## End(Not run)