Description Usage Arguments Details Value Author(s) Examples
View source: R/Positionincoding.R
For those variations labeled with "Coding", positionincoding() function computes the position of variation in the coding sequence of each transcript.
1 2 | Positionincoding(Vars, exon, dbsnp = NULL, COSMIC = NULL,
...)
|
Vars |
a GRanges object of variations |
exon |
a dataframe of exon annotations for protein coding transcripts. |
dbsnp |
provide a GRanges object of known dbsnp information to include dbsnp evidence into the output table, default is NULL. |
COSMIC |
provide a GRanges object of known COSMIC information to include COSMIC evidence into the output table, default is NULL. |
... |
additional arguments |
this function prepares input data frame for aaVariation().
a data frame containing the position in coding sequence for each variation
Xiaojing Wang
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | vcffile <- system.file("extdata/vcfs", "test1.vcf", package="customProDB")
vcf <- InputVcf(vcffile)
table(values(vcf[[1]])[['INDEL']])
index <- which(values(vcf[[1]])[['INDEL']] == TRUE)
indelvcf <- vcf[[1]][index]
index <- which(values(vcf[[1]])[['INDEL']] == FALSE)
SNVvcf <- vcf[[1]][index]
load(system.file("extdata/refseq", "exon_anno.RData",
package="customProDB"))
load(system.file("extdata/refseq", "dbsnpinCoding.RData",
package="customProDB"))
load(system.file("extdata/refseq", "procodingseq.RData",
package="customProDB"))
load(system.file("extdata/refseq", "cosmic.RData",
package="customProDB"))
postable_snv <- Positionincoding(SNVvcf, exon, dbsnpinCoding, COSMIC=cosmic)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.