# flagged outliers
# create a single sample outlier (12)
out_adat <- example_data
apts <- getAnalytes(out_adat)
out_adat[12, apts] <- out_adat[12, apts] * 10
om <- calcOutlierMap(out_adat)
getOutlierIds(om, out_adat, flags = 0.05, include = c("Sex", "Subarray"))
Run the code above in your browser using DataLab