CSL URL Checking and Citation Example

In gaawr2: Genetic Association Analysis

source(system.file("csl","url.R",package="gaawr2"))
csl_file_path <- "nature-genetics.csl"
csl_file_path <- system.file("csl",csl_file_path,package="gaawr2")

cat("CSL File Content (Raw):\n")
cat(paste(readLines(csl_file_path), collapse = "\n"))

cat("\nExtracted Links from CSL File:\n")
csl_doc <- check_csl_urls(csl_file_path)
hrefs <- xpathSApply(csl_doc, "//csl:link", xmlGetAttr, "href", namespaces = namespace)
print(hrefs)

Would this work @malone10?

References

gaawr2 documentation built on April 4, 2025, 2:25 a.m.