Idaho/Idaho_SGP_2022_PART_B.R at master · CenterForAssessment/Idaho · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
###########################################################################
###                                                                     ###
###     SGP STRAIGHT projections for skip year SGP analyses for 2022    ###
###                                                                     ###
###########################################################################

###   Load packages
require(SGP)
require(SGPmatrices)
require(data.table)

###   Load data
load("Data/Idaho_SGP.Rdata")

###   Load configurations
source("SGP_CONFIG/2022/PART_B/ELA.R")
source("SGP_CONFIG/2022/PART_B/MATHEMATICS.R")

ID_2022.config <- c(ELA_2022.config, MATHEMATICS_2022.config)

### Parameters
parallel.config <- list(BACKEND="PARALLEL", WORKERS=list(PERCENTILES=2, BASELINE_PERCENTILES=2, PROJECTIONS=2, LAGGED_PROJECTIONS=2, SGP_SCALE_SCORE_TARGETS=2))

###   Add Baseline matrices to SGPstateData
SGPstateData <- addBaselineMatrices("ID", "2021")
SGPstateData[["ID"]][["SGP_Configuration"]][["sgp.target.scale.scores.merge"]] <- NULL ### WAIT UNTIL AFTER PART C TO MERGE

###   Run analysis
Idaho_SGP <- abcSGP(
        Idaho_SGP,
        years = "2022",
        steps=c("prepareSGP", "analyzeSGP", "combineSGP"),
        sgp.config=ID_2022.config,
        sgp.percentiles=FALSE,
        sgp.projections=TRUE,
        sgp.projections.lagged=FALSE,
        sgp.percentiles.baseline=FALSE,
        sgp.projections.baseline=TRUE,
        sgp.projections.lagged.baseline=FALSE,
        sgp.target.scale.scores=TRUE,
        parallel.config=parallel.config
)

###   Save results
save(Idaho_SGP, file="Data/Idaho_SGP.Rdata")