Publications by Samantha Bouwmeester
updated results CWTL
Preparation data<-read.csv("/Users/samanthabouwmeester/Documents/Out of the Box Plot/CWTL/Copy of RCT_data_full.csv") ### Changes in Copy of RCT_data_full.csv that are already processed in datacleaning file but note that column names and attendance data differ in Copy of RCT_data_full.csv and the file that results after the cleaning... #### data$r...
5040 sym R (26828 sym/134 pcs) 35 img 41 tbl
Document CWTL analyses November 2023
Preparation data<-read.csv("/Users/samanthabouwmeester/Documents/Out of the Box Plot/CWTL/Copy of RCT_data_full.csv") ### Changes in Copy of RCT_data_full.csv that are processed in datacleaning file. #### data$read_2[data$index==262]=data$read_1[data$index==262] data$read_2[data$index==4]=data$read_1[data$index==4] data$read_2[data$index==5]=dat...
3062 sym R (18628 sym/141 pcs) 35 img 41 tbl
TBS analyses incidents clients and staff
A randomisation test was done to test whether the measurements during the incident differed from the measurements during the accompanying control phase. For each separate incident of an ID all measurements of the incident and control phase were resampled 1000 times and for each sample the difference in means were calculated for the measurements dur...
1871 sym
CWTL analyses Uganda
Preparation data<-read.csv("/Users/samanthabouwmeester/Documents/CWTL/merged_data_all.csv") data$Attendance<-rowSums(data[,which(substring(colnames(data),1,4)=="week")],na.rm = TRUE) data$Attendance_dich=1 data$Attendance_dich[data$Attendance<21*5*.8]=0 # Missings values #baseline num bas.num<-data[,c("total_nid","total_qds","total_mis","total_...
2608 sym R (18896 sym/144 pcs) 35 img 39 tbl
Results Analysis CWTL Uganda
Preparation data<-read.csv("/Users/samanthabouwmeester/Documents/CWTL/merged_data_all.csv") data$SumAttendance<-rowSums(data[,which(substring(colnames(data),1,4)=="week")],na.rm = TRUE) data$Attendance=1 data$Attendance[data$SumAttendance<21*5*.8]=0 # Missings values #baseline num bas.num<-data[,c("total_nid","total_qds","total_mis","total_ad...
324 sym 18 img 18 tbl
CWTL CRCT Analysis
Preparation data<-read.csv("/Users/samanthabouwmeester/Documents/CWTL/merged_data_all.csv") data$SumAttendance<-rowSums(data[,which(substring(colnames(data),1,4)=="week")],na.rm = TRUE) data$Attendance=1 data$Attendance[data$SumAttendance<21*5*.8]=0 # Missings values #baseline num bas.num<-data[,c("total_nid","total_qds","total_mis","total_ad...
249 sym 14 img 14 tbl
Required cluster sizer CRT
Sample size required for CRT The number of clusters required for the CRT giving a power of .8 is inluenced by 1) the number of students in a cluster (n), the intra class correlation (icc) the effect size (Cohen’s d) and the explained variance by the covariates on cluster level (rho.Xj). Below a plot is shown for the situation where n=30, icc=.2...
1374 sym R (201 sym/1 pcs)
sample sizes based on totals
Sample size calculations We calculate the required sample size based on the effect sizes (Hedges g) of Intensity, Frequency and Distress. Type 1 error is set to .05, type 2 is set to .2 and we used a two sided paired sample t-test. Intensity #Sample size based on Intensity, Frequency, Distress library(pwr) ## Warning: package 'pwr' was built und...
472 sym R (2277 sym/8 pcs)
power_poisson
Design en Poisson verdeling De vraag is hoeveel participanten met UHR er geincludeerd moeten worden voor behandeling wanneer het effect wordt uitgedrukt in het aantal participanten dat baat heeft bij de behandeling en dus na de behandeling niet meer geclassificeerd wordt als UHR. Er wordt een middelgroot tot groot effect verwacht. Type 1 fout wor...
2562 sym R (1064 sym/6 pcs) 1 img
Validation CWTL v.0
Psychometric Analysis Scale A number of psychometric properties were used to investigate the validity and reliability of the math and literacy (sub)tests. For each scale the mean scale score was calculated as well as the standard error of the mean scale score. The mean scale score was divided by the number of items of the scale which results in ...
27423 sym