[R] sort boxplot to median

[H. Bromberger]

Dear guRus,
I'm stuck and really would appreciate some help. I've already crawled the net...
I want to do some Boxplot which are sorted by the median and not alphabetically.
What I did so far:
x <- subset(mydata, Verwalt.Doku==1, select=c(1, 2))
P <- plot(x[,1], x[,2], plot=F)
???sort(P$stats[3,])???
bxp(P, col="yellow", las=1, horizontal=T, xlab="Potential")

Of course it sorts the vector P$stats[3,] but not the rest of the list.
Thanks in advance, and sorry but I am new to R

Hubertus