英文:
How to sort the Rows with identical column values in R
问题
我的数据框看起来像这样：
dput(Data)structure(c(NA, "FGFR3", "FAT1", "ARID1A", "CREBBP", "HRAS","SF3B1", "RHOB", "FBXW7", "KRAS", "TP53", "PIK3CA", "RHOA", "ASXL2","HLA-A", "APC", "ATM", "ARID2", "PTEN", "CDM1", "RBM10", "ERBB4","ERCC2", "BAP1", "KMT2D", "ERBB2", "SMC1A", "RB1", "BCLAF1",NA, NA, NA, NA, NA, NA, NA, "TP53", "RHOA", "FGFR3", "SF3B1","PTEN", "RB1", "FAT1", "KDM6A", "ARID1A", "PIK3CA", "CDKN1A","ERBB4", "RBM10", "ASXL2", "HRAS", "BAP1", "KMT2A", "ERBB3","RHOB", "KRAS", "APC", "KMT2C", "BCLAF1", "KMT2D", "CDKN2A","PSIP1", "FBXW7", "HLA-A", "ERBB2", "ATM", "RXRA", "CREBBP","EP300", "ARID2", "KDM6A", "CDKN1A", "KMT2A", "ERBB3", "KMT2C","CDKN2A", "PSIP1", "RXRA", "EP300", NA, NA, NA, NA, NA, NA, NA,NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,NA, NA), dim = c(35L, 3L), dimnames = list(NULL, c("F_d", "M_d", "unique")))
我想按照这样的方式对这些数据进行排序或排序，如果某一列的值在两列或三列之间是相同的，它应该在同一行中。
我的输出应该是：
F_d M_d Unique1 TP53 TP53 NA2 NA CDKN1A CDKN1A
英文:
My df looks like
dput(Data)structure(c(NA, "FGFR3", "FAT1", "ARID1A", "CREBBP", "HRAS","SF3B1", "RHOB", "FBXW7", "KRAS", "TP53", "PIK3CA", "RHOA", "ASXL2","HLA-A", "APC", "ATM", "ARID2", "PTEN", "CDH1", "RBM10", "ERBB4","ERCC2", "BAP1", "KMT2D", "ERBB2", "SMC1A", "RB1", "BCLAF1",NA, NA, NA, NA, NA, NA, NA, "TP53", "RHOA", "FGFR3", "SF3B1","PTEN", "RB1", "FAT1", "KDM6A", "ARID1A", "PIK3CA", "CDKN1A","ERBB4", "RBM10", "ASXL2", "HRAS", "BAP1", "KMT2A", "ERBB3","RHOB", "KRAS", "APC", "KMT2C", "BCLAF1", "KMT2D", "CDKN2A","PSIP1", "FBXW7", "HLA-A", "ERBB2", "ATM", "RXRA", "CREBBP","EP300", "ARID2", "KDM6A", "CDKN1A", "KMT2A", "ERBB3", "KMT2C","CDKN2A", "PSIP1", "RXRA", "EP300", NA, NA, NA, NA, NA, NA, NA,NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,NA, NA, NA), dim = c(35L, 3L), dimnames = list(NULL, c("F_d","M_d", "unique")))
I want to sort or order this data in a way that if a column value is common between two or three column it should be in same row.
Like my output should me
F_d M_d UniqueTP53 TP53 NANA CDKN1A CDKN1A
答案1
得分: 1
通过创建一个包含所有可能出现的列，你可以解决你的问题。
library(dplyr)df = as.data.frame(df)list_tot = data.frame(x=unlist(df), row.names = 1:105) %>%distinct() %>%filter(is.na(x)==FALSE)interm1 <- left_join(list_tot,df %>% select(F_d) %>% mutate(x=F_d),by="x")interm2 <- left_join(interm1,df %>% select(M_d) %>% mutate(x=M_d),by="x")df2 <- left_join(interm2,df %>% select(unique) %>% mutate(x=unique),by="x") %>%select(-x)
解释这段代码，list_tot 将基于表中的所有项创建一个唯一的列表。然后通过 left_join 查看这些项是否在不同的列中（每个列都需要一个 left_join）。df2 应该看起来像你需要的样子！
希望这对你有帮助！
英文:
By creating a column with all the possible occurences, you can solve your problem
library(dplyr)df = as.data.frame(df)list_tot = data.frame(x=unlist(df), row.names = 1:105) %>%distinct() %>%filter(is.na(x)==FALSE)interm1 <- left_join(list_tot,df %>% select(F_d) %>% mutate(x=F_d),by="x")interm2 <- left_join(interm1,df %>% select(M_d) %>% mutate(x=M_d),by="x")df2 <- left_join(interm2,df %>% select(unique) %>% mutate(x=unique),by="x") %>% select(-x)
To explain the code, list_tot will create a unique list based on all the items in your table. Then the left_join to see if those items are in the different columns (one left_join by column needed)
df2 should look like what you need!
Hope this will help you
通过集体智慧和协作来改善编程学习和解决问题的方式。致力于成为全球开发者共同参与的知识库，让每个人都能够通过互相帮助和分享经验来进步。
评论