download.file("http://www.philipleifeld.de/cms/upload/Downloads/dna-1.31.jar",
destfile = "dna-1.31.jar", mode = "wb")
download.file("http://www.philipleifeld.de/cms/upload/Downloads/sample.dna",
destfile = "sample.dna", mode = "wb")
dna.init("dna-1.31.jar")
attributes <- dna.attributes("sample.dna", organizations = TRUE)
Run the code above in your browser using DataLab