Address comments

R/clean_names.R

@@ -9,7 +9,7 @@
 #' "n".
 #'
 #' This function takes and returns a data.frame, for ease of piping with
-#' ``\%>\%``. For the underlying function that works on a character vector
+#' `%>%`. For the underlying function that works on a character vector
 #' of names, see [janitor::make_clean_names()].  `clean_names`
 #' relies on the versatile function [snakecase::to_any_case()], which
 #' accepts many arguments.  See that function's documentation for ideas on getting

R/statistical_tests.R

@@ -119,18 +119,17 @@ chisq.test.tabyl <- function(x, tabyl_results = TRUE, ...) {
 
 
 
-#' Apply stats::fisher.test to a two-way tabyl
+#' Apply `stats::fisher.test()` to a two-way tabyl
 #'
-#' @description
-#' This generic function overrides stats::fisher.test. If the passed table
-#' is a two-way tabyl, it runs it through janitor::fisher.test.tabyl, otherwise
-#' it just calls stats::fisher.test.
+#' This generic function overrides [stats::fisher.test()]. If the passed table
+#' is a two-way tabyl, it runs it through `janitor::fisher.test.tabyl`, otherwise
+#' it just calls `stats::fisher.test()`.
 #'
 #' @return
-#' The result is the same as the one of stats::fisher.test.
+#' The same as the one of `stats::fisher.test()`.
 #'
-#' @param x a two-way tabyl, a numeric vector or a factor
-#' @param ... other parameters passed to stats::fisher.test
+#' @param x A two-way tabyl, a numeric vector or a factor
+#' @param ... Parameters passed to [stats::fisher.test()]
 #'
 #' @examples
 #' tab <- tabyl(mtcars, gear, cyl)