## Custom sample description by specifying separate arguments
sample_names <- letters[1:5]
sample_desc <- create_sample_desc(
sample_names = sample_names,
cna_filepaths = file.path('cna', paste0(sample_names, '.csv')),
ge_filepaths = file.path('ge', paste0(sample_names, '.txt'))
)
sample_desc
## Prepend the file path with a root directory /path/to/sample
create_sample_desc(
sample_names = sample_desc$Sample,
cna_filepaths = sample_desc$CNA_filepath,
ge_filepaths = sample_desc$GE_filepath,
sample_root = '/path/to/sample'
)
## Create by reading a sample description CSV file
sample_desc_pth <- system.file("extdata", "sample_desc.csv", package = "iGC")
sample_desc <- create_sample_desc(sample_desc_pth)
## Read a external description and append the given file paths
create_sample_desc('/path/to/desc.csv', sample_root='/path/to/sample/root')Run the code above in your browser using DataLab