X-Git-Url: http://iramuteq.org/git?p=iramuteq;a=blobdiff_plain;f=Rscripts%2Fchdfunct.R;h=5e31442000e0d9e26021271ddeec8589fa10640f;hp=a2dc502e3bf2c5bf161af037ec1554163abe724a;hb=4f2dc8e6823ac5886f758a6ad3f1ae6acb01916c;hpb=7fb5b2b86f6c9a0617208ee85211177c23d12f47

diff --git a/Rscripts/chdfunct.R b/Rscripts/chdfunct.R
index a2dc502..5e31442 100644
--- a/Rscripts/chdfunct.R
+++ b/Rscripts/chdfunct.R
@@ -294,8 +294,8 @@ AsLexico2<- function(mat, chip = FALSE) {
 }
 
 make.spec.hypergeo <- function(mat) {
-    library(textometrieR)
-    spec <- specificites(mat)
+    library(textometry)
+    spec <- specificities(mat)
 	sumcol<-colSums(mat)
     eff_relatif<-round(t(apply(mat,1,function(x) {(x/t(as.matrix(sumcol))*1000)})),2)
     colnames(eff_relatif) <- colnames(mat)