import keywords as data #106

.Rbuildignore

@@ -11,3 +11,4 @@
 ^CODE_OF_CONDUCT.md$
 ^cran-comments\.md$
 ^CRAN-SUBMISSION$
+^data-raw$

DESCRIPTION

@@ -64,3 +64,6 @@ VignetteBuilder: knitr
 URL: https://github.com/rjournal/rjtools
 BugReports: https://github.com/rjournal/rjtools/issues
 Config/testthat/edition: 3
+Depends: 
+    R (>= 2.10)
+LazyData: true

R/keywords.R

@@ -0,0 +1,7 @@
+#' Keywords options for R Journal
+#'
+#' Available keywords options for R Journal articles
+#'
+#' @format
+#' A vector of length 41
+"keywords"

R/prep-submission.R

@@ -74,3 +74,4 @@ prep_submission <- function(){
   cli::cli_alert_info("Article title: {.field {title}}")
   invisible(res)
 }
+

data-raw/keywords.R

@@ -0,0 +1,46 @@
+## code to prepare `keywords` dataset goes here
+keywords <- c(
+  "Bayesian Inference",
+  "Chemometrics and Computational Physics",
+  "Clinical Trial Design Monitoring and Analysis",
+  "Cluster Analysis & Finite Mixture Models",
+  "Databases with R",
+  "Differential Equations",
+  "Distributions",
+  "Econometrics",
+  "Ecological and Environmental analysis",
+  "Design and Analysis of Experiments (DoE)",
+  "Extreme Value Analysis",
+  "Empirical Finance",
+  "Functional Data Analysis",
+  "Statistical Genetics",
+  "Graphical Models",
+  "Graphics and Visualisation",
+  "High-Performance Computing",
+  "Hydrological Data and Modeling",
+  "Machine Learning & Statistical Learning",
+  "Medical Image Analysis",
+  "Meta-Analysis",
+  "Missing Data",
+  "Model Deployment",
+  "Multivariate Statistics",
+  "Natural Language Processing",
+  "Numerical Mathematics",
+  "Official Statistics & Survey Methodology",
+  "Optimization and Mathematical Programming",
+  "Pharmacokinetic Analysis",
+  "Phylogenetics",
+  "Psychometric Models and Methods",
+  "Reproducible Research",
+  "Robust Statistical Methods",
+  "Social Sciences",
+  "Spatial Analysis",
+  "Spatio-Temporal Analysis",
+  "Survival Analysis",
+  "Teaching Statistics",
+  "Time Series Analysis",
+  "Tracking Data",
+  "Web Technologies and Services"
+)
+
+usethis::use_data(keywords, overwrite = TRUE)