I have an example below:
example <-
structure(list(
patient = c(1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3,
3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5,
5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6,
6, 6, 6),
group = structure(c("active", "active", "active",
"active", "active",
"active", "active",
"active", "active", "active", "active",
"active", "active", "active",
"active", "active", "active", "active",
"active", "active", "active",
"active", "active",
"active", "active", "active", "active",
"active", "active",
"active","placebo", "placebo",
"placebo", "placebo", "placebo",
"placebo",
"placebo",
"placebo", "placebo", "placebo",
"placebo", "placebo", "placebo",
"placebo",
"placebo", "placebo", "placebo",
"placebo", "placebo", "placebo",
"placebo",
"placebo", "placebo",
"placebo", "placebo", "placebo",
"placebo", "placebo", "placebo",
"placebo"),
.label = c("active", "placebo")),
visit = c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 1, 2,
3, 4, 5, 6, 7, 8, 9, 10, 1, 2, 3, 4, 5, 6,
7, 8, 9, 10, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10,
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 1, 2
, 3, 4,
5, 6, 7, 8, 9, 10),
var = c(1, 0.8, 0.5, 0.45, 0.3,
0.34, 0.26, 0.25, 0.2, 0.19, 1, 0.6, 0.5, 0.4, 0.35, 0.3,
0.23, 0.2, 0.19, 0.1, 1, 1.2, 0.8, 0.6, 0.56, 0.45, 0.54,
0.34, 0.32, 0.2, 1, 1.2, 1.3, 1.1, 4.2, 1.3, 1.2, 0.9, 0.89,
0.88, 1, 1.3, 1.2, 1.2, 0.9, 0.87, 0.76, 0.8, 0.98, 1.2,
1, 1.2, 1.3, 1.2, 1.15, 1.2, 1.234, 1.4, 1.1, 1)),
.Names = c("patient", "group", "visit",
"var"), class = "data.frame",
row.names = c(NA,
-60))
xyplot(example$var ~ example$visit | example$group,
groups = example$patient,
col = "black",
type = "b",
ylab = "Variable",
xlab = "Visit",
bty = "n",
pch = c(16,16),
bty = "n",
las = 1,
# ylim = c(0,5),
scales = list(
x = list(at = c(1:10),
labels =
c("Baseline","2","3","4","5","6","7","8","9","End
of
Study"),
rot = 40,
alternating = 1))
)
On 30/05/07, Anup Nandialath <anup_nandialath@yahoo.com>
wrote:>
> did you try the xlim and ylim options on xyplot? you can change the axis
> using that
>
> HTH
>
> Anup
>
> ------------------------------
> Fussy? Opinionated? Impossible to please? Perfect. Join Yahoo!'s user
>
panel<http://us.rd.yahoo.com/evt=48516/*http://surveylink.yahoo.com/gmrs/yahoo_panel_invite.asp?a=7+>and
lay it on us.
>
>
--
Murray Pung
Statistician, Datapharm Australia Pty Ltd
0404 273 283
[[alternative HTML version deleted]]