Displaying 3 results from an estimated 3 matches for "rep_genes".
2017 Aug 23
0
splitting a dataframe in R based on multiple gene names in a specific column
...onic AP1S3
626 chr3 99794575 99794575 G A exonic COL8A1
643 chr3 132601066 132601066 A G exonic ACKR4
655 chr3 132601999 132601999 A G exonic BCDF5,CDFG6",
header=TRUE,stringsAsFactors=FALSE)
multgenes<-grep(",",df.sample.gene$Gene.refGene)
rep_genes<-strsplit(df.sample.gene$Gene.refGene[multgenes],",")
ngenes<-unlist(lapply(rep_genes,length))
dup_row<-function(x) {
newrows<-x
lastcol<-dim(x)[2]
rep_genes<-unlist(strsplit(x[,lastcol],","))
for(i in 2:length(rep_genes)) newrows<-rbind(newrows,x)
newr...
2017 Aug 22
2
splitting a dataframe in R based on multiple gene names in a specific column
I would appreciate please a suggestion on how to do the following :
i'm working with a dataframe in R that contains in a specific column
multiple gene names, eg :
> df.sample.gene[15:20,2:8]
Chr Start End Ref Alt Func.refGene
Gene.refGene284 chr2 16080996 16080996 C T ncRNA_exonic
GACAT3448 chr2 113979920 113979920 C T ncRNA_exonic
LINC01191,LOC100499194465
2017 Aug 25
1
splitting a dataframe in R based on multiple gene names in a specific column
...94575 99794575 G A exonic COL8A1
> 643 chr3 132601066 132601066 A G exonic ACKR4
> 655 chr3 132601999 132601999 A G exonic BCDF5,CDFG6",
> header=TRUE,stringsAsFactors=FALSE)
>
> multgenes<-grep(",",df.sample.gene$Gene.refGene)
> rep_genes<-strsplit(df.sample.gene$Gene.refGene[multgenes],",")
> ngenes<-unlist(lapply(rep_genes,length))
> dup_row<-function(x) {
> newrows<-x
> lastcol<-dim(x)[2]
> rep_genes<-unlist(strsplit(x[,lastcol],","))
> for(i in 2:length(rep_genes)) newrows&...