A randomised clinical trial investigating the effect of an anti-epileptic
drug.
Usage
data("epilepsy")
Format
A data frame with 236 observations on the following 6 variables.
treatment
the treatment group, a factor with levels placebo
and Progabide.
base
the number of seizures before the trial.
age
the age of the patient.
seizure.rate
the number of seizures (response variable).
period
treatment period, an ordered factor with levels
1 to 4.
subject
the patient ID, a factor with levels 1 to
59.
Details
In this clinical trial, 59
patients suffering from epilepsy were randomized to groups receiving either
the anti-epileptic drug Progabide or a placebo in addition to
standard chemotherapy. The numbers of seizures suffered in each
of four, two-week periods were recorded for each patient along
with a baseline seizure count for the 8 weeks prior to being
randomized to treatment and age. The main question of interest
is whether taking progabide reduced the number of epileptic seizures
compared with placebo.
Source
P. F. Thall and S. C. Vail (1990),
Some covariance models for longitudinal count data with
overdispersion. Biometrics, 46, 657–671.
Examples
data("epilepsy", package = "HSAUR2")
library(lattice)
dotplot(I(seizure.rate / base) ~ period | subject, data = epilepsy,
subset = treatment == "Progabide")
dotplot(I(seizure.rate / base) ~ period | subject, data = epilepsy,
subset = treatment == "Progabide")
Results
R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> library(HSAUR2)
Loading required package: tools
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/HSAUR2/epilepsy.Rd_%03d_medium.png", width=480, height=480)
> ### Name: epilepsy
> ### Title: Epilepsy Data
> ### Aliases: epilepsy
> ### Keywords: datasets
>
> ### ** Examples
>
>
> data("epilepsy", package = "HSAUR2")
> library(lattice)
> dotplot(I(seizure.rate / base) ~ period | subject, data = epilepsy,
+ subset = treatment == "Progabide")
> dotplot(I(seizure.rate / base) ~ period | subject, data = epilepsy,
+ subset = treatment == "Progabide")
>
>
>
>
>
>
> dev.off()
null device
1
>