\begin{figure*}[t]
    \centering
<<fig=TRUE,height=2>>=
    ymax <- max(
                argouml$frm,
                jabref$frm,
                jedit$frm,
                mucommander$frm,
                argouml$bug_count_cmb_frm,
                jabref$bug_count_cmb_frm,
                jedit$bug_count_cmb_frm,
                mucommander$bug_count_cmb_frm
    )
    limits <- c(1, ymax)
    par(mfcol=c(1,4), las=2, mai=c(0.7,0.5,0,0.1), mgp=c(3,0.6,0))
    plot(sort(argouml$frm), type='l', ylim=limits, xlab=rownames(projects)[1], ylab='FRM (Log)', log='y')
    points(argouml$bug_count_cmb_frm[order(argouml$frm)], pch='x')
    par(yaxt='n', mai=c(0.7,0,0,0.1))
    plot(sort(jabref$frm), type='l', ylim=limits, xlab=rownames(projects)[2], log='y')
    points(jabref$bug_count_cmb_frm[order(jabref$frm)], pch='x')
    plot(sort(jedit$frm), type='l', ylim=limits, xlab=rownames(projects)[3], log='y')
    points(jedit$bug_count_cmb_frm[order(jedit$frm)], pch='x')
    plot(sort(mucommander$frm), type='l', ylim=limits, xlab=rownames(projects)[4], log='y')
    points(mucommander$bug_count_cmb_frm[order(mucommander$frm)], pch='x')
@
    
    \caption{Change in position of FRM using \source (lines) and \previous (crosses). Bugs ordered as for~\cref{fig:change}}
    \label{fig:bug_count_cmb_change}
\end{figure*}
