Skip to content

Instantly share code, notes, and snippets.

@MJacobs1985

MJacobs1985/gist:dcec67fa03598bd4abe8b6a9fc4c5ef7

Last active November 10, 2022 13:21
Show Gist options
  • Save MJacobs1985/dcec67fa03598bd4abe8b6a9fc4c5ef7 to your computer and use it in GitHub Desktop.
Save MJacobs1985/dcec67fa03598bd4abe8b6a9fc4c5ef7 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
DataExplorer::plot_qq(total[,c(12,15,19,20,23,26,29,32,35,38,42,79)], by="timef", ggtheme=theme_bw())
ggplot(total) + geom_bar(aes(x=timef, y=Severity, fill=Tumorsite_in_pancreas), position = "dodge", stat = "summary", fun.y = "mean") + facet_wrap(~Gender) + theme_bw()
ggplot(total) + geom_bar(aes(x=timef, y=Severity, fill=timef), position = "dodge", stat = "summary", fun.y = "mean") + facet_wrap(~Tumorsite_in_pancreas) + theme_bw()
ggplot(total) + geom_bar(aes(x=timef, y=Severity, fill=timef), position = "dodge", stat = "summary", fun.y = "mean") + facet_wrap(~Opioid_spec) + theme_bw()
ggplot(total) + geom_bar(aes(x=timef, y=Severity, fill=timef), position = "dodge", stat = "summary", fun.y = "mean") + facet_wrap(~Non_opioid_spec) + theme_bw()
ggplot(total) + geom_bar(aes(x=timef, y=Severity, fill=timef), position = "dodge", stat = "summary", fun.y = "mean") + facet_wrap(~Gender) + theme_bw()
ggplot(total) + geom_bar(aes(x=timef, y=Severity, fill=timef), position = "dodge", stat = "summary", fun.y = "mean") + facet_wrap(~Performance_status_at_consultation) + theme_bw()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment