Skip to main content
. Author manuscript; available in PMC: 2011 Dec 2.
Published in final edited form as: Nat Protoc. 2011 Jun 2;6(6):870–895. doi: 10.1038/nprot.2011.328 
> Lymph = Seg.mLymphR1$output
 
# Extract domain information
 
> Lymph$size = Lymph$loc.end - Lymph$loc.start
 
# Calculate domain sizes
 
> LymphEarly = subset(Lymph, Lymph$seg.mean > 0)
 
# Create subset of early domains
 
> LymphLate = subset(Lymph, Lymph$seg.mean < 0) 
# Create subset of late domains
 
> boxplot(LymphEarly$size, LymphLate$size)
 
# Distribution of early/late domain sizes