R Dataset / Package HSAUR / BtheB
On this Picostat.com statistics page, you will find information about the BtheB data set which pertains to Beat the Blues Data . The BtheB data set is found in the HSAUR R package. Try to load the BtheB data set in R by issuing the following command at the console data("BtheB"). This may load the data into a variable called BtheB. If R says the BtheB data set is not found, you can try installing the package by issuing this command install.packages("HSAUR") and then attempt to reload the data with library("HSAUR") followed by data("BtheB"). Perhaps strangley, if R gives you no output after entering a command, it means the command succeeded. If it succeeded you can see the data by typing BtheB at the command-line which should display the entire dataset.
If you need to download R, you can go to the R project website. You can download a CSV (comma separated values) version of the BtheB R data set. The size of this file is about 3,301 bytes.
Beat the Blues Data
Data from a clinical trial of an interactive multimedia program called ‘Beat the Blues’.
A data frame with 100 observations of 100 patients on the following 8 variables.
Longitudinal data from a clinical trial of an interactive, multimedia program known as "Beat the Blues" designed to deliver cognitive behavioural therapy to depressed patients via a computer terminal. Patients with depression recruited in primary care were randomised to either the Beating the Blues program, or to "Treatment as Usual (TAU)".
Note that the data are stored in the wide form, i.e., repeated measurments are represented by additional columns in the data frame.
J. Proudfoot, D. Goldberg and A. Mann (2003). Computerised, interactive, multimedia CBT reduced anxiety and depression in general practice: A RCT. Psychological Medicine, 33, 217–227.
data("BtheB", package = "HSAUR") layout(matrix(1:2, nrow = 1)) ylim <- range(BtheB[,grep("bdi", names(BtheB))], na.rm = TRUE) boxplot(subset(BtheB, treatment == "TAU")[,grep("bdi", names(BtheB))], main = "Treated as usual", ylab = "BDI", xlab = "Time (in months)", names = c(0, 2, 4, 6, 8), ylim = ylim) boxplot(subset(BtheB, treatment == "BtheB")[,grep("bdi", names(BtheB))], main = "Beat the Blues", ylab = "BDI", xlab = "Time (in months)", names = c(0, 2, 4, 6, 8), ylim = ylim)
Dataset imported from https://www.r-project.org.
How To Register With a Username
How To Register With Google Single Sign On (SSO)
How To Login With a Username and Password
How To Login With Google Single Sign On (SSO)
How To Import a Dataset
How To Perform Statistical Analysis with Picostat
How To Use Educational Applications with Picostat
|Recent Queries For This Dataset|
No queries made on this dataset yet.
|Title||Authored on||Content type|
|OpenIntro Statistics Dataset - unemploy_pres||August 9, 2020 - 2:38 PM||Dataset|
|OpenIntro Statistics Dataset - house||August 9, 2020 - 12:25 PM||Dataset|
|R Dataset / Package evir / nidd.annual||March 9, 2018 - 1:06 PM||Dataset|
|R Dataset / Package Stat2Data / WeightLossIncentive4||March 9, 2018 - 1:06 PM||Dataset|
|R Dataset / Package HSAUR / clouds||March 9, 2018 - 1:06 PM||Dataset|