\version "2.18.2"
\paper { #(set-paper-size "a6") }
right = { R1 R R R }
pleft = {
  << {c''8 c'' r2.} \\ {a'8 a' r2.} >>
}
qleft = {
  << {c''8 c''} \\ {a'8 a'} >> r2.
}
rleft = {
  << {c''4 c'' r2} \\ {a'4 a' r2} >>
}
sleft = {
  << {c''4 c''} \\ {a'4 a'} >> r2
}
\score {
  \new PianoStaff <<
    \new Staff { \right }
    \new Staff { \pleft }
  >>
}
\score {
  \new PianoStaff <<
    \new Staff { \right }
    \new Staff { \qleft }
  >>
}
\score {
  \new PianoStaff <<
    \new Staff { \right }
    \new Staff { \rleft }
  >>
}
\score {
  \new PianoStaff <<
    \new Staff { \right }
    \new Staff { \sleft }
  >>
}