knitr::opts_chunk$set(echo = TRUE)
library("devtools") install_github("eldafani/intsvy") library("intsvy")
options(width=120)
library("intsvy") dir <- "/home/eldani/eldani/International LSA/TIMSS/TIMSS 19/Grade 4"
The object dir specifies the directory path where the TIMSS 2019 data is located (eg. “/home/data”). Variable selection can be done with aid of timssg4.var.label(dir)
timss <- timssg4.select.merge(folder= dir, student= c("ITSEX", "ASBG05A", "ASBG05B", "ASBG05C", "ASBG05D", "ASBG03"), home= c("ASBH14", "ASBH10", "ASDHEDUP", "ASDHOCCP", "ASBH17A", "ASBH17B"), school= c("ACBG05B"), countries = c("ARE", "CHL", "CAN", "HUN"))
timss.mean.pv(pvlabel=paste0("ASMMAT0", 1:5), by= "IDCNTRYL", data=timss)
timss.mean.pv(pvlabel= paste0("ASMMAT0", 1:5), by= c("IDCNTRYL", "ITSEX"), data=timss)
intsvy.ben.pv(pvnames= paste0("ASMMAT0", 1:5), cutoff = c(400, 475, 550, 625), by= c("IDCNTRYL", "ITSEX"), data=timss, config = timss4_conf)
intsvy.ben.pv(pvnames= paste0("ASMMAT0", 1:5), cutoff = c(400, 475, 550, 625), by= c("IDCNTRYL", "ITSEX"), data=timss, config = timss4_conf)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.