对象
gene_signatures <- list(
TRN = c("AG04", "ARG1", "CCR3", "CCRL2", "CYP4F3", "DDIT3", "ERGIC1", "FLOT1...",
"FLOT2", "FRAT2", "HIF1A", "IRAK2", "LRP10", "MAFF", "MAP1LC3B2",
"MCOLN1",...", "TOM1", "TSEN34", "UBR5-AS1", "XKR8", "ZNF267"),
NAN = c("AG04", "ARG1", "CYP4F3", "ERGIC1", "FLOT2..."RASGRP4", "REPS2", "SULT1B1", "TSEN34", "XKR8"),
TAN = c("CCR3", "CCRL2", "DDIT3", "FLOT1