spell check

Author: s-fleck

.Rbuildignore

@@ -4,3 +4,5 @@
 ^README\.Rmd$
 ^_pkgdown\.yml$
 ^docs$
+^cran-comments\.md$
+^CRAN-RELEASE$

R/date_xx.R

@@ -83,7 +83,7 @@ is_date_xx <- function(x){
 #' @param x A [date_xx] object
 #' @param ... passed on to [format.date_yq()] or [format.date_ym()]
 #'
-#' @return `x` (invislby)
+#' @return `x` (invisibly)
 #' @export
 #'
 print.date_xx <- function(
@@ -102,12 +102,13 @@ print.date_xx <- function(
 
 #' Coerce dint Objects to Base R Date Types
 #'
-#' All `dint` objects can be coerced to base R Date or Datetime (`POSIXct`)
+#' All \pkg{dint} objects can be coerced to base R Date or Datetime (`POSIXct`)
 #' types. The resulting date will always default to the first possible
 #' Date/Datetime in this period.
 #'
-#' If `lubridate` is loaded, methods for lubridate generics (such as `as_date`
-#' and `as_datetime`) are also made available by dint.
+#' If \pkg{lubridate} is loaded, methods for lubridate generics (such as
+#' [lubridate::month()] and [lubridate::year()]) are also made available by
+#' dint.
 #'
 #'
 #' @param x any \R object

R/date_y.R

@@ -1,7 +1,7 @@
 #' A Simple S3-Class for Years
 #'
 #' A simple data type for storing years. A `date_y` object is just an
-#' integer with an additional class atribute.
+#' integer with an additional class attribute.
 #'
 #' @param y year
 #'

R/date_ym.R

@@ -3,7 +3,7 @@
 #' A Simple S3-Class for Year-Month Dates
 #'
 #' A simple data type for storing year-month dates in a human readable integer
-#' format, e.g.: December 2012 is stored as 201212. Supports simple arithmethics
+#' format, e.g.: December 2012 is stored as 201212. Supports simple arithmetics
 #' (`+` and `-`) as well formatting.
 #'
 #' @param y year
@@ -267,7 +267,7 @@ seq.date_ym <- function(x, y, ...){
 
 # shortcuts ---------------------------------------------------------------
 
-#' Direclty Create Formatted Year-Month Strings
+#' Directly Create Formatted Year-Month Strings
 #'
 #' @param x,m Two integer (vectors). `m` is optional and the interpretation of
 #'   `x` will depend on whether `m` is supplied or not:

R/date_yq.R

@@ -3,7 +3,7 @@
 #' A Simple S3-Class for Year-Quarter Dates
 #'
 #' A simple data type for storing year-quarter dates in a human readable integer
-#' format, e.g.: 3.Qurter of 2012 is stored as 20123. Supports simple arithmethics
+#' format, e.g.: 3.Quarter of 2012 is stored as 20123. Supports simple arithmetics
 #' (`+` and `-`) as well formatting.
 #'
 #' @param y year
@@ -200,12 +200,12 @@ format_date_yq_shorter <- function(x){
 
 #' Date Arithmetic Operations
 #'
-#' Currently only `+` and `-` are supported, all other basic arithmethic
+#' Currently only `+` and `-` are supported, all other basic arithmetic
 #' operations are disabled for date_yq objects.
 #'
 #' @param x a [`date_yq`] or [`date_ym`] object
 #' @param y an integer
-#' @param ... currently ingored.
+#' @param ... currently ignored
 #'
 #' @rdname date_xx_arithmetic
 #' @aliases date_yq_arithmetic
@@ -284,7 +284,7 @@ seq.date_yq <- function(x, y, ...){
 
 # shortcuts ---------------------------------------------------------------
 
-#' Direclty Create Formatted Year-Quarter Strings
+#' Directly Create Formatted Year-Quarter Strings
 #'
 #' @param x,q Two integer (vectors). `q` is optional and the interpretation of
 #'   `x` will depend on whether `q` is supplied or not:

R/first_day_of_year.R

@@ -1,7 +1,7 @@
 #' Get First or Last Day of a Year
 #'
 #' `first_day_y()` is equivalent with `first_day_of_year()` and only included
-#' for summetry with [first_day_yq()] and [first_day_ym()].
+#' for symmetry with [first_day_yq()] and [first_day_ym()].
 #'
 #'
 #' @inheritParams format_ym

R/get_year.R

@@ -2,7 +2,7 @@
 #'
 #'
 #' @details
-#' If you use lubridate in addition to dint,
+#' If you use \pkg{lubridate} in addition to dint,
 #' you can also use [lubridate::year()], [lubridate::month()] and
 #' [lubridate::quarter()] with dint objects.
 #'

tests/testthat/test_date_yq.R

@@ -64,7 +64,7 @@ test_that("format.date_yq works as expected", {
 })
 
 
-test_that("as_date_yq arithmethics works", {
+test_that("as_date_yq arithmetics works", {
   #* @testing increment.date_yq
   tdat <- (as_date_yq(c(-11, -12, -13, -14, 1, 2, 3, 4)))