Skip to content

Precursor Counts #1223

Answered by vdemichev
abadgerw asked this question in Q&A
Oct 22, 2024 · 1 comments · 6 replies
Discussion options

You must be logged in to vote

Something like this will work:

library(arrow)
df <- read_parquet('report.parquet')
df <- df[df$Proteotypic == 1 & df$Global.Q.Value <= 0.01,]
df <- df[!duplicated(paste0(df$Genes,df$Stripped.Sequence)),]
t <- table(df$Genes)

mat <- read_tsv_arrow('report.unique_genes_matrix.tsv')
mat<-cbind(t[match(mat$Genes,names(t))],mat)
colnames(mat)[1] = "N.peptides"

Replies: 1 comment 6 replies

Comment options

You must be logged in to vote
6 replies
@abadgerw
Comment options

@abadgerw
Comment options

@vdemichev
Comment options

Answer selected by abadgerw
@abadgerw
Comment options

@abadgerw
Comment options

@vdemichev
Comment options

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Category
Q&A
Labels
None yet
2 participants