## Not run:
# #gs is a GatingSet
# gs_norm <- normalize(gs
# , target = "M+T panel_903997-25.fcs"
# , populations = "cd27gate"
# , dims = "<Violet A 610/20-A>"
# , minCountThreshold = 100
# , nPeaks = list('cd27gate' = 2)
# , chunksize = 10
# , bwFac = 2
# )
#
#
#
# #show the population statistics for before and after normalization
# getPopStats(gs)
# getPopStats(gs_norm)
#
# #plot the gate to see the effects of normalization
# grid.arrange(
# plotGate(gs, "cd27gate", type = "densityplot", stack = T)
# ,plotGate(gs_norm, "cd27gate", type = "densityplot", stack = T)
# )
# ## End(Not run)
Run the code above in your browser using DataLab