From 29e04333b5087bef6c5a571cf1af508dcff5da2a Mon Sep 17 00:00:00 2001 From: Gunther Schauberger Date: Fri, 22 Jul 2016 14:58:37 +0000 Subject: [PATCH] version 0.2 --- DESCRIPTION | 8 ++++---- MD5 | 14 +++++++------- NAMESPACE | 0 R/DIFboost-internal.R | 0 R/DIFboost.R | 5 +++-- R/print.DIFboost.R | 0 data/simul.data.rda | Bin 1575 -> 1575 bytes man/DIFboost-package.Rd | 2 +- man/DIFboost.Rd | 2 +- man/print.DIFboost.Rd | 2 +- man/simul.data.Rd | 2 +- 11 files changed, 18 insertions(+), 17 deletions(-) mode change 100755 => 100644 DESCRIPTION mode change 100755 => 100644 NAMESPACE mode change 100755 => 100644 R/DIFboost-internal.R mode change 100755 => 100644 R/DIFboost.R mode change 100755 => 100644 R/print.DIFboost.R mode change 100755 => 100644 data/simul.data.rda mode change 100755 => 100644 man/DIFboost-package.Rd mode change 100755 => 100644 man/DIFboost.Rd mode change 100755 => 100644 man/print.DIFboost.Rd mode change 100755 => 100644 man/simul.data.Rd diff --git a/DESCRIPTION b/DESCRIPTION old mode 100755 new mode 100644 index 8fd0d39..eee879f --- a/DESCRIPTION +++ b/DESCRIPTION @@ -2,15 +2,15 @@ Package: DIFboost Type: Package Title: Detection of Differential Item Functioning (DIF) in Rasch Models by Boosting Techniques -Version: 0.1 -Date: 2015-08-19 +Version: 0.2 +Date: 2016-07-21 Imports: mboost, penalized, stabs Author: Gunther Schauberger Maintainer: Gunther Schauberger Description: Performs detection of Differential Item Functioning using the method DIFboost as proposed in Schauberger and Tutz (2015): Detection of Differential item functioning in Rasch models by boosting techniques, British Journal of Mathematical and Statistical Psychology. License: GPL-2 LazyLoad: yes +Packaged: 2016-07-21 14:38:13 UTC; schaubergerg NeedsCompilation: no -Packaged: 2015-08-19 15:26:20 UTC; schaubergerg Repository: CRAN -Date/Publication: 2015-08-19 17:38:58 +Date/Publication: 2016-07-22 14:58:37 diff --git a/MD5 b/MD5 index 2dc1463..1cc1186 100644 --- a/MD5 +++ b/MD5 @@ -1,10 +1,10 @@ -844b4efd765fe9cb4d7dc58e460f99ae *DESCRIPTION +b025c0b1346e9b20ef025fb54a8f6b1f *DESCRIPTION a9b970ebac4afc6216517192b8196c11 *NAMESPACE a4d9d26d5c8c274393fa730a21d2d06f *R/DIFboost-internal.R -847f657bf4b9ebcf0312dd05255a5a63 *R/DIFboost.R +c5731cc9068a65a7dec716044bf25f61 *R/DIFboost.R 842fba54f82f8b40877d82bea5a981bb *R/print.DIFboost.R -2ff80e279410c1239785c28977f8d481 *data/simul.data.rda -210974d2e7f7c9e3da8240599cbdd67d *man/DIFboost-package.Rd -602fdc04a576fe8780a4fb076e5ba80e *man/DIFboost.Rd -43c4a9005398352539e00b574d015e57 *man/print.DIFboost.Rd -1cf11066dcb645e048c14076b9bc84c9 *man/simul.data.Rd +6f86099ec98501b1cf6942a7027adb95 *data/simul.data.rda +3b8b3451311fd747ba46b8397d2576c4 *man/DIFboost-package.Rd +618a16e3f79a0f9b3f02c777271d5cee *man/DIFboost.Rd +7312e97c37ebdd72799cd9064202bef5 *man/print.DIFboost.Rd +4ba7f97549ec926dc9e550f953ad9519 *man/simul.data.Rd diff --git a/NAMESPACE b/NAMESPACE old mode 100755 new mode 100644 diff --git a/R/DIFboost-internal.R b/R/DIFboost-internal.R old mode 100755 new mode 100644 diff --git a/R/DIFboost.R b/R/DIFboost.R old mode 100755 new mode 100644 index 5868bd4..15069aa --- a/R/DIFboost.R +++ b/R/DIFboost.R @@ -119,7 +119,7 @@ smp<- sample(1:P,floor(P/2)) # perform stability selection m2 <- stabsel(m1,q=q ,cutoff=cutoff, folds = folds, mc.cores=mc.cores) -# extract selected base learners/items +# extract selected base learners/items selected <- as.numeric(which(apply(m2$phat,1,max)>cutoff)) # extract selected columns from design matrix @@ -150,7 +150,8 @@ form2 <- as.formula(paste("~ ",paste("V",1:ncol(design.matrix),sep="",collapse=" m3 <- penalized(response=XP,unpenalized=form1,penalized=form2,lambda1=0,lambda2=0.0001,data=refit.data,model="logistic") # extract relevant estimates -coefs <- coef(m3) +#coefs <- coef(m3) +coefs <- m3@penalized theta.hat <- head(coefs,P) beta.hat <- coefs[(P+1):(P + I - 1)] diff --git a/R/print.DIFboost.R b/R/print.DIFboost.R old mode 100755 new mode 100644 diff --git a/data/simul.data.rda b/data/simul.data.rda old mode 100755 new mode 100644 index 9521a65a827ecb070fd7a195b79f45c566ad9885..9804474936ea96138119c3416f36736e9ef99390 GIT binary patch delta 1230 zcmV;<1Tp)k45ti`aRPJhk#k~yb;734)o;@Ek>Zi+apiGxQoO;^XCu-&A&uYvB@UKE zi%Wp_+J3@Dv~@%JJmciFxNP^i;?m}uE03eWUME*MS3FYtLdBJ~|Mo$BzIUEqZQi+((0!3xZ(qaBr`_jh z?cnV5wS%)e(C-mK<(rL!u9Jbpd1pzWKMa#BA9 z=(mE}rQKJAUauL>%Q^vF^33Zi_epw3^i-uT+Y#m3JF>~y=CRqs@uYG#JRCk(IahpK zTySv`dYz;XcDTle)-K8%q~GXh{`sgpOc%ZB zN+z^DR*bvbAweA%i?Rs{Ep9Ip8|`$21*qt)CqS*X5idPBI^VSug) z4?XRCy@w>7^;3OZ0m&)5zbp^&K-$q`*Eru@gEC4l8!7^$KzrF^(#^};ReRdEA;Y|H{O2#QLj^u|^;7qL>TR9=b7jCz392oe(%u;y41cO_k4juR4QVzc zWR6+Z3@vVwT*7f^`|}$)VEBGYoI*VlHIyt!tDTgO?mtvU zG+%xXwFNchj*{$x(u6gw;aN4PVnbT$%_0#hl@})IwqFNzbv6WyEl2vwD^lGw5z>#) zD4)hVAZ_HjcN@L5sB?*Rao{{Hsy{jZuS(}cXpbYC5ox|)#*dgT{?2c)gB zP%}Kc>cOT`XgDz0@4!_Tba8%JmXA*c=t8}U-+mT}3YrpRVec#i&4m@JHk&ZiC13iv z)LntJ#y2;sQVgi&*hJ$5nFLj?PSkw1?=X6yiy2p!=*hZ2Re3aY(|vlbmci8{_7 z@eF8P0-CS4YHyrQg2Hm2J8tKH4#I;&HvhD~bp*K8KQ`pyk;IcOi9Hb8+Yq zcet6C`(UV82DNFUbHzE?=U#2=5;dZIp{Sk~Oh7wqH=*?Z!iq|Ww6+RBED za}|prbN8ZK$n^vqEC2D3b4C+1o>-{2Z&N~t8f{B@KytFm%q$+u8{uc#oYYSN z>aC!5Y5R)M>ovo9xlcfsJoEa>eUjc0Jyog8c0{@Mj%;$ad2IG@JgJ-w4~NfH&J`aQ z7hIf#UMH!49j@`AwaYiJLdS(PAHDkoRr$@@3XU>p_%JGPzkfa|57R|&x{?WPj}_zY zc1Tdi#iC^wY((Bx%(GdOhZVv7B8O`}&VJAu=V&$eOctu|n%)rZbr_&)!b49xU+*DF zXZ=(kS3q*g?k~$jJdk$u*fq{~*Px8j%Z7@;D9~Pi_Ly`tavl0@yk>QKNFsEFOVytC zZOAb18~^zW>`;M^UH#O(pL$!T|6CccQ-W#>r?htl2g9GL+oKYfPD7dv37KP-HA9P= zBv|cUCnr7Uc}z-?-}cGN|9NH0bn< zF;I7ZEjee0?il2W0+T!A6OcYY@BaKo4j8_l5~onlL=7bi(rPE=qx%n)5zUw1Lv2A# zxuYbzpfq7kYj{=-s@Ra0db3D`O67$~y6x9NU7Za9W6P1g@`_Y9O@#C#G|H#(4oDlh z?%hT&E$UoiT^u-1i|S9#|EtnD5!xdRFWkO=a)-L+Gqsmw@Jf z>#f=wr<0(t+~ZykZMq{jUdrO%^WrLFps%jT?h~p*>|moP1~|bf!5)rAKLA^^<4zd-ViR2?p^e&Go#(7MO{J^CVdmv)qVX7V23@-X(|8!iB5bi diff --git a/man/DIFboost-package.Rd b/man/DIFboost-package.Rd old mode 100755 new mode 100644 index 78fb9fb..b45a6f5 --- a/man/DIFboost-package.Rd +++ b/man/DIFboost-package.Rd @@ -16,7 +16,7 @@ Gunther Schauberger\cr \url{http://www.statistik.lmu.de/~schauberger/} } \references{ -Schauberger, Gunther and Tutz, Gerhard (2015): \emph{Detection of Differential Item Functioning in Rasch Models by Boosting Techniques}, British Journal of Mathematical and Statistical Psychology, published online +Schauberger, Gunther and Tutz, Gerhard (2016): \emph{Detection of Differential Item Functioning in Rasch Models by Boosting Techniques}, British Journal of Mathematical and Statistical Psychology, 69(1), 80 - 103 } \seealso{ \code{\link{DIFboost}}, \code{\link{print.DIFboost}} diff --git a/man/DIFboost.Rd b/man/DIFboost.Rd old mode 100755 new mode 100644 index 5158e3d..0f11096 --- a/man/DIFboost.Rd +++ b/man/DIFboost.Rd @@ -62,7 +62,7 @@ The method assumes the DIFmodel from Tutz and Schauberger (2015) where boosting \item{cutoff}{cutoff value used for stability selection} } \references{ -Schauberger, Gunther and Tutz, Gerhard (2015): \emph{Detection of Differential Item Functioning in Rasch Models by Boosting Techniques}, British Journal of Mathematical and Statistical Psychology, published online +Schauberger, Gunther and Tutz, Gerhard (2016): \emph{Detection of Differential Item Functioning in Rasch Models by Boosting Techniques}, British Journal of Mathematical and Statistical Psychology, 69(1), 80 - 103 } \author{ Gunther Schauberger\cr diff --git a/man/print.DIFboost.Rd b/man/print.DIFboost.Rd old mode 100755 new mode 100644 index f544f2b..cddc48d --- a/man/print.DIFboost.Rd +++ b/man/print.DIFboost.Rd @@ -20,7 +20,7 @@ Further arguments to be passed to the \code{\link[base:print]{print}} function. } \references{ -Schauberger, Gunther and Tutz, Gerhard (2015): \emph{Detection of Differential Item Functioning in Rasch Models by Boosting Techniques}, British Journal of Mathematical and Statistical Psychology, published online +Schauberger, Gunther and Tutz, Gerhard (2016): \emph{Detection of Differential Item Functioning in Rasch Models by Boosting Techniques}, British Journal of Mathematical and Statistical Psychology, 69(1), 80 - 103 } \author{ Gunther Schauberger\cr diff --git a/man/simul.data.Rd b/man/simul.data.Rd old mode 100755 new mode 100644 index e049bb7..090ed74 --- a/man/simul.data.Rd +++ b/man/simul.data.Rd @@ -25,7 +25,7 @@ Simulated data set with 100 persons, 10 items and 3 (standardized) covariates. I } } \references{ -Schauberger, Gunther and Tutz, Gerhard (2015): \emph{Detection of Differential Item Functioning in Rasch Models by Boosting Techniques}, British Journal of Mathematical and Statistical Psychology, published online +Schauberger, Gunther and Tutz, Gerhard (2016): \emph{Detection of Differential Item Functioning in Rasch Models by Boosting Techniques}, British Journal of Mathematical and Statistical Psychology, 69(1), 80 - 103 } \author{ Gunther Schauberger\cr