filepath,peakPantheRAnnotation-method {peakPantheR} | R Documentation

## filepath accessor

### Description

filepath accessor

### Usage

    ## S4 method for signature 'peakPantheRAnnotation'
    filepath(object)

### Arguments

`object` | peakPantheRAnnotation

### Value

(str) A character vector of file paths, of length number of spectra files

### Examples

    if(requireNamespace('faahKO')){
    ## Initialise a peakPantheRAnnotation object with 3 samples and 2 targeted
    ## compounds

    # Paths to spectra files
    library(faahKO)
    spectraPaths <- c(system.file('cdf/KO/ko15.CDF', package = 'faahKO'),
                        system.file('cdf/KO/ko16.CDF', package = 'faahKO'),
                        system.file('cdf/KO/ko18.CDF', package = 'faahKO'))

    # targetFeatTable
    targetFeatTable <- data.frame(matrix(vector(), 2, 8, dimnames=list(c(),
                    c('cpdID', 'cpdName', 'rtMin', 'rt', 'rtMax', 'mzMin', 'mz',
                    'mzMax'))), stringsAsFactors=FALSE)
    targetFeatTable[1,] <- c('ID-1', 'Cpd 1', 3310., 3344.888, 3390., 522.194778,
                            522.2, 522.205222)
    targetFeatTable[2,] <- c('ID-2', 'Cpd 2', 3280., 3385.577, 3440., 496.195038,
                            496.2, 496.204962)
    targetFeatTable[,c(3:8)] <- vapply(targetFeatTable[,c(3:8)], as.numeric,
                                        FUN.VALUE=numeric(2))

    annotation <- peakPantheRAnnotation(spectraPaths=spectraPaths,
                                        targetFeatTable=targetFeatTable)
    filepath(annotation)
    # [1] 'C:/R/R-3.6.0/library/faahKO/cdf/KO/ko15.CDF'
    # [2] 'C:/R/R-3.6.0/library/faahKO/cdf/KO/ko16.CDF'
    # [3] 'C:/R/R-3.6.0/library/faahKO/cdf/KO/ko18.CDF'
    }

[Package peakPantheR version 1.0.0 Index]