This would be a bit simpler if 'gene' were the rownames of the data.frame.
The '-4' is to remove the gene column from the calculations.
> x[ x[,"gene"]=="gene2",]
TTT TTA ATA gene
2 1 1 0 gene2
> colnames(x)[-4][ 1 == x[ x[,"gene"]=="gene2",-4] ]
[1] "TTT" "TTA"
> colnames(x)[-4][ 1 == x[ x[,"gene"]=="gene3",-4] ]
[1] "TTA"
> x
TTT TTA ATA gene
1 0 0 1 gene1
2 1 1 0 gene2
3 0 1 0 gene3
4 0 0 0 gene4
Bill Dunlap
TIBCO Software
wdunlap tibco.com
On Thu, Nov 1, 2018 at 5:45 PM, Bogdan Tanasa <tan...@gmail.com> wrote:
> Dear all, please may I ask for a suggestion :
>
> considering a dataframe that contains the numerical values for gene
> expression, for example :
>
> x = data.frame(TTT=c(0,1,0,0),
> TTA=c(0,1,1,0),
> ATA=c(1,0,0,0),
> gene=c("gene1", "gene2", "gene3", "gene4"))
>
> how could I select only the COLUMNS where the value of a GENE (a ROW) is
> non-zero ?
>
> thank you !
>
> -- bogdan
>
> [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/
> posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
