[R] plot.ts versus plot.zoo

[Alex van der Spek]

plot.ts has an argument yax.flip, plot.zoo does not.

Is there a way to make the yaxis flip in plot.zoo?

I tried using a custom panel function:

panel.yaxis<-function(...) {
     npnl<-parent.frame$panel.number
     if (npnl %% 2 == 0) {
         axis(side=3)
     } else {
         axis(side=2)
     }
}

This leads to a blank window. I am stuck with the intricacies of the 
plotting and axis generation here.

Thank you in advance,
Alex van der Spek