clean up which functions are exported

Author: KarinSchork

R/ANOVA.R

@@ -103,7 +103,6 @@ ANOVA <- function(D,
 #' @param min_perc_per_group Numeric indicating the minimum ratio of observations per group.
 #'
 #' @return Vector with p-values and fold changes.
-#' @export
 #'
 #' @examples # TODO
 ANOVA_standard_single_row <- function(x,
@@ -233,7 +232,6 @@ ANOVA_standard_single_row <- function(x,
 #' @param min_perc_per_group Numeric indicating the minimum ratio of observations per group.
 #'
 #' @return Vector with p-values and fold changes.
-#' @export
 #'
 #' @examples # TODO
 ANOVA_repeatedMeasurements_single_row <- function(x,
@@ -368,7 +366,6 @@ ANOVA_repeatedMeasurements_single_row <- function(x,
 #' @param min_perc_per_group Numeric indicating the minimum ratio of observations per group.
 #'
 #' @return Vector with p-values and fold changes.
-#' @export
 #'
 #' @examples # TODO
 ANOVA_Welch_single_row <- function(x,

R/MA_Plot.R

@@ -15,8 +15,7 @@
 #' @param ...                     Additional arguments for affy::ma.plot.
 #'
 #' @return Generates the MA plot for two samples.
-#' @export
-#' 
+#'
 #' @seealso [MA_Plots()]
 #'
 #' @examples
@@ -94,10 +93,10 @@ MA_Plot_single <- function(sample_1, sample_2,
 #' @param sampling                \strong{numeric} \cr
 #'                                The sampling rate. Useful to sample part of the data set for data sets on peptide/feature level with many data points.
 #' @param ...                     Additional arguments for affy::ma.plot.
-#' 
+#'
 #' @return A pdf file containing the MA plots for all sample combinations.
 #' @export
-#' 
+#'
 #' @seealso [MA_Plot_single()]
 #'
 #' @examples

R/helper_ttest.R renamed to R/helpers_ttest_ANOVA.R

@@ -23,12 +23,11 @@
 #'                                  If \code{TRUE}, the variances of the groups are expected to be equal.
 #'
 #' @return A vector with the following components: mean group 1, mean group 2, test statistics, p-value, free space fpr corrected p-value, fold changes (both directions), lower and upper limit of confidence interval, number of valid values per group.
-#' @export
-#' 
+#'
 #' @seealso [ttest()], [ttest_single_row_paired()]
 #'
-#' @examples 
-#' 
+#' @examples
+#'
 
 ttest_single_row <- function(x, group, log_before_test = TRUE, delog_for_FC = TRUE,
                              min_obs_per_group = NULL, min_obs_per_group_ratio = NULL,
@@ -142,12 +141,11 @@ ttest_single_row <- function(x, group, log_before_test = TRUE, delog_for_FC = TR
 #'                                  The row number of the data for the function call.
 #'
 #' @return A vector with the following components: mean difference between groups, test statistics, p-value, free space fpr corrected p-value, fold changes (both directions), lower and upper limit of confidence interval, number of valid values per group.
-#' @export
-#' 
+#'
 #' @seealso [ttest()], [ttest_single_row()]
 #'
-#' @examples 
-#' 
+#' @examples
+#'
 
 ttest_single_row_paired <- function(x, group, sample, log_before_test = TRUE, delog_for_FC = TRUE,
                              min_nr_pairs = NULL,
@@ -267,11 +265,11 @@ ttest_single_row_paired <- function(x, group, sample, log_before_test = TRUE, de
 #'
 #' @return A data frame containing the results of the t-test.
 #' @export
-#' 
+#'
 #' @seealso [ttest_single_row()], [ttest_single_row_paired()]
 #'
-#' @examples 
-#' 
+#' @examples
+#'
 
 ttest <- function(D, id = NULL, group, sample = NULL, paired = FALSE, var.equal = FALSE,
                   log_before_test = TRUE, delog_for_FC = TRUE, log_base = 2,