odd <- seq(1,18,by=2)
odd
xlab2[odd]
?pdf
?axis
even
rep(2,9)
?pdf
?tiff
sequence
sequence
sequence
sequence
mygray
sequence
?axis
?axis
?text
q()
Stangle("beckvasishthrevised.Rnw")
?axis
?text
?mtext
even
xlab2
?axis
?par
?tiff
?pdf
?family
?legend
q()
