Data from a meta-analysis on nicotine gum and smoking cessation
Usage
data("smoking")
Format
A data frame with 26 observations (studies) on the following 4 variables.
qt
the number of treated subjetcs who stopped
smoking.
tt
the totla number of treated subjects.
qc
the number of subjetcs who stopped
smoking without being treated.
tc
the total number of subject not being treated.
Details
Cigarette smoking is the leading cause of preventable death in
the United States and kills more Americans than AIDS, alcohol,
illegal drug use, car accidents, fires, murders and suicides
combined. It has been estimated that 430,000 Americans die from
smoking every year. Fighting tobacco use is, consequently, one
of the major public health goals of our time and there are now
many programs available designed to help smokers quit. One of
the major aids used in these programs is nicotine chewing gum,
which acts as a substitute oral activity and provides a source
of nicotine that reduces the withdrawal symptoms experienced
when smoking is stopped. But separate randomized clinical trials
of nicotine gum have been largely inconclusive, leading
Silagy (2003) to consider combining the results studies
found from an extensive literature search. The results of these
trials in terms of numbers of people in the treatment arm and
the control arm who stopped smoking for at least 6 months after
treatment are given here.
Source
C. Silagy (2003), Nicotine replacement therapy for smoking
cessation (Cochrane Review). The Cochrane Library,
4, John Wiley & Sons, Chichester.
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(HSAUR)
Loading required package: tools
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/HSAUR/smoking.Rd_%03d_medium.png", width=480, height=480)
> ### Name: smoking
> ### Title: Nicotine Gum and Smoking Cessation
> ### Aliases: smoking
> ### Keywords: datasets
>
> ### ** Examples
>
>
> data("smoking", package = "HSAUR")
> boxplot(smoking$qt/smoking$tt,
+ smoking$qc/smoking$tc,
+ names = c("Treated", "Control"), ylab = "Percent Quitters")
>
>
>
>
>
>
> dev.off()
null device
1
>