Scatterplot with Border Boxplots (GPL)

Figure 1. GPL for scatterplot with border boxplots

* Open sample file Employee Data.sav.
GGRAPH
  /GRAPHDATASET NAME="graphdataset" VARIABLES=salary salbegin
  /GRAPHSPEC SOURCE=INLINE.
BEGIN GPL
  SOURCE: s=userSource(id("graphdataset"))
  DATA: salary = col(source(s), name("salary"))
  DATA: salbegin = col(source(s), name("salbegin"))
  GRAPH: begin(origin(5%, 10%), scale(85%, 85%))
  GUIDE: axis(dim(1), label("Beginning Salary"))
  GUIDE: axis(dim(2), label("Current Salary"))
  ELEMENT: point(position(salbegin*salary))
  GRAPH: end()
  GRAPH: begin(origin(5%, 0%), scale(85%, 10%))
  COORD: rect(dim(1))
  GUIDE: axis(dim(1), ticks(null()))
  ELEMENT: schema(position(bin.quantile.letter(salbegin)), size(size."80%"))
  GRAPH: end()
  GRAPH: begin(origin(90%, 10%), scale(10%, 85%))
  COORD: transpose(rect(dim(1)))
  GUIDE: axis(dim(1), ticks(null()))
  ELEMENT: schema(position(bin.quantile.letter(salary)), size(size."80%"))
  GRAPH: end()
END GPL.