diff --git a/DESCRIPTION b/DESCRIPTION index 99583f7..056ca85 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,8 +1,8 @@ Package: sirt Type: Package Title: Supplementary Item Response Theory Models -Version: 4.0-27 -Date: 2024-01-08 16:12:44 +Version: 4.1-1 +Date: 2024-01-18 10:36:46 Author: Alexander Robitzsch [aut,cre] () Maintainer: Alexander Robitzsch Description: diff --git a/R/RcppExports.R b/R/RcppExports.R index fd77fd9..c35e06a 100644 --- a/R/RcppExports.R +++ b/R/RcppExports.R @@ -1,5 +1,5 @@ ## File Name: RcppExports.R -## File Version: 4.000027 +## File Version: 4.001001 # Generated by using Rcpp::compileAttributes() -> do not edit by hand # Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393 diff --git a/R/invariance.alignment.R b/R/invariance.alignment.R index ffce833..ff1dedb 100644 --- a/R/invariance.alignment.R +++ b/R/invariance.alignment.R @@ -1,11 +1,12 @@ ## File Name: invariance.alignment.R -## File Version: 3.807 +## File Version: 3.820 invariance.alignment <- function( lambda, nu, wgt=NULL, align.scale=c(1,1), align.pow=c(.5,.5), eps=1e-3, psi0.init=NULL, alpha0.init=NULL, center=FALSE, optimizer="optim", - fixed=NULL, meth=1, vcov=NULL, eps_grid=seq(0,-10, by=-.5), ... ) + fixed=NULL, meth=1, vcov=NULL, eps_grid=seq(0,-10, by=-.5), + num_deriv=FALSE, ... ) { CALL <- match.call() s1 <- Sys.time() @@ -26,7 +27,7 @@ invariance.alignment <- function( lambda, nu, wgt=NULL, } #- choose fixed value - fixed <- invariance_alignment_choose_fixed(fixed=fixed, G=G, Gmax=8) + fixed <- invariance_alignment_choose_fixed(fixed=fixed, G=G, Gmax=999) reparam <- ! fixed W1 <- dim(wgt) @@ -99,7 +100,7 @@ invariance.alignment <- function( lambda, nu, wgt=NULL, if ( align.pow[1]==0){ ia_grad_optim <- NULL } - if (meth>=2){ + if ((meth>=2) | num_deriv ){ ia_grad_optim <- NULL } diff --git a/R/invariance_alignment_define_parameters.R b/R/invariance_alignment_define_parameters.R index 3d9852c..c2e6964 100644 --- a/R/invariance_alignment_define_parameters.R +++ b/R/invariance_alignment_define_parameters.R @@ -1,5 +1,5 @@ ## File Name: invariance_alignment_define_parameters.R -## File Version: 0.191 +## File Version: 0.193 invariance_alignment_define_parameters <- function(x, ind_alpha, ind_psi, fix_first_psi=TRUE, reparam=FALSE, constraint="prod", overparam=FALSE) diff --git a/README.md b/README.md index c581e02..7f76c98 100644 --- a/README.md +++ b/README.md @@ -8,7 +8,7 @@ a minimal runnable code necessary to reproduce the issue, which can be run on th all necessary information on the used librarys, the R version, and the OS it is run on, perhaps a sessionInfo(). -#### CRAN version `sirt` 3.13-228 (2023-08-11) +#### CRAN version `sirt` 4.0-32 (2024-01-17) [![CRAN_Status_Badge](http://www.r-pkg.org/badges/version-last-release/sirt)](https://cran.r-project.org/package=sirt) @@ -22,9 +22,9 @@ The CRAN version can be installed from within R using: utils::install.packages("sirt") ``` -#### GitHub version `sirt` 4.0-27 (2024-01-08) +#### GitHub version `sirt` 4.1-1 (2024-01-18) -[![](https://img.shields.io/badge/github%20version-4.0--27-orange.svg)](https://github.com/alexanderrobitzsch/sirt)   +[![](https://img.shields.io/badge/github%20version-4.1--1-orange.svg)](https://github.com/alexanderrobitzsch/sirt)   The version hosted [here](https://github.com/alexanderrobitzsch/sirt) is the development version of `sirt`. The GitHub version can be installed using `devtools` as: diff --git a/inst/NEWS b/inst/NEWS index 56c779f..00dc495 100644 --- a/inst/NEWS +++ b/inst/NEWS @@ -37,7 +37,19 @@ CHANGELOG sirt ------------------------------------------------------------------------ -VERSIONS sirt 4.0 | 2024-01-08 | Last: sirt 4.0-27 +VERSIONS sirt 4.1 | 2024-01-18 | Last: sirt 4.1-1 +------------------------------------------------------------------------ + +xxx * ... + + +DATA * included/modified datasets: --- +EXAMP * included/modified examples: --- + + + +------------------------------------------------------------------------ +VERSIONS sirt 4.0 | 2024-01-17 | Last: sirt 4.0-32 ------------------------------------------------------------------------ FIXED * fixed incorrect handling of lower and upper bounds of item @@ -48,13 +60,13 @@ ADDED * included function dmlavaan() that allows comparing model parameters from two lavaan models fitted to the same dataset NOTE * corrected manual of 'data.g308' (thanks to Andres Burga) NOTE * included argument 'eps_grid' in invariance.alignment() - +NOTE * included argument 'num_deriv' in invariance.alignment() +NOTE * changed estimation defaults in invariance.alignment() + for many groups (>= 9 groups) DATA * included/modified datasets: --- EXAMP * included/modified examples: dmlavaan (1), data.g308 (1) - - ------------------------------------------------------------------------ VERSIONS sirt 3.13 | 2023-08-11 | Last: sirt 3.13-228 ------------------------------------------------------------------------ diff --git a/man/invariance.alignment.Rd b/man/invariance.alignment.Rd index d900e71..e221afa 100644 --- a/man/invariance.alignment.Rd +++ b/man/invariance.alignment.Rd @@ -1,5 +1,5 @@ %% File Name: invariance.alignment.Rd -%% File Version: 1.688 +%% File Version: 1.692 \name{invariance.alignment} \alias{invariance.alignment} @@ -46,7 +46,8 @@ if it is supplied as the argument \code{vcov}. \usage{ invariance.alignment(lambda, nu, wgt=NULL, align.scale=c(1, 1), align.pow=c(.5, .5), eps=1e-3, psi0.init=NULL, alpha0.init=NULL, center=FALSE, - optimizer="optim", fixed=NULL, meth=1, vcov=NULL, eps_grid=seq(0,-10, by=-.5), ...) + optimizer="optim", fixed=NULL, meth=1, vcov=NULL, eps_grid=seq(0,-10, by=-.5), + num_deriv=FALSE, ...) \method{summary}{invariance.alignment}(object, digits=3, file=NULL, ...) @@ -106,6 +107,7 @@ item loadings in alignment.} for standard error computation. If a matrix is provided, standard errors are computed.} \item{eps_grid}{Grid of logarithmized epsilon values in optimization} +\item{num_deriv}{Logical indicating whether numerical derivatives should be used} \item{object}{ Object of class \code{invariance.alignment} } diff --git a/man/noharm.sirt.Rd b/man/noharm.sirt.Rd index 74dcce0..e64770c 100644 --- a/man/noharm.sirt.Rd +++ b/man/noharm.sirt.Rd @@ -1,5 +1,5 @@ %% File Name: noharm.sirt.Rd -%% File Version: 0.542 +%% File Version: 0.543 \name{noharm.sirt} \alias{noharm.sirt} @@ -203,7 +203,7 @@ Fraser, C., & McDonald, R. P. (1988). NOHARM: Least squares item factor analysis \doi{10.1207/s15327906mbr2302_9} Fraser, C., & McDonald, R. P. (2012). \emph{NOHARM 4 Manual}. \cr -{http://noharm.niagararesearch.ca/nh4man/nhman.html}. +http://noharm.niagararesearch.ca/nh4man/nhman.html. Knol, D. L., & Berger, M. P. (1991). Empirical comparison between factor analysis and multidimensional item response models. \emph{Multivariate Behavioral Research, 26}(3), @@ -260,7 +260,7 @@ Model fit can be assessed by \code{\link{modelfit.sirt}}. See \code{\link{R2noharm}} for running the NOHARM software from within \R. See Fraser and McDonald (1988, 2012) for an implementation of the NOHARM model which -is available as freeware ({http://noharm.niagararesearch.ca/}; +is available as freeware (http://noharm.niagararesearch.ca/; the link seems to be broken in the meanwhile). } diff --git a/man/person.parameter.rasch.copula.Rd b/man/person.parameter.rasch.copula.Rd index 4e7ae41..1c8c415 100644 --- a/man/person.parameter.rasch.copula.Rd +++ b/man/person.parameter.rasch.copula.Rd @@ -1,5 +1,5 @@ %% File Name: person.parameter.rasch.copula.Rd -%% File Version: 1.19 +%% File Version: 1.202 \name{person.parameter.rasch.copula} \alias{person.parameter.rasch.copula} @@ -19,7 +19,7 @@ person.parameter.rasch.copula(raschcopula.object, numdiff.parm=0.001, %- maybe also 'usage' for other objects documented here. \arguments{ \item{raschcopula.object}{ -Object which is generated by the code{rasch.copula2} function. +Object which is generated by the \code{rasch.copula2} function. } \item{numdiff.parm}{ Parameter \eqn{h} for numerical differentiation @@ -71,7 +71,6 @@ to local dependence} \seealso{ See \code{\link{rasch.copula2}} for estimating Rasch copula models. -%% ~~objects to See Also as \code{\link{help}}, ~~~ } \examples{ ############################################################################# diff --git a/man/rasch.jml.jackknife1.Rd b/man/rasch.jml.jackknife1.Rd index c54148b..4b8bc84 100644 --- a/man/rasch.jml.jackknife1.Rd +++ b/man/rasch.jml.jackknife1.Rd @@ -1,5 +1,5 @@ %% File Name: rasch.jml.jackknife1.Rd -%% File Version: 2.18 +%% File Version: 2.191 \name{rasch.jml.jackknife1} \alias{rasch.jml.jackknife1} @@ -29,16 +29,16 @@ A list with following entries \item{item}{ A data frame with item parameters \itemize{ - \item \code{b.JML}: {Item difficulty from JML estimation} - \item \code{b.JMLcorr}: {Item difficulty from JML estimation by - applying the correction factor \eqn{(I-1)/I}} - \item \code{b.jack}: {Item difficulty from Jackknife estimation} - \item \code{b.jackse}: {Standard error of Jackknife estimation + \item \code{b.JML}: Item difficulty from JML estimation + \item \code{b.JMLcorr}: Item difficulty from JML estimation by + applying the correction factor \eqn{(I-1)/I} + \item \code{b.jack}: Item difficulty from Jackknife estimation + \item \code{b.jackse}: Standard error of Jackknife estimation for item difficulties. Note that this parameter refer to the standard error - with respect to item sampling} - \item \code{b.JMLse}: {Standard error for item difficulties - obtained from JML estimation} + with respect to item sampling + \item \code{b.JMLse}: Standard error for item difficulties + obtained from JML estimation } } \item{jack.itemdiff}{A matrix containing all item difficulties obtained by Jackknife} diff --git a/src/RcppExports.cpp b/src/RcppExports.cpp index 87d152b..af1dc18 100644 --- a/src/RcppExports.cpp +++ b/src/RcppExports.cpp @@ -1,5 +1,5 @@ //// File Name: RcppExports.cpp -//// File Version: 4.000027 +//// File Version: 4.001001 // Generated by using Rcpp::compileAttributes() -> do not edit by hand // Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393