newbie plotting pole-zero diagrams



Does a simple method exist to make Maxima display a so called "pole-zero 
diagram"?
If I have for example a transfer function H(s) = (1+3*s)/(1+3*s+s^2)
I'd like Maxima to plot the symbol "o" in the complex plane at (-1/3,0) 
and a symbol "x" for the complex roots of the denominator.

regards,
hugo