Merge pull request #5 from amanyiraho/better-readme

spelling
amanyiraho · Feb 9, 2023 · ada9c24 · ada9c24
2 parents 1eedc7c + ec26a1d
commit ada9c24
Show file tree

Hide file tree

Showing 6 changed files with 8 additions and 8 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -5,7 +5,7 @@ Authors@R: c(
     person("Robinson", "Amanyiraho", , "amanyiraho@gmail.com", role = c("cre", "aut",  "cph"),
            comment = c(ORCID = "0000-0002-7747-1367"))
   )
-Description: Connet and pull data from a 'DHIS2 (District Health Information Software 2)' instance into R.
+Description: Connect and pull data from a 'DHIS2 (District Health Information Software 2)' instance into R.
 License: MIT + file LICENSE
 URL: https://github.com/amanyiraho/dhis2r
 BugReports: https://github.com/amanyiraho/dhis2r/issues

diff --git a/R/connect.R b/R/connect.R
@@ -1,4 +1,4 @@
-#' Connect and pull/get data from a Dhis2 instance
+#' Connect and pull/get data from a DHIS2 instance
 #' @format An R6 class called Dhis2r.
 #' @description
 #' To create a DHIS2 connection, you need a DHIS2 base URL, username, password, and an API version
@@ -11,7 +11,7 @@
 #'
 #' @examples
 #' \dontrun{
-#' # connect to the dhis2 instance
+#' # connect to the DHIS2 instance
 #' dhis2_play_connection <- Dhis2r$new(base_url = "https://play.dhis2.org/",
 #'  username = "admin",  password = "district",api_version = "2.39.0.1")
 #'

diff --git a/R/get_metadata.R b/R/get_metadata.R
@@ -13,7 +13,7 @@
 #' #'
 #' #' @examples
 #' #' \dontrun{
-#' #' # connect to the dhis2 instance
+#' #' # connect to the DHIS2 instance
 #' #' dhis2_play_connection <- Dhis2r$new(base_url = "https://play.dhis2.org/", username = "admin",  password = "district",api_version = "2.39.0.1", api_version_position = "before")
 #' #'
 #' #' # get all the available resources

diff --git a/man/Dhis2r.Rd b/man/Dhis2r.Rd
diff --git a/man/dhis2r-package.Rd b/man/dhis2r-package.Rd
diff --git a/tests/testthat/test-connect.R b/tests/testthat/test-connect.R
@@ -37,7 +37,7 @@ test_that("Type of result of possible fields is a character vector", {
 
 test_that('Analytics dataframe returned has columns "analytic", "org_unit", "period", "value" are return', {
 
-  expect_equal(names(dhis2_play_connection$get_analytics(analytic = c("FnYCr2EAzWS"),
+  expect_equal(names(dhis2_play_connection$get_analytics(analytic = c("s46m5MS0hxu"),
                                                    org_unit =   c("O6uvpzGd5pu", "fdc6uOvgoji"),
                                                    period = "LAST_12_MONTHS",
                                                    output_scheme = "NAME")), c("analytic", "org_unit", "period", "value"))