## Not run:
# data(GvHD)
# GvHD <- transform(GvHD, "FL1-H"=asinh(`FL1-H`), "FL2-H"=asinh(`FL2-H`))
# dest <- tempdir()
# qp1 <- qaProcess.timeline(GvHD, channel="FL1-H", outdir=dest, cutoff=1)
# qp2 <- qaProcess.marginevents(GvHD, channels=c("FL1-H", "FL2-H"),
# outdir=dest, cFactor=4)
# url <- writeQAReport(GvHD, processes=list(qp1, qp2), outdir=dest,
# grouping="Patient")
# browseURL(url)
# ## End(Not run)
Run the code above in your browser using DataCamp Workspace