guess_sep {autonomics}

R Documentation

Guess separator

Description

Guess separator

Usage

guess_sep(x, ...)

## S3 method for class 'character'
guess_sep(x, separators = c(".", "_"), verbose = FALSE, ...)

## S3 method for class 'factor'
guess_sep(x, ...)

## S3 method for class 'SummarizedExperiment'
guess_sep(x, var = "sample_id", separators = c(".", "_"), verbose = FALSE, ...)

Arguments

x	character vector or SummarizedExperiment
...	used for proper S3 method dispatch
separators	character vector: possible separators to look for
verbose	TRUE or FALSE
var	svar or fvar

Value

separator (string) or NULL (if no separator could be identified)

Examples

# charactervector
   x <- c('PERM_NON.R1[H/L]', 'PERM_NON.R2[H/L]', 'PERM_NON.R3[H/L]')
   guess_sep(x)

   x <- c('WT untreated 1', 'WT untreated 2', 'WT treated 1')
   guess_sep(x)

   x <- c('group1', 'group2', 'group3.R1')
   guess_sep(x)

# SummarizedExperiment
   # file <- download_data('halama18.metabolon.xlsx')
   # object <- read_metabolon(file, plot=FALSE)
   # guess_sep(object)

   # file <- download_data('billing16.proteingroups.txt')
   # object <- read_proteingroups(file, plot=FALSE)
   # guess_sep(object)

---