plotAlign: Aligns two ggplot2 plots horizontally
In felasa/fdtools: Herramientas

1	plotAlign(q, p)

`q`
`p`

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (q, p) 
{
    gA <- ggplotGrob(q)
    gB <- ggplotGrob(p)
    maxWidth = grid::unit.pmax(gA$widths, gB$widths)
    gA$widths <- as.list(maxWidth)
    gB$widths <- as.list(maxWidth)
    grid.arrange(gA, gB, heights = unit(c(0.75, 0.25), units = "npc"), 
        ncol = 1)
  }