minor synthax changes

.Rbuildignore

@@ -7,3 +7,4 @@
 ^manual$
 ^CRAN-SUBMISSION$
 ^.github$
+^MoNAn_logo\.png$

DESCRIPTION

@@ -7,7 +7,7 @@ Authors@R: c(person("Per", "Block", role = c("cre", "aut", "cph"), email = "bloc
         comment = c(ORCID = "0000-0002-7583-2392")), 
     person("Christoph", "Stadtfeld", role = "aut", comment = c(ORCID = "0000-0002-2704-2134")),
     person("Nico", "Keiser", role = "aut", comment = c(ORCID = "0009-0007-3403-278X")),
-    person("Marion", "Hoffman", role = "aut", comment = c(ORCID = 0000-0002-0741-7760)))
+    person("Marion", "Hoffman", role = "aut", comment = c(ORCID = "0000-0002-0741-7760")))
 Description: Implements the method to analyse weighted mobility networks or distribution networks as outlined in: 
     Block, P., Stadtfeld, C., & Robins, G. (2022) <doi:10.1016/j.socnet.2021.08.003>. 
     The purpose of the model is to analyse the structure of mobility, 

R/2f_effectFunctions_endogenousCovariateBased.R

@@ -546,7 +546,7 @@ avoiding_dissimilar_covar_cont <- function(dep.var = 1,
 
 
 
-#' associativity_all_GW_covar_bin
+#' associativity_all_AC_covar_bin
 #' 
 #' Do individuals with the same attribute tend to use the same paths and 
 #' individuals with different attributes to move to different places? 
@@ -564,19 +564,21 @@ avoiding_dissimilar_covar_cont <- function(dep.var = 1,
 #' @param edge 
 #' @param update 
 #' @param getTargetContribution 
+#' @param alpha 
 #'
 #' @return Returns the change statistic or target statistic of the effect for 
 #' internal use by the estimation algorithm. 
 #' @keywords internal
-associativity_all_GW_covar_bin <- function(dep.var = 1, 
+associativity_all_AC_covar_bin <- function(dep.var = 1, 
                                        resource.attribute.index,
                                        state, 
                                        cache, 
                                        i, 
                                        j, 
                                        edge, 
                                        update, 
-                                       getTargetContribution = FALSE){
+                                       getTargetContribution = FALSE,
+                                       alpha = 2){
 
   nResources <- cache[[dep.var]]$valuedNetwork[i, j]
   nResources_1 <- cache[[dep.var]]$resourceNetworks[[resource.attribute.index]][i, j]
@@ -629,7 +631,7 @@ associativity_all_GW_covar_bin <- function(dep.var = 1,
 }
 
 
-#' associativity_one_GW_covar_bin
+#' associativity_one_AC_covar_bin
 #' 
 #' Do individuals with the same attribute tend to use the same paths and 
 #' individuals with different attributes to move to different places? 
@@ -647,19 +649,21 @@ associativity_all_GW_covar_bin <- function(dep.var = 1,
 #' @param edge 
 #' @param update 
 #' @param getTargetContribution 
+#' @param alpha 
 #'
 #' @return Returns the change statistic or target statistic of the effect for 
 #' internal use by the estimation algorithm. 
 #' @keywords internal
-associativity_one_GW_covar_bin <- function(dep.var = 1, 
+associativity_one_AC_covar_bin <- function(dep.var = 1, 
                                            resource.attribute.index,
                                            state, 
                                            cache, 
                                            i, 
                                            j, 
                                            edge, 
                                            update, 
-                                           getTargetContribution = FALSE){
+                                           getTargetContribution = FALSE,
+                                           alpha = 2){
 
   nResources <- cache[[dep.var]]$valuedNetwork[i, j]
   nResources_1 <- cache[[dep.var]]$resourceNetworks[[resource.attribute.index]][i, j]