Dear friends,
 I met a problem on plotting.
My dataset is :
year    MHBC LHBC MHRC LURC
1993   11.75   4.50   0.43   0.46
1994    7.25   1.25   0.35   0.51
1995    8.67   2.17   0.54   0.44
1996   2.67   1.33   0.78   0.47
1997   3.42   4.92   0.69   0.48
1998   1.92   3.08   0.72   0.54
1999   2.33   2.58   0.74   0.41
2000   5.75   4.50   0.45   0.50
2001   3.75   4.42   0.52   0.47
2002   2.33   1.83   0.58   0.45
2003   0.25   2.83   0.50   0.39
I want to get a plot -line with scatters, the requirement is :
x-axis is year;
two y-axis:
  y1 corresponds to MHBC and LHBC;
  y2 corresponds to MHRC and LURC;
hope to use different symbols to differentiate the MHBC,LHBC,MHRC and  LURC.

The following is my program, but  very bad ,:
*plot(a$year,a$MHBC,type='b')  #line1
par(new=T)
plot(a$year,a$LHBC,type='b')  #line2
par(new=T)
plot(a$year,a$MHRC,type='b')  #line3
par(new=T)
plot(a$year,a$LURC,type='b')   #line4
axis(4, at=pretty(range(a$MHRC)))*
In the figure, the labels and scales of X-axis are vague, the scale of
y-axis is not very good.
The better figure should be like the line1 and 2 are in the upper, and line3
and 4 are in the bottom.
Any suggestion are welcome!

-- 
With Kind Regards,

oooO:::::::::
(..):::::::::
:\.(:::Oooo::
::\_)::(..)::
:::::::)./:::
::::::(_/::::
:::::::::::::
[***********************************************************************]
Zhi Jie,Zhang ,PHD
Tel:86-21-54237149   epistat@gmail.com
Dept. of Epidemiology,school of public health,Fudan University
Address:No. 138 Yi Xue Yuan Road,Shanghai,China
Postcode:200032
[***********************************************************************]
oooO:::::::::
(..):::::::::
:\.(:::Oooo::
::\_)::(..)::
:::::::)./:::
::::::(_/::::
:::::::::::::

	[[alternative HTML version deleted]]

