R/datasets.R

In countfitteR: Comprehensive Automatized Evaluation of Distribution Models for Count Data

#' @name sim_dat
#' @title Data created from simulation of NB Poiss
#' @docType data
#' @usage sim_dat
#' @keywords datasets
#' @examples 
#' # code used to generate the data
#' # be warned: the simulations will take some time
#' \dontrun{
#' library(dplyr)
#' set.seed(15390)
#' sim_dat <- do.call(rbind, lapply(10^(-3L:2), function(single_theta)
#'   do.call(rbind, lapply(1L:10/2, function(single_lambda) 
#'     do.call(rbind, lapply(1L:100, function(single_rep) {
#'       
#'       foci <- lapply(1L:10, function(dummy) rnbinom(600, size = single_theta, mu = single_lambda))
#'       names(foci) <- paste0("C", 1L:10)
#'       
#'       fit_counts(foci, separate = TRUE, model = "all") %>%
#'         summary_fitlist %>% 
#'         mutate(between = single_lambda < upper & single_lambda > lower) %>%
#'         group_by(model) %>% 
#'         summarize(prop = mean(between)) %>%
#'         mutate(replicate = single_rep, lambda = single_lambda, theta = single_theta)
#'     }))
#'   ))
#' ))
#' }
NULL

#' @name case_study_APC
#' @title Case study for APC dye
#' @description example data extracted from Aklides system. Counts with only APC fluorescent dye were merged.
#' @docType data
#' @usage case_study_APC
#' @keywords datasets
NULL

#' @name case_study_FITC
#' @title Case study for FITC dye
#' @description example data extracted from Aklides system. Counts with only FITC fluorescent dye were merged.
#' @docType data
#' @usage case_study_FITC
#' @keywords datasets
NULL

#' @name case_study
#' @title Short version of the \code{case_study_FITC}
#' @description shorter version of the \code{case_study_FITC}. Used as an example in shiny app, 
#' when the user will not load his own count data.
#' @docType data
#' @usage case_study
#' @keywords datasets
NULL

#' @name case_study_all
#' @title Case study with two fluorescent dyes
#' @description example data extracted from Aklides system and merged into one file. Counts in this file will not fit properly, 
#' due to the fact that we integrated into the file counts with two different fluorescent dyes used. 
#' @docType data
#' @usage case_study_all
#' @keywords datasets
NULL