Description Usage Arguments Examples

View source: R/07-ggradial-plot-function.r

This function produces a modified Galbraith's radial plot using ggplot. It shows the treatment effect size of subgroups defined by the categories of covariates. The x-axis represents the reciprocal of the standard error of subgroup treatment effect estimates.The y-axis means standardized effect size difference (the difference between subgroup effect the full popultion effect is divided by the standard error of the estimator for the overall population effect. Points here are for subgroups. The grey region indicates whether subgroup effects are homogeneous to the full population effect or not. The two arcs on the right side show subgroup treatment effects in the original scale, where the red spots are the projection of points from the origin on the left side. Note that the vertical range of display can be changed by setting different values on the associated input argument. In addition, the function uses log odd ratio and log hazard ratio for displaying subgroup effect sizes in binary and survival data, respectively. A ggplot object is returned, where further modifications can be added using the theme() function.

1 2 3 4 5 6 7 8 9 10 11 12 | ```
ggplot_radial(
dat,
covari.sel,
trt.sel,
resp.sel,
outcome.type,
range.v = NULL,
font.size = 4,
title = NULL,
lab.xy = "default",
ticks.length = 0.05
)
``` |

`dat` |
a data set |

`covari.sel` |
a vector of indices of the two covariates |

`trt.sel` |
a covariate index specifying the treatment code |

`resp.sel` |
a covariate index specifying the response variable |

`outcome.type` |
a string specifying the type of the response variable, it can be "continuous", or "binary" or "survival". |

`range.v` |
a vector specifying the vertical range of graphical display. |

`font.size` |
a number specifying the font size for the subgroup labels near points |

`title` |
a string specifying the main title. |

`lab.xy` |
a list of two strings specifying the labels of the x and y axes. |

`ticks.length` |
a number from 0 to 1 to specify the length of the red ticks indicating the treatment effect in the radial axis. A value of 1 will draw a complete line from the (0,0) point to the axis. |

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | ```
library(dplyr)
# Load the data to be used
data(prca)
dat <- prca
dat %>%
mutate(bm = factor(ifelse(bm == 0 , "No", "Yes")),
hx = factor(ifelse(hx == 0 , "No", "Yes")))-> dat
ggplot_radial(dat,
covari.sel = c(4, 5, 6, 7),
trt.sel = 3,
resp.sel = c(1, 2),
outcome.type = "survival",
range.v = c(-7, 6),
font.size = 4)
``` |

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.