pianoStaff with TimeSig, centered dynamics and centered pedal

[Stefan Thomas]

Dear community,
I want to create a pianoStaff with TimeSig, centered dynamics and centered pedal.
My problem is: I would like to have the TimeSignature on the same vertical position as the dynamis.
How can I achieve it?
Here is the  snippet:

\version "2.12.1."
  \layout {
    % Definiert den Kontext,in dem Dynamik und Taktangaben notiert sind
    \context {
      \type "Engraver_group"
      \name Dynamics
      \alias Voice
      \consists "Output_property_engraver" %keine Ahnung, was das bedeuten soll!
      \consists "Script_engraver"
      \consists "New_dynamic_engraver"
      \consists "Dynamic_align_engraver"
      \consists "Text_engraver"
      \consists "Skip_event_swallow_translator"
      \consists "Axis_group_engraver"
   \consists "Time_signature_engraver"
   \consists "Text_spanner_engraver"
   \override TimeSignature #'font-size = #2
      \override DynamicLineSpanner #'Y-offset = #0
      \override TextScript #'font-size = #2
      \override TextScript #'font-shape = #'italic
      \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 2)
    }
    % Definiert den Kontext,in dem das Pedal notiert wird
    \context {
      \type "Engraver_group"
      \name Pedal
      \alias Voice
      \consists "Output_property_engraver" %keine Ahnung, was das bedeuten soll!
      \consists "Piano_pedal_engraver"
      \consists "Dynamic_align_engraver"
      \consists "Text_engraver"
      \consists "Skip_event_swallow_translator"
      \consists "Axis_group_engraver"
   \consists "Text_spanner_engraver"
      pedalSustainStrings = #'("Ped." "*Ped." "*")
      pedalUnaCordaStrings = #'("una corda" "" "tre corde")
      %\override DynamicLineSpanner #'Y-offset = #0
      %\override TextScript #'font-size = #2
     % \override TextScript #'font-shape = #'italic
      \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 2)
    }
    % modify PianoStaff context to accept Dynamics context
    \context {
      \PianoStaff
      \accepts Dynamics
    \accepts Pedal
    }
    \context { \Staff \remove "Time_signature_engraver" }
  }

rechts = \relative  { c4 d e f g2. a4 g f g f e d2. }
links = \relative  { \clef bass c4 b c a g2. f4 e d e d c b2.  }
pedal = { s1 \sustainOn s2. \sustainOff s2.*3 }
dynamik = { \context Voice << {  \time 4/4 s1\< \time 3/4 s2.\f  } 
    {#(ly:export (skip-of-length rechts)) }>>
\time 4/4 s1
}
\score {
  \new PianoStaff = "Klavier" <<
    \new Staff = "rechts" \rechts
    \new Dynamics = "Dynamics_pf" \dynamik
    \new Staff = "links"  \links 
    \new Pedal = "pedal" \pedal
  >> }