# NOT RUN {
data(immdata)
gu <- geneUsage(immdata$data[[1]])
vis(gu)
gu <- geneUsage(immdata$data)
vis(gu, .by = "Status", .meta = immdata$meta)
vis(gu, "box", .by = "Status", .meta = immdata$meta)
# }
Run the code above in your browser using DataLab