if (require(geuvStore2)) {
store = makeGeuvStore2()
ebp = extractByProbes(store, c("ENSG00000183814.10", "ENSG00000174827.9"))
ebp
rr = range(ebp)
ebr = extractByRanges(store, rr)
ebr
s2p = structure(c("ENSG00000183814.10", "ENSG00000163207.5", "ENSG00000228449.1",
"ENSG00000137962.8", "ENSG00000232848.1", "ENSG00000227280.1",
"ENSG00000238081.1", "ENSG00000117480.10", "ENSG00000253368.2",
"ENSG00000174827.9"), .Names = c("LIN9", "IVL", "RP11-177A2.4",
"ARHGAP29", "CTA-215D11.4", "RP11-458D21.2", "RP4-620F22.3",
"FAAH", "TRNP1", "PDZK1"))
ss = extractBySymbols(store, c("IVL", "FAAH", "PDZK1"), s2p)
ss
}
Run the code above in your browser using DataLab