Added citation

muschellij2 · May 24, 2018 · 989ff38 · 989ff38
1 parent e88511a
commit 989ff38
Show file tree

Hide file tree

Showing 3 changed files with 17 additions and 1 deletion.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -2,7 +2,7 @@ Package: fslr
 Type: Package
 Title: Wrapper Functions for FSL ('FMRIB' Software Library) from Functional MRI
     of the Brain ('FMRIB')
-Version: 2.20.0
+Version: 2.20.1
 Authors@R: c(person(given = "John",
            family = "Muschelli",
            email = "muschellij2@gmail.com",

diff --git a/NAMESPACE b/NAMESPACE
@@ -252,6 +252,7 @@ import(methods)
 import(neurobase)
 import(oro.nifti)
 importFrom(utils,browseURL)
+importFrom(utils,citation)
 importFrom(utils,compareVersion)
 importFrom(utils,download.file)
 importMethodsFrom(oro.nifti,pixdim)
diff --git a/R/zzz.R b/R/zzz.R
@@ -0,0 +1,15 @@
+#' @importFrom utils citation
+.onAttach <- function(...) {
+  if (!interactive()) return()
+
+  package_name = "fslr"
+  x = citation(package_name)
+  x = format(x, "text")
+  x = paste(x, collapse = "\n\n")
+  ack <- c(
+    paste0("Please cite the ", package_name, 
+           " package using:\n"),
+    x)
+
+  packageStartupMessage(paste(strwrap(ack), collapse = "\n"))
+}