# NOT RUN {
  w <- gwindow("separator example")
  gp <- ggroup(container=w)
  glabel("left widget", container=gp)
  gseparator(horizontal=FALSE, container=gp, expand=TRUE)
  glabel("right widget", container=gp)
# }
Run the code above in your browser using DataLab