lists<-list(Method1=c("Gene_A", "Gene_V","Gene_S","Gene_C","Gene_U","Gene_D","Gene_E","Gene_G","Gene_W"),
Method2=c("Gene_D","Gene_W","Gene_G","Gene_E","Gene_H","Gene_X"),
Method3=c("Gene_L","Gene_K","Gene_J","Gene_M","Gene_V","Gene_T","Gene_R","Gene_U"))
genes<-c("Gene_A", "Gene_V", "Gene_S", "Gene_C", "Gene_U", "Gene_D", "Gene_E", "Gene_G",
"Gene_W", "Gene_H", "Gene_X", "Gene_L", "Gene_K", "Gene_J", "Gene_M", "Gene_T",
"Gene_R")
PM<-probs.to.matrix(lists,genes)
PM
Run the code above in your browser using DataLab