## Defining bam file, bed file and fasta file names and paths
if (interactive()){
bamFile<-system.file("extdata", "mybam.bam", package="TarSeqQC",
mustWork=TRUE)
bedFile<-system.file("extdata", "mybed.bed", package="TarSeqQC",
mustWork=TRUE)
fastaFile<-system.file("extdata", "myfasta.fa", package="TarSeqQC",
mustWork=TRUE)
## Creating a TargetExperiment object
## Defining feature parameter
feature<-"amplicon"
## Defining attribute parameter
attribute<-"coverage"
##Calling the constructor
ampliPanel<-TargetExperiment(bedFile, bamFile, fastaFile,
attribute=attribute, feature=feature)
}
Run the code above in your browser using DataLab