Skip to content

Commit

Permalink
restructure and adjust help files
Browse files Browse the repository at this point in the history
  • Loading branch information
juliuspfadt committed Jan 23, 2025
1 parent 418c1ad commit 0ed3ce4
Show file tree
Hide file tree
Showing 19 changed files with 393 additions and 1,001 deletions.
4 changes: 2 additions & 2 deletions R/exploratoryfactoranalysis.R
Original file line number Diff line number Diff line change
Expand Up @@ -253,7 +253,7 @@ exploratoryFactorAnalysisInternal <- function(jaspResults, dataset, options, ...
kmo <- psych::KMO(cov2cor(as.matrix(dataset)))
}

kmoTable[["col"]] <- c(gettext("Overall MSA\n"), names(kmo$MSAi))
kmoTable[["col"]] <- c(gettext("Overall MSA"), names(kmo$MSAi))
kmoTable[["val"]] <- c(kmo$MSA, kmo$MSAi)
}

Expand Down Expand Up @@ -364,7 +364,7 @@ exploratoryFactorAnalysisInternal <- function(jaspResults, dataset, options, ...
.efaGoodnessOfFitTable <- function(modelContainer, dataset, options, ready) {
if (!is.null(modelContainer[["goodnessOfFitTable"]])) return()

goodnessOfFitTable <- createJaspTable(title = gettext("Chi-squared Test"))
goodnessOfFitTable <- createJaspTable(title = gettext("Chi-Squared Test"))
goodnessOfFitTable$addColumnInfo(name = "model", title = "", type = "string")
goodnessOfFitTable$addColumnInfo(name = "chisq", title = gettext("Value"), type = "number", format = "dp:3")
goodnessOfFitTable$addColumnInfo(name = "df", title = gettext("df"), type = "integer")
Expand Down
2 changes: 1 addition & 1 deletion R/principalcomponentanalysis.R
Original file line number Diff line number Diff line change
Expand Up @@ -281,7 +281,7 @@ principalComponentAnalysisInternal <- function(jaspResults, dataset, options, ..
.pcaGoodnessOfFitTable <- function(modelContainer, dataset, options, ready) {
if (!is.null(modelContainer[["goodnessOfFitTable"]])) return()

goodnessOfFitTable <- createJaspTable(title = gettext("Chi-squared Test"))
goodnessOfFitTable <- createJaspTable(title = gettext("Chi-Squared Test"))
goodnessOfFitTable$addColumnInfo(name = "model", title = "", type = "string")
goodnessOfFitTable$addColumnInfo(name = "chisq", title = gettext("Value"), type = "number", format = "dp:3")
goodnessOfFitTable$addColumnInfo(name = "df", title = gettext("df"), type = "integer")
Expand Down
167 changes: 0 additions & 167 deletions inst/help/ExploratoryFactorAnalysis.md

This file was deleted.

141 changes: 0 additions & 141 deletions inst/help/ExploratoryFactorAnalysis_nl.md

This file was deleted.

Loading

0 comments on commit 0ed3ce4

Please sign in to comment.