comparison roi_metrics.Rscript @ 1:0ac4f6f3d984 draft

Uploaded
author holtgrewe
date Mon, 06 May 2013 12:34:43 -0400
parents 61d9bdb6d519
children
comparison
equal deleted inserted replaced
0:61d9bdb6d519 1:0ac4f6f3d984
47 47
48 # ---------------------------------------------------------------------------- 48 # ----------------------------------------------------------------------------
49 # Compute metrics. 49 # Compute metrics.
50 # ---------------------------------------------------------------------------- 50 # ----------------------------------------------------------------------------
51 51
52 # Read input files.x 52 # Read input files.
53 roi = readROI(opt$infile) 53 roi = readROI(opt$infile)
54 54
55 # Compute some basic statistics. 55 # Compute some basic statistics.
56 roi$min = as.numeric(lapply(roi$counts, min)) 56 roi$min = as.numeric(lapply(roi$counts, min))
57 roi$median = as.numeric(lapply(roi$counts, median)) 57 roi$median = as.numeric(lapply(roi$counts, median))