# NOT RUN {
data(imcdata)
myCases<-selectCases(imcdata,c("30-BM16-202_7Pre_s1_p1_r4_a4_ac","B17_350_14post_s1_p1_r5_a5_ac"))
myCases
table(colData(myCases)$ROIID)
data(imcdata)
myCases<-selectCases(imcdata,c("30-BM16-202_7Pre_s1_p1_r4_a4_ac","B17_350_14post_s1_p1_r5_a5_ac"))
myCases
table(colData(myCases)$ROIID)
# }
Run the code above in your browser using DataLab