## Not run:
# ## The code to prepare the .Rda file file from the marker file is:
# markers = read.csv("MRK_List2.rpt",sep="\t")
# genes = markers[markers$Feature.Type=="protein coding gene",]
# listMarts(host="www.ensembl.org")
# human <- useMart(host="www.ensembl.org", "ENSEMBL_MART_ENSEMBL", dataset="hsapiens_gene_ensembl")
# mouse <- useMart(host="www.ensembl.org", "ENSEMBL_MART_ENSEMBL", dataset="mmusculus_gene_ensembl")
# mouse_to_human_homologs = getLDS(attributes = c("mgi_symbol","entrezgene","ensembl_gene_id"),
# filters = "mgi_symbol", values = genes$Marker.Symbol,
# mart = mouse,
# attributesL = c("hgnc_symbol","ensembl_gene_id","entrezgene"), martL = human)
# save(mouse_to_human_homologs,file="mouse_to_human_homologs.Rda")
# ## End(Not run)
Run the code above in your browser using DataLab