# ============================================================
# FFCWS: Admixture Regression Analysis — HISPANIC SAMPLE
# Supplementary Notebook
# City-Weighted, HC1 Robust SEs
#
# PC Interpretation (based on group means, SIRE correlations,
# and PGS associations):
#
# PC1H: African ancestry contrast (r = +.57 NHB, r = -.51 Mexican)
#    Separates Mexican from PR by African ancestry, not Amerindian
#
# PC2H: European vs non-European, European higher (r = +.42 NHW)
#
# PC3H: Non-European vs European, European lower (r = -.43 NHW)
#
# Critical limitations:
#
#  1. Overparameterization. In a 3-population system (European,
#     African, Amerindian), only 2 axes are independent. The 3 PCs
#     are orthogonal in the full reference panel (which includes
#     NHW and NHB) but become highly collinear within the Hispanic
#     analytic sample (PC2H x PC3H = -0.72 in HHA). In a 2-PC
#     model, each coefficient represents a contrast holding the
#     other two constant, producing difficult to interpret residuals.
#
#  2. No clean Amerindian-vs-European axis. Unlike Add Health,
#     where PCA was computed on Hispanics only and yielded an
#     Amerindian PC (r = +0.64 with Mexican, r = -0.48 with PR,
#     validated by WHR PGS at R2 = .39), the FFCWS PCA included
#     NHW and NHB in the reference panel, causing the African-
#     European contrast to dominate. No FFCWS PC cleanly separates
#     Amerindian from European ancestry. PC2H and PC3H both capture
#     European contrasts but do not distinguish African from
#     Amerindian on the non-European side.
#
#  3. Ambiguous single-PC models. We report single-PC models to
#     avoid the collinearity problem, but interpretation remains
#     ambiguous. PC2H (European vs African) conflates Amerindian
#     with African on the non-European end. PC3H (non-European vs
#     European) conflates African with Amerindian on the non-
#     European end. Neither isolates a pure ancestry effect.
#
#  4. Ambiguous double-PC models. We report double-PC models to
#     allow for interpretation of PC3. In this case, PC3 become the effect of European-African_Amerindian, controlling for the Effect of 
#     African_Europen, which isolates the Amerindian Effect. However, PC2 becomes ambigious: The effect of African_Europen ancestry
#     controlling for the effect of European_African_Amerindian ancestry. We end up removing African ancestry Effect.
#
# 5. Single combined-European_PC model. We report combined-European_PC model, where this is created by adding PC2 and reverse coded PC3. 
#    This gives the joint effect of European ancestry on outcomes, but does not allow isolation of which this is due to African or Amerindian ancestry
#    This also assumes equal weights for both PCs
#
# Upshot: In this sample, we cannot isolate either a pure African
# or a pure Amerindian ancestry effect on cognitive outcomes.
# Results are presented for transparency but should be interpreted
# with these limitations in mind.
#
# Measurement Invariance:
#  Metric invariance holds (ΔCFI < .01 in all analyses).
#  Scalar invariance FAILS (ΔCFI = -.013 to -.022).
#  Child g composite dropped due to scalar invariance failure.
#
# Results are reported in this supplementary notebook only.
# ============================================================

# ============================================================

library(haven)
library(dplyr)
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
library(sandwich)
library(lmtest)
## Loading required package: zoo
## 
## Attaching package: 'zoo'
## The following objects are masked from 'package:base':
## 
##     as.Date, as.Date.numeric
library(mice)
## 
## Attaching package: 'mice'
## The following object is masked from 'package:stats':
## 
##     filter
## The following objects are masked from 'package:base':
## 
##     cbind, rbind
library(sirt)
## Warning: package 'sirt' was built under R version 4.5.3
## - sirt 4.2-133 (2025-09-27 12:57:51)
library(lavaan)
## This is lavaan 0.6-19
## lavaan is FREE software! Please report any bugs.
library(mgcv)
## Loading required package: nlme
## 
## Attaching package: 'nlme'
## The following object is masked from 'package:dplyr':
## 
##     collapse
## This is mgcv 1.9-3. For overview type 'help("mgcv-package")'.
## 
## Attaching package: 'mgcv'
## The following object is masked from 'package:sirt':
## 
##     rmvn
library(mediation)
## Warning: package 'mediation' was built under R version 4.5.2
## Loading required package: MASS
## 
## Attaching package: 'MASS'
## The following object is masked from 'package:dplyr':
## 
##     select
## Loading required package: Matrix
## Loading required package: mvtnorm
## mediation: Causal Mediation Analysis
## Version: 4.5.1
# ==============================================================
# H1. Load Data
# ==============================================================

d <- read_sav("C:/Users/mh198/Documents/Data/FFCWS/DS0001/31622-0001-Data.sav")
PGS <- read_sav("C:/Users/mh198/Documents/Data/FFCWS/DS0007/31622-0007-Data.sav")

d <- merge(d, PGS[, c("IDNUM", "K5ADMIXH", paste0("K5PC", 1:5, "H"))],
           by = "IDNUM", all.x = TRUE)

# ==============================================================
# H2. Hispanic Ancestry PGS Sample
# ==============================================================

d <- d[d$K5ADMIXH %in% c(0, 1), ]
cat("Hispanic PGS sample: N =", nrow(d), "\n")
## Hispanic PGS sample: N = 959
# ==============================================================
# H3. Hispanic Parent Identification
# ==============================================================

d$father_hisp_nh <- d$CF1ETHRACE == 3
d$mother_hisp_nh <- d$CM1ETHRACE == 3

d$father_hisp_black <- (d$CF1ETHRACE == 2) & (d$F1H3A == 1)
d$mother_hisp_black <- (d$CM1ETHRACE == 2) & (d$M1H3A == 1)
d$father_hisp_black[is.na(d$father_hisp_black)] <- FALSE
d$mother_hisp_black[is.na(d$mother_hisp_black)] <- FALSE

d$father_any_hisp <- d$father_hisp_nh | d$father_hisp_black
d$mother_any_hisp <- d$mother_hisp_nh | d$mother_hisp_black
d$any_hisp_parent <- d$father_any_hisp | d$mother_any_hisp

# ==============================================================
# H4. Sub-Saharan African Origin Exclusion
# ==============================================================

d$mother_african_born <- (d$M1H2 == 2) & (d$M1H2B == 1)
d$father_african_born <- (d$F1H2 == 2) & (d$F1H2B == 1)
d$mother_african_born[is.na(d$mother_african_born)] <- FALSE
d$father_african_born[is.na(d$father_african_born)] <- FALSE

d$gp_african <- (d$F3H1A == 101) | (d$F3H1B == 101) |
                (d$M3H1A == 101) | (d$M3H1B == 101)
d$gp_african[is.na(d$gp_african)] <- FALSE

d$african_origin <- d$mother_african_born | d$father_african_born | d$gp_african
cat("Sub-Saharan African origin cases:", sum(d$african_origin), "\n")
## Sub-Saharan African origin cases: 2
# ==============================================================
# H5. Hispanic Subgroup (M1H3B / F1H3B)
# ==============================================================
# 1=Mexican, 2=Puerto Rican, 3=Cuban, 4=Other Hispanic,
# 101=Central Am/Caribbean, 102=South America, 103=Spain/European

d$hisp_eth <- NA_character_
d$hisp_eth[d$M1H3B == 1] <- "Mexican"
d$hisp_eth[d$M1H3B == 2] <- "PuertoRican"
d$hisp_eth[d$M1H3B == 3] <- "Cuban"
d$hisp_eth[d$M1H3B %in% c(4, 101, 102, 103)] <- "OtherHisp"
d$hisp_eth[is.na(d$hisp_eth) & d$F1H3B == 1] <- "Mexican"
d$hisp_eth[is.na(d$hisp_eth) & d$F1H3B == 2] <- "PuertoRican"
d$hisp_eth[is.na(d$hisp_eth) & d$F1H3B == 3] <- "Cuban"
d$hisp_eth[is.na(d$hisp_eth) & d$F1H3B %in% c(4, 101, 102, 103)] <- "OtherHisp"
d$hisp_eth[is.na(d$hisp_eth)] <- "Unknown"
d$hisp_eth <- factor(d$hisp_eth, levels = c("Mexican", "PuertoRican", "Cuban", "OtherHisp", "Unknown"))

cat("\nHispanic subgroup distribution:\n")
## 
## Hispanic subgroup distribution:
print(table(d$hisp_eth, useNA = "ifany"))
## 
##     Mexican PuertoRican       Cuban   OtherHisp     Unknown 
##         501         101           6         197         154
# ==============================================================
# H6. Generation & Couple Type
# ==============================================================

d$parent_fb <- (d$M1H2 == 2) | (d$F1H2 == 2)
d$parent_fb[is.na(d$parent_fb)] <- FALSE

d$gp_fb <- (d$F3H1A >= 101) | (d$F3H1B >= 101) |
  (d$M3H1A >= 101) | (d$M3H1B >= 101)
d$gp_fb[is.na(d$gp_fb)] <- FALSE

d$gen_2nd <- d$parent_fb
d$gen_3rd <- (!d$parent_fb) & d$gp_fb

# Generic couple type: both Hispanic vs one Hispanic parent
# Indexes acculturation/integration rather than specific
# non-Hispanic parent ancestry, avoiding suppression of
# PC ancestry variation within couple types.
d$mixed_h <- as.numeric(d$any_hisp_parent &
                          !(d$father_any_hisp & d$mother_any_hisp))

cat("\nCouple type:\n")
## 
## Couple type:
cat(sprintf("  Both Hispanic (HH): %d\n", sum(d$any_hisp_parent & !d$mixed_h, na.rm = TRUE)))
##   Both Hispanic (HH): 640
cat(sprintf("  One Hispanic (mixed): %d\n", sum(d$mixed_h, na.rm = TRUE)))
##   One Hispanic (mixed): 207
# ==============================================================
# H7. Child TVIP Exclusion Flag
# ==============================================================

d$ch_tvip3_score <- ifelse(d$CH3TVIPSTD >= 0, d$CH3TVIPSTD, NA)
d$took_tvip3 <- as.numeric(!is.na(d$ch_tvip3_score))
cat("\nChild TVIP at age 3:", sum(d$took_tvip3), "cases flagged for exclusion\n")
## 
## Child TVIP at age 3: 120 cases flagged for exclusion
# ==============================================================
# H8. Child Cognitive Variables
# ==============================================================
# g composite NOT constructed — scalar invariance fails.
# Individual test z-scores and DS_z retained.

d$sex <- ifelse(d$CM1BSEX %in% c(1, 2), d$CM1BSEX - 1, NA)
d$age <- ifelse(d$CH5AGEM >= 0, d$CH5AGEM, NA)

d$PPVT <- ifelse(d$CH5PPVTSS >= 0, d$CH5PPVTSS, NA)
d$WJ9  <- ifelse(d$CH5WJ9SS >= 0, d$CH5WJ9SS, NA)
d$WJ10 <- ifelse(d$CH5WJ10SS >= 0, d$CH5WJ10SS, NA)
d$DS   <- ifelse(d$CH5DSSS >= 0, d$CH5DSSS, NA)

resid_fun_gam <- function(y, data) {
  fit <- gam(y ~ s(age, k = 5) + sex, data = data, na.action = na.exclude, method = "REML")
  as.vector(residuals(fit))
}

d$PPVT_r <- resid_fun_gam(d$PPVT, d)
d$WJ9_r  <- resid_fun_gam(d$WJ9, d)
d$WJ10_r <- resid_fun_gam(d$WJ10, d)
d$DS_r   <- resid_fun_gam(d$DS, d)

d$PPVT_z <- as.vector(scale(d$PPVT_r))
d$WJ9_z  <- as.vector(scale(d$WJ9_r))
d$WJ10_z <- as.vector(scale(d$WJ10_r))
d$DS_z   <- as.vector(scale(d$DS_r))

# ==============================================================
# H9. Parental WAIS: Conservative USB + English Filter
# ==============================================================

d$mother_wais_raw <- ifelse(d$CM3COGSC >= 0 & d$CM3COGSC <= 15, d$CM3COGSC, NA)
d$father_wais_raw <- ifelse(d$CF3COGSC >= 0 & d$CF3COGSC <= 15, d$CF3COGSC, NA)

d$mother_confirmed_fb   <- as.numeric(d$M1H2B %in% c(1, 2, 3, 4, 5))
d$father_confirmed_fb   <- as.numeric(d$F1H2B %in% c(1, 2, 3, 4, 5))
d$mother_confirmed_span <- as.numeric(d$CM3SPAN == 1)
d$father_confirmed_span <- as.numeric(d$CF3SPAN == 1)

d$mother_wais <- ifelse(d$mother_confirmed_fb == 1 | d$mother_confirmed_span == 1,
                        NA, d$mother_wais_raw)
d$father_wais <- ifelse(d$father_confirmed_fb == 1 | d$father_confirmed_span == 1,
                        NA, d$father_wais_raw)

cat("\nMother WAIS: total =", sum(!is.na(d$mother_wais_raw)),
    ", after filter =", sum(!is.na(d$mother_wais)),
    ", dropped =", sum(!is.na(d$mother_wais_raw)) - sum(!is.na(d$mother_wais)), "\n")
## 
## Mother WAIS: total = 861 , after filter = 542 , dropped = 319
cat("Father WAIS: total =", sum(!is.na(d$father_wais_raw)),
    ", after filter =", sum(!is.na(d$father_wais)),
    ", dropped =", sum(!is.na(d$father_wais_raw)) - sum(!is.na(d$father_wais)), "\n")
## Father WAIS: total = 765 , after filter = 480 , dropped = 285
d$mother_age <- ifelse(d$CM3AGE > 0, d$CM3AGE, NA)
d$father_age <- ifelse(d$CF3AGE > 0, d$CF3AGE, NA)

m_mask <- !is.na(d$mother_wais) & !is.na(d$mother_age)
if (sum(m_mask) > 10) {
  d$mother_age_c  <- d$mother_age - mean(d$mother_age[m_mask])
  d$mother_age_c2 <- d$mother_age_c^2
  d$M_WAIS_res <- NA_real_
  d$M_WAIS_res[m_mask] <- residuals(lm(mother_wais ~ mother_age_c + mother_age_c2,
                                        data = d[m_mask, ]))
}

f_mask <- !is.na(d$father_wais) & !is.na(d$father_age)
if (sum(f_mask) > 10) {
  d$father_age_c  <- d$father_age - mean(d$father_age[f_mask])
  d$father_age_c2 <- d$father_age_c^2
  d$F_WAIS_res <- NA_real_
  d$F_WAIS_res[f_mask] <- residuals(lm(father_wais ~ father_age_c + father_age_c2,
                                        data = d[f_mask, ]))
}

d$ave_WAIS_raw <- rowMeans(cbind(d$M_WAIS_res, d$F_WAIS_res), na.rm = TRUE)
d$ave_WAIS_raw[is.na(d$M_WAIS_res) & is.na(d$F_WAIS_res)] <- NA

cat("Average WAIS (filtered): N =", sum(!is.na(d$ave_WAIS_raw)), "\n")
## Average WAIS (filtered): N = 603
# ==============================================================
# H10. Demographics & SES (3-component)
# ==============================================================

d$single <- ifelse(d$CM1MARF == 0 & d$CM1COHF == 0, 1,
                   ifelse(d$CM1MARF %in% c(0, 1) & d$CM1COHF %in% c(0, 1), 0, NA))

d$M_edu <- NA
for (col in c("CM5EDU", "CM4EDU", "CM3EDU", "CM2EDU", "CM1EDU")) {
  d$M_edu <- ifelse(is.na(d$M_edu) & d[[col]] >= 1, d[[col]], d$M_edu)
}
d$F_edu <- NA
for (col in c("CF5EDU", "CF4EDU", "CF3EDU", "CF2EDU", "CF1EDU")) {
  d$F_edu <- ifelse(is.na(d$F_edu) & d[[col]] >= 1, d[[col]], d$F_edu)
}
d$mid_edu <- rowMeans(cbind(d$F_edu, d$M_edu), na.rm = TRUE)
d$mid_edu[is.na(d$F_edu) & is.na(d$M_edu)] <- NA

d$pov_bl  <- ifelse(d$CM1INPOV >= 0, d$CM1INPOV, NA)
d$pov_yr1 <- ifelse(d$CM2POVCO >= 0, d$CM2POVCO, NA)
d$pov_yr3 <- ifelse(d$CM3POVCO >= 0, d$CM3POVCO, NA)
d$pov_yr5 <- ifelse(d$CM4POVCO >= 0, d$CM4POVCO, NA)
d$pov_yr9 <- ifelse(d$CM5POVCO >= 0, d$CM5POVCO, NA)
d$ave_pov <- rowMeans(cbind(d$pov_bl, d$pov_yr1, d$pov_yr3, d$pov_yr5, d$pov_yr9), na.rm = TRUE)
d$ave_pov[is.na(d$pov_bl) & is.na(d$pov_yr1) & is.na(d$pov_yr3) & is.na(d$pov_yr5) & is.na(d$pov_yr9)] <- NA

inc_vars <- c("CM1HHINC", "CM2HHINC", "CM3HHINC", "CM4HHINC", "CM5HHINC")
inc_names <- c("inc_bl", "inc_yr1", "inc_yr3", "inc_yr5", "inc_yr9")
for (i in seq_along(inc_vars)) {
  d[[inc_names[i]]] <- ifelse(d[[inc_vars[i]]] >= 0, d[[inc_vars[i]]], NA)
  d[[paste0("log_", inc_names[i])]] <- log(pmax(d[[inc_names[i]]], 1))
}
d$ave_log_inc <- rowMeans(d[, paste0("log_", inc_names)], na.rm = TRUE)
d$ave_log_inc[rowSums(!is.na(d[, inc_names])) == 0] <- NA

ses_indicators <- data.frame(
  mid_edu     = as.vector(scale(d$mid_edu)),
  ave_pov     = as.vector(scale(d$ave_pov)),
  ave_log_inc = as.vector(scale(d$ave_log_inc))
)
n_ses_valid <- rowSums(!is.na(ses_indicators))
set.seed(54321)
ses_imp <- mice(ses_indicators, m = 5, method = "pmm", maxit = 10, printFlag = FALSE)
ses_imputed <- complete(ses_imp, action = 1)
d$SES_raw <- rowMeans(ses_imputed, na.rm = FALSE)
d$SES_raw[n_ses_valid == 0] <- NA

d$wt <- ifelse(d$K5CITYWT > 0, d$K5CITYWT, NA)

# ==============================================================
# H11. Standardize Ancestry PCs (neutral labels)
# ==============================================================
# Labels kept as PC1H, PC2H, PC3H — see header for interpretation.

d$PC1H_z <- as.vector(scale(d$K5PC1H))
d$PC2H_z <- as.vector(scale(d$K5PC2H))
d$PC3H_z <- as.vector(scale(d$K5PC3H))

# ==============================================================
# H12. Build Subsets
# ==============================================================

d <- d[d$took_tvip3 == 0, ]
cat("After TVIP exclusion: N =", nrow(d), "\n")
## After TVIP exclusion: N = 839
d_hpa <- d[d$any_hisp_parent & !d$african_origin, ]

d_hpa$mother_hisp_sire <- as.numeric(d_hpa$CM1ETHRACE == 3)
d_hpa$father_hisp_sire <- as.numeric(d_hpa$CF1ETHRACE == 3)

d_hpa_noHW <- d_hpa[d_hpa$mixed_h != 1, ]

d_hha <- d[d$CF1ETHRACE == 3 & d$CM1ETHRACE == 3 & !d$african_origin, ]

cat("HPA:", nrow(d_hpa), " | HPA excl HW:", nrow(d_hpa_noHW), " | HHA:", nrow(d_hha), "\n")
## HPA: 727  | HPA excl HW: 521  | HHA: 521
# ==============================================================
# H12b. Fractional Race Coding (HHA sample)
# ==============================================================
# M1H3/F1H3: Race within Hispanic
# 1=White, 2=Black, 3=Asian, 4=American Indian, 5=Other
# Each parent contributes 0.5 to their racial category.
# White = reference (absorbed into intercept).

recode_race <- function(x) {
  ifelse(x == 1, "White",
  ifelse(x == 2, "Black",
  ifelse(x == 4, "AmInd",
  ifelse(x %in% c(3, 5), "Other", NA_character_))))
}

d_hha$m_race <- recode_race(d_hha$M1H3)
d_hha$f_race <- recode_race(d_hha$F1H3)

d_hha$frac_black <- 0
d_hha$frac_amind <- 0
d_hha$frac_other <- 0
d_hha$frac_unk   <- 0

for (i in 1:nrow(d_hha)) {
  mr <- d_hha$m_race[i]
  fr <- d_hha$f_race[i]
  n_known <- sum(!is.na(c(mr, fr)))

  if (n_known == 0) {
    d_hha$frac_unk[i] <- 1.0
    next
  }

  for (parent_race in na.omit(c(mr, fr))) {
    w <- ifelse(n_known == 2, 0.5, 1.0)
    if (parent_race == "Black")  d_hha$frac_black[i] <- d_hha$frac_black[i] + w
    if (parent_race == "AmInd")  d_hha$frac_amind[i] <- d_hha$frac_amind[i] + w
    if (parent_race == "Other")  d_hha$frac_other[i] <- d_hha$frac_other[i] + w
  }
}

cat("\nFractional race composition (HHA):\n")
## 
## Fractional race composition (HHA):
cat(sprintf("  White (ref): %.1f\n", nrow(d_hha) - sum(d_hha$frac_black + d_hha$frac_amind + d_hha$frac_other + d_hha$frac_unk)))
##   White (ref): 179.5
cat(sprintf("  Black:       %.1f\n", sum(d_hha$frac_black)))
##   Black:       7.5
cat(sprintf("  AmInd:       %.1f\n", sum(d_hha$frac_amind)))
##   AmInd:       78.0
cat(sprintf("  Other:       %.1f\n", sum(d_hha$frac_other)))
##   Other:       235.0
cat(sprintf("  Unknown:     %.1f\n", sum(d_hha$frac_unk)))
##   Unknown:     21.0
# ==============================================================
# H13. Helper: WLS with Within-Model Standardization
# ==============================================================

run_model_h <- function(formula, data, label) {
  all_vars <- all.vars(formula)

var_map <- c(
  "PC1H_z"              = "K5PC1H",
  "PC2H_z"              = "K5PC2H",
  "PC3H_z"              = "K5PC3H",
  "PC_EUR_composite"    = "PC_EUR_composite",
  "age_c"               = "age",
  "ave_WAIS_res_z"      = "ave_WAIS_raw",
  "M_WAIS_z"            = "M_WAIS_res",
  "F_WAIS_z"            = "F_WAIS_res",
  "SES"                 = "SES_raw"
)

  raw_vars <- all_vars
  for (i in seq_along(raw_vars)) {
    if (raw_vars[i] %in% names(var_map)) {
      raw_vars[i] <- var_map[raw_vars[i]]
    }
  }

  d_complete <- data[complete.cases(data[, raw_vars]) & !is.na(data$wt), ]

  if ("PC1H_z" %in% all_vars) d_complete$PC1H_z <- as.vector(scale(d_complete$K5PC1H))
  if ("PC2H_z" %in% all_vars) d_complete$PC2H_z <- as.vector(scale(d_complete$K5PC2H))
  if ("PC3H_z" %in% all_vars) d_complete$PC3H_z <- as.vector(scale(d_complete$K5PC3H))
  if ("age_c" %in% all_vars)          d_complete$age_c          <- as.vector(scale(d_complete$age))
  if ("ave_WAIS_res_z" %in% all_vars) d_complete$ave_WAIS_res_z <- as.vector(scale(d_complete$ave_WAIS_raw))
  if ("M_WAIS_z" %in% all_vars)       d_complete$M_WAIS_z       <- as.vector(scale(d_complete$M_WAIS_res))
  if ("F_WAIS_z" %in% all_vars)       d_complete$F_WAIS_z       <- as.vector(scale(d_complete$F_WAIS_res))
  if ("SES" %in% all_vars)            d_complete$SES            <- as.vector(scale(d_complete$SES_raw))

  for (v in c("PPVT", "WJ9", "WJ10")) {
    if (v %in% all_vars && v %in% names(d_complete)) {
      d_complete[[v]] <- as.vector(scale(d_complete[[v]]))
    }
  }

  model <- lm(formula, data = d_complete, weights = wt)
  robust <- coeftest(model, vcov = vcovHC(model, type = "HC1"))

  cat("\n", paste(rep("=", 80), collapse = ""), "\n")
  cat(label, "\n")
  cat("R2 =", round(summary(model)$r.squared, 4),
      " Adj-R2 =", round(summary(model)$adj.r.squared, 4), "\n")
  cat(paste(rep("=", 80), collapse = ""), "\n")
  cat(sprintf("%20s  %9s  %8s  %8s  %10s\n", "Variable", "B", "SE", "t", "p"))
  cat(paste(rep("-", 60), collapse = ""), "\n")

  for (i in 1:nrow(robust)) {
    var_name <- rownames(robust)[i]
    b  <- robust[i, 1]; se <- robust[i, 2]; t  <- robust[i, 3]; p  <- robust[i, 4]
    p_str <- ifelse(p >= 0.0001, sprintf("%.4f", p), sprintf("%.2e", p))
    cat(sprintf("%20s  %+9.4f  %8.4f  %+8.3f  %10s\n", var_name, b, se, t, p_str))
  }
  cat("N =", nrow(d_complete), "\n")
  invisible(model)
}

# ==============================================================
# H14. SUPPLEMENTAL: PC Structure Diagnostics
# ==============================================================

cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("SUPPLEMENTAL: Hispanic PCA Diagnostics\n")
## SUPPLEMENTAL: Hispanic PCA Diagnostics
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
d$any_black <- as.numeric((d$CF1ETHRACE == 2) | (d$CM1ETHRACE == 2))
d$any_white <- as.numeric((d$CF1ETHRACE == 1) | (d$CM1ETHRACE == 1))
d$both_hisp_flag <- as.numeric(d$CF1ETHRACE == 3 & d$CM1ETHRACE == 3)

cat("\nTable S-H1: PC Correlations with Parental Race (N =", nrow(d), ")\n")
## 
## Table S-H1: PC Correlations with Parental Race (N = 839 )
cat(sprintf("%-10s %12s %12s %12s\n", "PC", "r(NHB)", "r(NHW)", "r(Both Hisp)"))
## PC               r(NHB)       r(NHW) r(Both Hisp)
cat(paste(rep("-", 50), collapse = ""), "\n")
## --------------------------------------------------
for (i in 1:5) {
  pc_var <- paste0("K5PC", i, "H")
  r_b <- cor(d[[pc_var]], d$any_black, use = "complete.obs")
  r_w <- cor(d[[pc_var]], d$any_white, use = "complete.obs")
  r_h <- cor(d[[pc_var]], d$both_hisp_flag, use = "complete.obs")
  cat(sprintf("%-10s %+12.4f %+12.4f %+12.4f\n", pc_var, r_b, r_w, r_h))
}
## K5PC1H          +0.5660      +0.0946      -0.4447
## K5PC2H          -0.3323      +0.4712      +0.0936
## K5PC3H          +0.3215      -0.3941      +0.4255
## K5PC4H          +0.0121      -0.0892      -0.1004
## K5PC5H          -0.2068      -0.1265      +0.2046
d$pc_group <- NA_character_
d$pc_group[d$CF1ETHRACE == 1 & d$CM1ETHRACE == 1] <- "Both NHW"
d$pc_group[d$CF1ETHRACE == 2 & d$CM1ETHRACE == 2] <- "Both NHB"
d$pc_group[d$M1H3B == 1 & d$F1H3B == 1] <- "Both Mexican"
d$pc_group[d$M1H3B == 2 & d$F1H3B == 2] <- "Both PR"
d$pc_group[d$CF1ETHRACE == 3 & d$CM1ETHRACE == 3 & is.na(d$pc_group)] <- "Both Hisp (other)"
d$pc_group[(d$CM1ETHRACE == 3 & d$CF1ETHRACE == 1) |
           (d$CF1ETHRACE == 3 & d$CM1ETHRACE == 1)] <- "Hisp x NHW"
d$pc_group[(d$CM1ETHRACE == 3 & d$CF1ETHRACE == 2) |
           (d$CF1ETHRACE == 3 & d$CM1ETHRACE == 2)] <- "Hisp x NHB"
d$pc_group[is.na(d$pc_group)] <- "Other"

grp_order <- c("Both NHW", "Both NHB", "Hisp x NHW", "Hisp x NHB",
               "Both Mexican", "Both PR", "Both Hisp (other)", "Other")

cat("\nTable S-H2: Mean PC Scores by Parental Race/Ethnicity\n")
## 
## Table S-H2: Mean PC Scores by Parental Race/Ethnicity
cat(sprintf("%-22s %5s", "Group", "N"))
## Group                      N
for (i in 1:5) cat(sprintf(" %9s", paste0("PC", i, "H")))
##       PC1H      PC2H      PC3H      PC4H      PC5H
cat("\n")
cat(paste(rep("-", 75), collapse = ""), "\n")
## ---------------------------------------------------------------------------
for (g in grp_order) {
  sub <- d[d$pc_group == g, ]
  n <- nrow(sub)
  if (n < 5) next
  cat(sprintf("%-22s %5d", g, n))
  for (i in 1:5) {
    pc_var <- paste0("K5PC", i, "H")
    cat(sprintf(" %+9.4f", mean(sub[[pc_var]], na.rm = TRUE)))
  }
  cat("\n")
}
## Both NHW                  22   +0.0197   +0.0459   -0.0419   -0.0027   -0.0086
## Both NHB                  16   +0.0715   -0.0616   +0.0392   +0.0140   -0.0361
## Hisp x NHW               112   +0.0067   +0.0370   -0.0227   -0.0072   -0.0104
## Hisp x NHB                61   +0.0551   -0.0218   +0.0343   -0.0007   -0.0173
## Both Mexican             214   -0.0216   +0.0016   +0.0102   -0.0006   -0.0109
## Both PR                   43   +0.0350   +0.0166   +0.0017   -0.0125   +0.0733
## Both Hisp (other)        264   -0.0050   +0.0017   +0.0097   -0.0030   +0.0047
## Other                    107   +0.0108   -0.0375   -0.0535   +0.0191   -0.0016
cat("\nTable S-H3: SD of PC Scores by Parental Race/Ethnicity\n")
## 
## Table S-H3: SD of PC Scores by Parental Race/Ethnicity
cat(sprintf("%-22s %5s", "Group", "N"))
## Group                      N
for (i in 1:5) cat(sprintf(" %9s", paste0("PC", i, "H")))
##       PC1H      PC2H      PC3H      PC4H      PC5H
cat("\n")
cat(paste(rep("-", 75), collapse = ""), "\n")
## ---------------------------------------------------------------------------
for (g in grp_order) {
  sub <- d[d$pc_group == g, ]
  n <- nrow(sub)
  if (n < 5) next
  cat(sprintf("%-22s %5d", g, n))
  for (i in 1:5) {
    pc_var <- paste0("K5PC", i, "H")
    cat(sprintf(" %9.4f", sd(sub[[pc_var]], na.rm = TRUE)))
  }
  cat("\n")
}
## Both NHW                  22    0.0065    0.0155    0.0124    0.0245    0.0173
## Both NHB                  16    0.0343    0.0181    0.0312    0.0420    0.0307
## Hisp x NHW               112    0.0113    0.0150    0.0133    0.0085    0.0193
## Hisp x NHB                61    0.0236    0.0198    0.0181    0.0149    0.0395
## Both Mexican             214    0.0137    0.0145    0.0120    0.0081    0.0167
## Both PR                   43    0.0129    0.0151    0.0143    0.0094    0.0239
## Both Hisp (other)        264    0.0317    0.0191    0.0179    0.0094    0.0338
## Other                    107    0.0268    0.0541    0.0468    0.0886    0.0233
cat("\nPC Interpretation:\n")
## 
## PC Interpretation:
cat("  PC1H: African vs Amerindian (European intermediate)\n")
##   PC1H: African vs Amerindian (European intermediate)
cat("  PC2H: European vs African (Amerindian intermediate)\n")
##   PC2H: European vs African (Amerindian intermediate)
cat("  PC3H: Non-European (African + Amerindian) vs European\n")
##   PC3H: Non-European (African + Amerindian) vs European
cat("  Only 2 axes are independent in a 3-population system.\n")
##   Only 2 axes are independent in a 3-population system.
cat("  PCs are orthogonal in the full reference panel but become\n")
##   PCs are orthogonal in the full reference panel but become
cat("  highly correlated within Hispanic subsamples.\n\n")
##   highly correlated within Hispanic subsamples.
# ==============================================================
# H14b. PC Intercorrelations across samples
# ==============================================================

cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("PC Intercorrelations by Sample\n")
## PC Intercorrelations by Sample
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
samples <- list(
  "Full PGS sample" = d,
  "HPA"             = d_hpa,
  "HPA excl HW"     = d_hpa_noHW,
  "HHA"             = d_hha
)

for (nm in names(samples)) {
  s <- samples[[nm]]
  r12 <- cor(s$K5PC1H, s$K5PC2H, use = "complete.obs")
  r13 <- cor(s$K5PC1H, s$K5PC3H, use = "complete.obs")
  r23 <- cor(s$K5PC2H, s$K5PC3H, use = "complete.obs")

  cat(sprintf("\n%s (N = %d):\n", nm, nrow(s)))
  cat(sprintf("  PC1H x PC2H: %+.4f\n", r12))
  cat(sprintf("  PC1H x PC3H: %+.4f\n", r13))
  cat(sprintf("  PC2H x PC3H: %+.4f\n", r23))
}
## 
## Full PGS sample (N = 839):
##   PC1H x PC2H: -0.0339
##   PC1H x PC3H: +0.0611
##   PC2H x PC3H: +0.0275
## 
## HPA (N = 727):
##   PC1H x PC2H: +0.0370
##   PC1H x PC3H: +0.0455
##   PC2H x PC3H: -0.6351
## 
## HPA excl HW (N = 521):
##   PC1H x PC2H: +0.3503
##   PC1H x PC3H: -0.2090
##   PC2H x PC3H: -0.7244
## 
## HHA (N = 521):
##   PC1H x PC2H: +0.3503
##   PC1H x PC3H: -0.2090
##   PC2H x PC3H: -0.7244
cat("\nNote: PCs are orthogonal in the full reference panel but\n")
## 
## Note: PCs are orthogonal in the full reference panel but
cat("PC2H x PC3H = -0.72 in HHA, confirming that 3 PCs from a\n")
## PC2H x PC3H = -0.72 in HHA, confirming that 3 PCs from a
cat("2-dimensional ancestry space are overparameterized.\n\n")
## 2-dimensional ancestry space are overparameterized.
# ==============================================================
# H15. LSEM Analysis (PC1H as moderator)
# ==============================================================

cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("LSEM: Measurement Invariance across PC1H\n")
## LSEM: Measurement Invariance across PC1H
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
d_hpa_cog <- d_hpa[rowSums(!is.na(d_hpa[, c("PPVT_z", "WJ9_z", "WJ10_z", "DS_z")])) >= 1, ]

grid_points_h <- quantile(d_hpa_cog$PC1H_z,
                          probs = c(0.20, 0.35, 0.50, 0.65, 0.80),
                          na.rm = TRUE)

lsem_result_H <- lsem.estimate(
  data = as.data.frame(d_hpa_cog),
  moderator = "PC1H_z",
  moderator.grid = grid_points_h,
  lavmodel = 'g =~ PPVT_z + WJ9_z + WJ10_z + DS_z',
  h = 1.5,
  estimator = "ML"
)
## ** Residualize Data
## ** Fit lavaan model
## |*****|
## |
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## -
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## -
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## -
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## -
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## -|
## ** Parameter summary
lsem_perm_H <- lsem.permutationTest(lsem_result_H, B = 300)
## Permutation test LSEM
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 1
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 2
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 3
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 4
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 5
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 6
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 7
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 8
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 9
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 10
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 11
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 12
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 13
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 14
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 15
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 16
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 17
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 18
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 19
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 20
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 21
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 22
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 23
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 24
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 25
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 26
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 27
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 28
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 29
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 30
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 31
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 32
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 33
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 34
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 35
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 36
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 37
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 38
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 39
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 40
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 41
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 42
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 43
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 44
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 45
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 46
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 47
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 48
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 49
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 50
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 51
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 52
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 53
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 54
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 55
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 56
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 57
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 58
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 59
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 60
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 61
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 62
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 63
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 64
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 65
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 66
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 67
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 68
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 69
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 70
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 71
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 72
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 73
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 74
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 75
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 76
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 77
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 78
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 79
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 80
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 81
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 82
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 83
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 84
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 85
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 86
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 87
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 88
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 89
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 90
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 91
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 92
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 93
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 94
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 95
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 96
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 97
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 98
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 99
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 100
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 101
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 102
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 103
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 104
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 105
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 106
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 107
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 108
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 109
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 110
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 111
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 112
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 113
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 114
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 115
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 116
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 117
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 118
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 119
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 120
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 121
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 122
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 123
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 124
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 125
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 126
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 127
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 128
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 129
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 130
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 131
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 132
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 133
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 134
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 135
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 136
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 137
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 138
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 139
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 140
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 141
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 142
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 143
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 144
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 145
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 146
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 147
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 148
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 149
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 150
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 151
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 152
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 153
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 154
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 155
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 156
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 157
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 158
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 159
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 160
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 161
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 162
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 163
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 164
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 165
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 166
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 167
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 168
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 169
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 170
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 171
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 172
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 173
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 174
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 175
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 176
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 177
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 178
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 179
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 180
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 181
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 182
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 183
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 184
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 185
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 186
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 187
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 188
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 189
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 190
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 191
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 192
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 193
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 194
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 195
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 196
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 197
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 198
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 199
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 200
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 201
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 202
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 203
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 204
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 205
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 206
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 207
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 208
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 209
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 210
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 211
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 212
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 213
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 214
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 215
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 216
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 217
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 218
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 219
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 220
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 221
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 222
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 223
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 224
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 225
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 226
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 227
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 228
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 229
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 230
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 231
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 232
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 233
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 234
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 235
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 236
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 237
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 238
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 239
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 240
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 241
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 242
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 243
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 244
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 245
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 246
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 247
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 248
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 249
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 250
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 251
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 252
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 253
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 254
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 255
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 256
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 257
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 258
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 259
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 260
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 261
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 262
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 263
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 264
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 265
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 266
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 267
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 268
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 269
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 270
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 271
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 272
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 273
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 274
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 275
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 276
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 277
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 278
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 279
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 280
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 281
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 282
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 283
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 284
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 285
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 286
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 287
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 288
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 289
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 290
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 291
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 292
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 293
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 294
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 295
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 296
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 297
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 298
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 299
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## Warning in data.frame(grid_index = grid_index, moderator =
## moderator.grid[grid_index], : row names were found from a short variable and
## have been discarded
## Warning in data.frame(grid_index = gg, moderator = moderator.grid[gg], par =
## fit_measures, : row names were found from a short variable and have been
## discarded
## 300
summary(lsem_perm_H)
## -----------------------------------------------------------------
## Permutation Test for Local Structural Equation Model 
## 
## sirt 4.2-133 (2025-09-27 12:57:51) 
## lavaan 0.6-19 (2024-09-26 15:50:14 UTC) 
## 
## Function 'sirt::lsem.permutationTest' 
## 
## 
## Call:
## lsem.permutationTest(lsem.object = lsem_result_H, B = 300)
## 
## Date of Analysis: 2026-06-24 11:02:43.709276 
## Time difference of 20.41683 mins
## Computation Time: 20.41683 
## 
## Number of permutations = 300 
## Percentage of non-converged datasets = 0 
## Number of observations=693 
## Bandwidth factor=1.5 
## Bandwidth=0.401 
## Number of focal points for moderator=5 
## 
## lavaan Model
## g =~ PPVT_z + WJ9_z + WJ10_z + DS_z
## 
## Global Test Statistics
## 
##               par     M    SD  SD_p   MAD MAD_p lin_slo lin_slo_p
## 1       g=~PPVT_z 1.000 0.000 1.000 0.000 1.000   0.000     0.907
## 2        g=~WJ9_z 1.224 0.093 0.827 0.073 0.827   0.025     0.800
## 3       g=~WJ10_z 1.016 0.106 0.683 0.066 0.817   0.092     0.627
## 4         g=~DS_z 0.696 0.036 0.953 0.023 0.977   0.053     0.727
## 5  PPVT_z~~PPVT_z 0.412 0.032 0.697 0.026 0.653   0.032     0.587
## 6    WJ9_z~~WJ9_z 0.257 0.040 0.540 0.033 0.523  -0.076     0.380
## 7  WJ10_z~~WJ10_z 0.367 0.023 0.637 0.020 0.553  -0.040     0.560
## 8      DS_z~~DS_z 0.657 0.048 0.223 0.042 0.160   0.096     0.113
## 9            g~~g 0.386 0.027 0.817 0.017 0.900   0.027     0.833
## 10          rmsea 0.060 0.052 0.013 0.046 0.010   0.020     0.567
## 11            cfi 0.989 0.011 0.033 0.010 0.020  -0.006     0.367
## 12            tli 0.970 0.037 0.037 0.031 0.023  -0.011     0.513
## 13            gfi 0.990 0.007 0.047 0.006 0.023  -0.005     0.533
## 14           srmr 0.024 0.010 0.070 0.008 0.053   0.006     0.693
## 
## Pointwise Test Statistics
## 
##               par parindex  moderator    est     p
## 1       g=~PPVT_z        1 -0.7555296  0.000 1.000
## 2       g=~PPVT_z        1 -0.5224383  0.000 1.000
## 3       g=~PPVT_z        1 -0.2647358  0.000 1.000
## 4       g=~PPVT_z        1  0.1184972  0.000 1.000
## 5       g=~PPVT_z        1  0.8789388  0.000 1.000
## 6        g=~WJ9_z        2 -0.7555296  0.063 0.747
## 7        g=~WJ9_z        2 -0.5224383 -0.009 0.953
## 8        g=~WJ9_z        2 -0.2647358 -0.085 0.647
## 9        g=~WJ9_z        2  0.1184972 -0.149 0.580
## 10       g=~WJ9_z        2  0.8789388  0.191 0.487
## 11      g=~WJ10_z        3 -0.7555296  0.022 0.880
## 12      g=~WJ10_z        3 -0.5224383 -0.010 0.960
## 13      g=~WJ10_z        3 -0.2647358 -0.059 0.760
## 14      g=~WJ10_z        3  0.1184972 -0.159 0.467
## 15      g=~WJ10_z        3  0.8789388  0.281 0.340
## 16        g=~DS_z        4 -0.7555296 -0.023 0.787
## 17        g=~DS_z        4 -0.5224383  0.004 0.940
## 18        g=~DS_z        4 -0.2647358  0.003 0.873
## 19        g=~DS_z        4  0.1184972 -0.040 0.920
## 20        g=~DS_z        4  0.8789388  0.100 0.567
## 21 PPVT_z~~PPVT_z        5 -0.7555296  0.018 0.760
## 22 PPVT_z~~PPVT_z        5 -0.5224383 -0.019 0.373
## 23 PPVT_z~~PPVT_z        5 -0.2647358 -0.029 0.387
## 24 PPVT_z~~PPVT_z        5  0.1184972 -0.014 0.927
## 25 PPVT_z~~PPVT_z        5  0.8789388  0.082 0.313
## 26   WJ9_z~~WJ9_z        6 -0.7555296  0.051 0.333
## 27   WJ9_z~~WJ9_z        6 -0.5224383  0.005 0.800
## 28   WJ9_z~~WJ9_z        6 -0.2647358 -0.016 0.700
## 29   WJ9_z~~WJ9_z        6  0.1184972 -0.060 0.427
## 30   WJ9_z~~WJ9_z        6  0.8789388 -0.064 0.493
## 31 WJ10_z~~WJ10_z        7 -0.7555296  0.029 0.320
## 32 WJ10_z~~WJ10_z        7 -0.5224383  0.004 0.987
## 33 WJ10_z~~WJ10_z        7 -0.2647358 -0.023 0.273
## 34 WJ10_z~~WJ10_z        7  0.1184972 -0.016 0.760
## 35 WJ10_z~~WJ10_z        7  0.8789388 -0.036 0.747
## 36     DS_z~~DS_z        8 -0.7555296 -0.042 0.173
## 37     DS_z~~DS_z        8 -0.5224383 -0.029 0.100
## 38     DS_z~~DS_z        8 -0.2647358  0.018 0.553
## 39     DS_z~~DS_z        8  0.1184972  0.072 0.140
## 40     DS_z~~DS_z        8  0.8789388  0.095 0.200
## 41           g~~g        9 -0.7555296 -0.011 0.893
## 42           g~~g        9 -0.5224383 -0.017 0.580
## 43           g~~g        9 -0.2647358 -0.002 0.853
## 44           g~~g        9  0.1184972  0.074 0.367
## 45           g~~g        9  0.8789388 -0.001 0.953
## 46          rmsea       10 -0.7555296 -0.060 0.013
## 47          rmsea       10 -0.5224383  0.011 0.573
## 48          rmsea       10 -0.2647358  0.056 0.013
## 49          rmsea       10  0.1184972  0.075 0.040
## 50          rmsea       10  0.8789388 -0.060 0.133
## 51            cfi       11 -0.7555296  0.011 0.013
## 52            cfi       11 -0.5224383  0.002 0.567
## 53            cfi       11 -0.2647358 -0.013 0.020
## 54            cfi       11  0.1184972 -0.019 0.033
## 55            cfi       11  0.8789388  0.011 0.060
## 56            tli       12 -0.7555296  0.035 0.013
## 57            tli       12 -0.5224383  0.002 0.687
## 58            tli       12 -0.2647358 -0.043 0.020
## 59            tli       12  0.1184972 -0.060 0.033
## 60            tli       12  0.8789388  0.049 0.207
## 61            gfi       13 -0.7555296  0.007 0.013
## 62            gfi       13 -0.5224383  0.001 0.633
## 63            gfi       13 -0.2647358 -0.007 0.013
## 64            gfi       13  0.1184972 -0.013 0.027
## 65            gfi       13  0.8789388  0.005 0.113
## 66           srmr       14 -0.7555296 -0.011 0.020
## 67           srmr       14 -0.5224383  0.000 0.933
## 68           srmr       14 -0.2647358  0.011 0.020
## 69           srmr       14  0.1184972  0.017 0.053
## 70           srmr       14  0.8789388 -0.008 0.273
plot(lsem_perm_H)

# ==============================================================
# H15b. Multi-Group CFA: Measurement Invariance
# ==============================================================

cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("MULTI-GROUP CFA: Measurement Invariance\n")
## MULTI-GROUP CFA: Measurement Invariance
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
cfa_model <- 'g =~ PPVT_z + WJ9_z + WJ10_z + DS_z'

run_mi_cfa <- function(data, pc_var, label) {

  dd <- data[complete.cases(data[, c("PPVT_z", "WJ9_z", "WJ10_z", "DS_z", pc_var)]), ]
  dd$tert <- cut(dd[[pc_var]],
                 breaks = quantile(dd[[pc_var]], probs = c(0, 1/3, 2/3, 1)),
                 include.lowest = TRUE, labels = c("Low", "Mid", "High"))

  cat("\n", paste(rep("=", 80), collapse = ""), "\n")
  cat(label, "\n")
  cat("N =", nrow(dd), " | Tertile Ns:", table(dd$tert), "\n")
  cat(paste(rep("=", 80), collapse = ""), "\n")

  fit_config <- cfa(cfa_model, data = dd, group = "tert", estimator = "ML")
  fit_metric <- cfa(cfa_model, data = dd, group = "tert", estimator = "ML",
                    group.equal = "loadings")
  fit_scalar <- cfa(cfa_model, data = dd, group = "tert", estimator = "ML",
                    group.equal = c("loadings", "intercepts"))
  fit_strict <- cfa(cfa_model, data = dd, group = "tert", estimator = "ML",
                    group.equal = c("loadings", "intercepts", "residuals"))

  extract_fit <- function(fit, lbl) {
    fm <- fitmeasures(fit, c("chisq", "df", "pvalue", "cfi", "tli", "rmsea", "srmr"))
    data.frame(Model = lbl,
               chisq = round(fm["chisq"], 3),
               df    = fm["df"],
               p     = round(fm["pvalue"], 4),
               CFI   = round(fm["cfi"], 4),
               TLI   = round(fm["tli"], 4),
               RMSEA = round(fm["rmsea"], 4),
               SRMR  = round(fm["srmr"], 4),
               row.names = NULL)
  }

  fit_table <- rbind(
    extract_fit(fit_config, "1. Configural"),
    extract_fit(fit_metric, "2. Metric"),
    extract_fit(fit_scalar, "3. Scalar"),
    extract_fit(fit_strict, "4. Strict")
  )
  print(fit_table, row.names = FALSE)

  cfis <- sapply(list(fit_config, fit_metric, fit_scalar, fit_strict), fitmeasures, "cfi")
  steps <- c("Config->Metric", "Metric->Scalar", "Scalar->Strict")
  cat("\n")
  for (i in 1:3) {
    d_cfi <- cfis[i + 1] - cfis[i]
    cat(sprintf("  %-20s  ΔCFI = %+.4f  %s\n", steps[i], d_cfi,
                ifelse(abs(d_cfi) < 0.01, "[PASS]", "[FAIL]")))
  }
  cat("\n")
}

run_mi_cfa(d_hpa, "K5PC1H", "1. HPA x PC1H tertiles")
## 
##  ================================================================================ 
## 1. HPA x PC1H tertiles 
## N = 674  | Tertile Ns: 225 224 225 
## ================================================================================ 
##          Model  chisq df      p    CFI    TLI  RMSEA   SRMR
##  1. Configural 12.289  6 0.0558 0.9919 0.9758 0.0683 0.0204
##      2. Metric 13.413 12 0.3398 0.9982 0.9973 0.0229 0.0237
##      3. Scalar 36.579 18 0.0059 0.9762 0.9762 0.0678 0.0467
##      4. Strict 51.390 26 0.0021 0.9675 0.9775 0.0659 0.0587
## 
##   Config->Metric        ΔCFI = +0.0062  [PASS]
##   Metric->Scalar        ΔCFI = -0.0220  [FAIL]
##   Scalar->Strict        ΔCFI = -0.0087  [PASS]
run_mi_cfa(d_hpa, "K5PC2H", "2. HPA x PC2H tertiles")
## 
##  ================================================================================ 
## 2. HPA x PC2H tertiles 
## N = 674  | Tertile Ns: 225 224 225 
## ================================================================================ 
##          Model  chisq df      p    CFI    TLI  RMSEA   SRMR
##  1. Configural 15.239  6 0.0185 0.9886 0.9657 0.0828 0.0186
##      2. Metric 20.032 12 0.0665 0.9901 0.9851 0.0546 0.0312
##      3. Scalar 43.087 18 0.0008 0.9690 0.9690 0.0788 0.0466
##      4. Strict 63.152 26 0.0001 0.9541 0.9682 0.0798 0.0619
## 
##   Config->Metric        ΔCFI = +0.0015  [PASS]
##   Metric->Scalar        ΔCFI = -0.0211  [FAIL]
##   Scalar->Strict        ΔCFI = -0.0149  [FAIL]
run_mi_cfa(d_hha, "K5PC1H", "3. HHA x PC1H tertiles")
## 
##  ================================================================================ 
## 3. HHA x PC1H tertiles 
## N = 483  | Tertile Ns: 161 161 161 
## ================================================================================ 
##          Model  chisq df      p    CFI    TLI  RMSEA   SRMR
##  1. Configural  4.648  6 0.5897 1.0000 1.0082 0.0000 0.0152
##      2. Metric  9.375 12 0.6706 1.0000 1.0079 0.0000 0.0333
##      3. Scalar 25.536 18 0.1108 0.9848 0.9848 0.0510 0.0492
##      4. Strict 36.659 26 0.0802 0.9786 0.9852 0.0505 0.0589
## 
##   Config->Metric        ΔCFI = +0.0000  [PASS]
##   Metric->Scalar        ΔCFI = -0.0152  [FAIL]
##   Scalar->Strict        ΔCFI = -0.0063  [PASS]
run_mi_cfa(d_hha, "K5PC2H", "4. HHA x PC2H tertiles")
## 
##  ================================================================================ 
## 4. HHA x PC2H tertiles 
## N = 483  | Tertile Ns: 161 161 161 
## ================================================================================ 
##          Model  chisq df      p    CFI    TLI  RMSEA   SRMR
##  1. Configural  6.534  6 0.3661 0.9990 0.9969 0.0235 0.0166
##      2. Metric 11.721 12 0.4683 1.0000 1.0008 0.0000 0.0397
##      3. Scalar 24.621 18 0.1357 0.9871 0.9871 0.0478 0.0509
##      4. Strict 46.271 26 0.0085 0.9605 0.9726 0.0696 0.0657
## 
##   Config->Metric        ΔCFI = +0.0010  [PASS]
##   Metric->Scalar        ΔCFI = -0.0129  [FAIL]
##   Scalar->Strict        ΔCFI = -0.0266  [FAIL]
# ==============================================================
# H16. Single-PC Models: Each PC Separately
# ==============================================================
# The 3 PCs are orthogonal in the full reference panel but
# become highly collinear within the analytic subsamples
# (e.g., PC2H x PC3H = -0.72 in HHA). In a 3-PC model,
# each coefficient represents a contrast holding the other
# two constant — e.g., the effect of European-vs-African
# ancestry (PC2H) controlling for African-vs-Amerindian
# (PC1H) and non-European-vs-European (PC3H). Because
# these contrasts share variance in a 3-population system,
# the partialled coefficients are uninterpretable residuals.
# Single-PC models avoid this by estimating the bivariate
# association between each ancestry contrast and the outcome.

cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("SINGLE-PC MODELS: Each PC Separately\n")
## SINGLE-PC MODELS: Each PC Separately
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
# HPA individual tests
for (pc in c("PC2H_z", "PC3H_z")) {
  for (dv in c("PPVT", "WJ9", "WJ10")) {
    f <- as.formula(paste(dv, "~", pc, "+ mixed_h + hisp_eth + gen_2nd + gen_3rd + sex + age_c"))
    run_model_h(f, d_hpa, paste0("HPA: ", dv, " ~ ", pc, " (single PC)"))
  }
}
## 
##  ================================================================================ 
## HPA: PPVT ~ PC2H_z (single PC) 
## R2 = 0.1609  Adj-R2 = 0.1486 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.2375    0.1252    -1.897      0.0582
##               PC2H_z    +0.1139    0.0547    +2.082      0.0377
##              mixed_h    +0.8135    0.1381    +5.889    6.10e-09
##  hisp_ethPuertoRican    -0.0022    0.1761    -0.012      0.9901
##        hisp_ethCuban    -1.2103    0.4624    -2.618      0.0091
##    hisp_ethOtherHisp    +0.1698    0.1551    +1.094      0.2742
##      hisp_ethUnknown    -0.1964    0.1990    -0.987      0.3240
##          gen_2ndTRUE    -0.0998    0.1291    -0.773      0.4398
##          gen_3rdTRUE    -0.1138    0.2906    -0.392      0.6954
##                  sex    +0.0300    0.1180    +0.254      0.7994
##                age_c    -0.0742    0.0630    -1.177      0.2395
## N = 690 
## 
##  ================================================================================ 
## HPA: WJ9 ~ PC2H_z (single PC) 
## R2 = 0.1065  Adj-R2 = 0.0932 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.1674    0.1335    -1.254      0.2103
##               PC2H_z    +0.0421    0.0501    +0.840      0.4010
##              mixed_h    +0.6374    0.1104    +5.772    1.20e-08
##  hisp_ethPuertoRican    +0.0154    0.1727    +0.089      0.9289
##        hisp_ethCuban    -0.9289    0.5974    -1.555      0.1204
##    hisp_ethOtherHisp    -0.0502    0.1307    -0.384      0.7008
##      hisp_ethUnknown    -0.0955    0.1918    -0.498      0.6186
##          gen_2ndTRUE    -0.0998    0.1302    -0.766      0.4438
##          gen_3rdTRUE    -0.0130    0.2633    -0.050      0.9605
##                  sex    +0.1269    0.1109    +1.145      0.2527
##                age_c    -0.1034    0.0614    -1.686      0.0923
## N = 680 
## 
##  ================================================================================ 
## HPA: WJ10 ~ PC2H_z (single PC) 
## R2 = 0.0567  Adj-R2 = 0.0428 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.2419    0.1548    -1.563      0.1186
##               PC2H_z    +0.0826    0.0656    +1.258      0.2087
##              mixed_h    +0.5153    0.1462    +3.525      0.0005
##  hisp_ethPuertoRican    -0.0152    0.1653    -0.092      0.9268
##        hisp_ethCuban    -0.5996    0.6850    -0.875      0.3817
##    hisp_ethOtherHisp    +0.0082    0.1839    +0.044      0.9646
##      hisp_ethUnknown    -0.0047    0.2292    -0.021      0.9835
##          gen_2ndTRUE    +0.2400    0.1518    +1.581      0.1142
##          gen_3rdTRUE    +0.1684    0.2942    +0.573      0.5671
##                  sex    +0.0760    0.1293    +0.588      0.5569
##                age_c    -0.0173    0.0681    -0.255      0.7991
## N = 690 
## 
##  ================================================================================ 
## HPA: PPVT ~ PC3H_z (single PC) 
## R2 = 0.1758  Adj-R2 = 0.1637 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.2037    0.1221    -1.668      0.0958
##               PC3H_z    -0.1799    0.0498    -3.608      0.0003
##              mixed_h    +0.7050    0.1266    +5.567    3.73e-08
##  hisp_ethPuertoRican    +0.0188    0.1758    +0.107      0.9150
##        hisp_ethCuban    -1.2544    0.4257    -2.947      0.0033
##    hisp_ethOtherHisp    +0.1491    0.1566    +0.952      0.3412
##      hisp_ethUnknown    -0.2073    0.1979    -1.048      0.2951
##          gen_2ndTRUE    -0.1128    0.1191    -0.947      0.3442
##          gen_3rdTRUE    -0.1453    0.3014    -0.482      0.6298
##                  sex    +0.0331    0.1173    +0.282      0.7777
##                age_c    -0.0647    0.0620    -1.043      0.2973
## N = 690 
## 
##  ================================================================================ 
## HPA: WJ9 ~ PC3H_z (single PC) 
## R2 = 0.108  Adj-R2 = 0.0947 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.1554    0.1300    -1.196      0.2322
##               PC3H_z    -0.0598    0.0529    -1.131      0.2585
##              mixed_h    +0.6024    0.1212    +4.970    8.52e-07
##  hisp_ethPuertoRican    +0.0234    0.1753    +0.133      0.8940
##        hisp_ethCuban    -0.9447    0.5901    -1.601      0.1099
##    hisp_ethOtherHisp    -0.0564    0.1318    -0.428      0.6688
##      hisp_ethUnknown    -0.0984    0.1938    -0.508      0.6118
##          gen_2ndTRUE    -0.1069    0.1219    -0.877      0.3808
##          gen_3rdTRUE    -0.0244    0.2687    -0.091      0.9276
##                  sex    +0.1274    0.1106    +1.152      0.2497
##                age_c    -0.1002    0.0615    -1.629      0.1037
## N = 680 
## 
##  ================================================================================ 
## HPA: WJ10 ~ PC3H_z (single PC) 
## R2 = 0.0582  Adj-R2 = 0.0443 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.2204    0.1515    -1.455      0.1461
##               PC3H_z    -0.0954    0.0623    -1.533      0.1259
##              mixed_h    +0.4642    0.1430    +3.247      0.0012
##  hisp_ethPuertoRican    -0.0008    0.1684    -0.005      0.9961
##        hisp_ethCuban    -0.6311    0.6901    -0.914      0.3608
##    hisp_ethOtherHisp    -0.0007    0.1856    -0.004      0.9970
##      hisp_ethUnknown    -0.0081    0.2350    -0.034      0.9725
##          gen_2ndTRUE    +0.2182    0.1416    +1.541      0.1239
##          gen_3rdTRUE    +0.1469    0.3060    +0.480      0.6314
##                  sex    +0.0754    0.1307    +0.577      0.5639
##                age_c    -0.0122    0.0685    -0.179      0.8582
## N = 690
# HPA WAIS (excl HW)
for (pc in c("PC2H_z", "PC3H_z")) {
  f <- as.formula(paste("ave_WAIS_res_z ~", pc, "+ mixed_h + hisp_eth + gen_2nd + gen_3rd"))
  run_model_h(f, d_hpa_noHW, paste0("HPA WAIS ~ ", pc, " (single PC, excl HW)"))
}
## 
##  ================================================================================ 
## HPA WAIS ~ PC2H_z (single PC, excl HW) 
## R2 = 0.0557  Adj-R2 = 0.0384 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0679    0.0955    +0.711      0.4776
##               PC2H_z    +0.2130    0.0705    +3.023      0.0027
##  hisp_ethPuertoRican    -0.3055    0.1867    -1.636      0.1028
##    hisp_ethOtherHisp    -0.0657    0.1610    -0.408      0.6837
##      hisp_ethUnknown    -0.1825    0.3975    -0.459      0.6466
##          gen_2ndTRUE    +0.0821    0.2056    +0.399      0.6901
##          gen_3rdTRUE    +0.4851    0.2280    +2.128      0.0341
## N = 333 
## 
##  ================================================================================ 
## HPA WAIS ~ PC3H_z (single PC, excl HW) 
## R2 = 0.0547  Adj-R2 = 0.0373 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0521    0.0934    +0.558      0.5774
##               PC3H_z    -0.2017    0.0685    -2.944      0.0035
##  hisp_ethPuertoRican    -0.2255    0.1747    -1.291      0.1975
##    hisp_ethOtherHisp    -0.0665    0.1622    -0.410      0.6822
##      hisp_ethUnknown    -0.2064    0.3992    -0.517      0.6055
##          gen_2ndTRUE    +0.0834    0.2032    +0.410      0.6818
##          gen_3rdTRUE    +0.4190    0.2172    +1.929      0.0546
## N = 333
# HPA SES (excl HW)
for (pc in c("PC2H_z", "PC3H_z")) {
  f <- as.formula(paste("SES ~", pc, "+ mixed_h + hisp_eth + gen_2nd + gen_3rd"))
  run_model_h(f, d_hpa_noHW, paste0("HPA SES ~ ", pc, " (single PC, excl HW)"))
}
## 
##  ================================================================================ 
## HPA SES ~ PC2H_z (single PC, excl HW) 
## R2 = 0.0845  Adj-R2 = 0.0714 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.1567    0.1026    +1.527      0.1274
##               PC2H_z    +0.2474    0.0922    +2.684      0.0075
##  hisp_ethPuertoRican    -0.1746    0.2438    -0.716      0.4742
##        hisp_ethCuban    -0.1899    0.1658    -1.146      0.2525
##    hisp_ethOtherHisp    +0.2338    0.2004    +1.166      0.2440
##      hisp_ethUnknown    -0.9227    0.5253    -1.757      0.0796
##          gen_2ndTRUE    -0.1434    0.1551    -0.925      0.3555
##          gen_3rdTRUE    +0.1759    0.4447    +0.396      0.6926
## N = 499 
## 
##  ================================================================================ 
## HPA SES ~ PC3H_z (single PC, excl HW) 
## R2 = 0.1068  Adj-R2 = 0.0941 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.1501    0.1005    +1.494      0.1359
##               PC3H_z    -0.2854    0.0626    -4.562    6.40e-06
##  hisp_ethPuertoRican    -0.1196    0.2357    -0.507      0.6123
##        hisp_ethCuban    -0.1746    0.1644    -1.063      0.2885
##    hisp_ethOtherHisp    +0.2249    0.2013    +1.117      0.2644
##      hisp_ethUnknown    -0.9460    0.5397    -1.753      0.0803
##          gen_2ndTRUE    -0.1227    0.1416    -0.866      0.3867
##          gen_3rdTRUE    +0.1354    0.3811    +0.355      0.7226
## N = 499
#Both Hispanic samples

# HHA: Single-PC + Fractional Race
cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("HHA: Single-PC + Fractional Race (White = reference)\n")
## HHA: Single-PC + Fractional Race (White = reference)
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
for (pc in c("PC2H_z", "PC3H_z")) {
  for (dv in c("PPVT", "WJ9", "WJ10")) {
    f <- as.formula(paste(dv, "~", pc, "+ frac_black + frac_amind + frac_other + frac_unk + hisp_eth + gen_2nd + gen_3rd + sex + age_c"))
    run_model_h(f, d_hha, paste0("HHA: ", dv, " ~ ", pc, " + frac_race"))
  }
}
## 
##  ================================================================================ 
## HHA: PPVT ~ PC2H_z + frac_race 
## R2 = 0.0708  Adj-R2 = 0.0458 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0739    0.2078    +0.355      0.7224
##               PC2H_z    +0.1088    0.0761    +1.429      0.1536
##           frac_black    +0.3424    0.7520    +0.455      0.6491
##           frac_amind    -0.2564    0.2189    -1.171      0.2422
##           frac_other    -0.1650    0.1867    -0.884      0.3774
##             frac_unk    -0.7226    0.2465    -2.931      0.0035
##  hisp_ethPuertoRican    +0.0658    0.2421    +0.272      0.7858
##        hisp_ethCuban    -0.8873    0.1667    -5.324    1.56e-07
##    hisp_ethOtherHisp    +0.2223    0.1840    +1.208      0.2275
##      hisp_ethUnknown    +0.1157    0.3916    +0.295      0.7678
##          gen_2ndTRUE    -0.0554    0.1582    -0.350      0.7262
##          gen_3rdTRUE    -0.1802    0.3485    -0.517      0.6054
##                  sex    -0.0478    0.1430    -0.334      0.7383
##                age_c    -0.0945    0.0772    -1.224      0.2214
## N = 496 
## 
##  ================================================================================ 
## HHA: WJ9 ~ PC2H_z + frac_race 
## R2 = 0.0673  Adj-R2 = 0.0417 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.1322    0.2282    +0.579      0.5626
##               PC2H_z    +0.0300    0.0586    +0.512      0.6087
##           frac_black    +0.0199    0.3903    +0.051      0.9593
##           frac_amind    -0.4738    0.2718    -1.743      0.0820
##           frac_other    -0.0858    0.1922    -0.446      0.6556
##             frac_unk    -0.7550    0.3009    -2.509      0.0124
##  hisp_ethPuertoRican    +0.0028    0.2218    +0.013      0.9898
##        hisp_ethCuban    -0.0402    0.1822    -0.221      0.8254
##    hisp_ethOtherHisp    -0.2259    0.1453    -1.555      0.1206
##      hisp_ethUnknown    +0.6012    0.3203    +1.877      0.0612
##          gen_2ndTRUE    -0.0577    0.1505    -0.383      0.7015
##          gen_3rdTRUE    +0.0365    0.3362    +0.108      0.9137
##                  sex    +0.0971    0.1292    +0.752      0.4527
##                age_c    -0.0899    0.0734    -1.225      0.2211
## N = 488 
## 
##  ================================================================================ 
## HHA: WJ10 ~ PC2H_z + frac_race 
## R2 = 0.0411  Adj-R2 = 0.0153 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0495    0.2343    +0.211      0.8328
##               PC2H_z    +0.0978    0.0837    +1.168      0.2434
##           frac_black    -0.1979    0.6682    -0.296      0.7673
##           frac_amind    -0.2853    0.2141    -1.332      0.1834
##           frac_other    -0.3068    0.2213    -1.386      0.1664
##             frac_unk    -0.1790    0.2773    -0.646      0.5188
##  hisp_ethPuertoRican    +0.0306    0.2236    +0.137      0.8913
##        hisp_ethCuban    +0.6824    0.3812    +1.790      0.0740
##    hisp_ethOtherHisp    -0.1814    0.2323    -0.781      0.4352
##      hisp_ethUnknown    -0.4314    0.4903    -0.880      0.3794
##          gen_2ndTRUE    +0.3674    0.1875    +1.960      0.0506
##          gen_3rdTRUE    +0.2585    0.3631    +0.712      0.4767
##                  sex    +0.0783    0.1575    +0.497      0.6193
##                age_c    -0.0101    0.0848    -0.120      0.9049
## N = 496 
## 
##  ================================================================================ 
## HHA: PPVT ~ PC3H_z + frac_race 
## R2 = 0.0771  Adj-R2 = 0.0522 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0666    0.2054    +0.324      0.7458
##               PC3H_z    -0.1357    0.0655    -2.073      0.0387
##           frac_black    +0.4193    0.7229    +0.580      0.5622
##           frac_amind    -0.2677    0.2163    -1.238      0.2164
##           frac_other    -0.1689    0.1851    -0.913      0.3619
##             frac_unk    -0.7063    0.2448    -2.886      0.0041
##  hisp_ethPuertoRican    +0.0877    0.2381    +0.368      0.7128
##        hisp_ethCuban    -0.8768    0.1688    -5.193    3.06e-07
##    hisp_ethOtherHisp    +0.2174    0.1860    +1.168      0.2432
##      hisp_ethUnknown    +0.0916    0.3966    +0.231      0.8174
##          gen_2ndTRUE    -0.0418    0.1515    -0.276      0.7826
##          gen_3rdTRUE    -0.2013    0.3598    -0.560      0.5760
##                  sex    -0.0339    0.1432    -0.237      0.8131
##                age_c    -0.0919    0.0770    -1.194      0.2331
## N = 496 
## 
##  ================================================================================ 
## HHA: WJ9 ~ PC3H_z + frac_race 
## R2 = 0.0722  Adj-R2 = 0.0468 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.1197    0.2259    +0.530      0.5966
##               PC3H_z    -0.0820    0.0519    -1.580      0.1147
##           frac_black    +0.1371    0.3650    +0.376      0.7075
##           frac_amind    -0.4746    0.2701    -1.757      0.0796
##           frac_other    -0.0858    0.1910    -0.449      0.6536
##             frac_unk    -0.7209    0.3031    -2.378      0.0178
##  hisp_ethPuertoRican    -0.0048    0.2238    -0.021      0.9830
##        hisp_ethCuban    -0.0049    0.2000    -0.024      0.9805
##    hisp_ethOtherHisp    -0.2320    0.1462    -1.586      0.1134
##      hisp_ethUnknown    +0.5734    0.3227    +1.777      0.0762
##          gen_2ndTRUE    -0.0246    0.1480    -0.166      0.8682
##          gen_3rdTRUE    +0.0330    0.3521    +0.094      0.9254
##                  sex    +0.1045    0.1312    +0.797      0.4261
##                age_c    -0.0896    0.0731    -1.226      0.2209
## N = 488 
## 
##  ================================================================================ 
## HHA: WJ10 ~ PC3H_z + frac_race 
## R2 = 0.052  Adj-R2 = 0.0264 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0349    0.2308    +0.151      0.8798
##               PC3H_z    -0.1544    0.0672    -2.296      0.0221
##           frac_black    -0.0588    0.6247    -0.094      0.9251
##           frac_amind    -0.2938    0.2108    -1.394      0.1641
##           frac_other    -0.3094    0.2196    -1.409      0.1595
##             frac_unk    -0.1427    0.2829    -0.505      0.6141
##  hisp_ethPuertoRican    +0.0407    0.2214    +0.184      0.8543
##        hisp_ethCuban    +0.7156    0.3982    +1.797      0.0729
##    hisp_ethOtherHisp    -0.1885    0.2324    -0.811      0.4178
##      hisp_ethUnknown    -0.4683    0.5050    -0.927      0.3542
##          gen_2ndTRUE    +0.4013    0.1824    +2.201      0.0282
##          gen_3rdTRUE    +0.2411    0.3960    +0.609      0.5430
##                  sex    +0.0935    0.1587    +0.589      0.5562
##                age_c    -0.0081    0.0840    -0.096      0.9236
## N = 496
for (pc in c("PC2H_z", "PC3H_z")) {
  f <- as.formula(paste("ave_WAIS_res_z ~", pc, "+ frac_black + frac_amind + frac_other + frac_unk + hisp_eth + gen_2nd + gen_3rd"))
  run_model_h(f, d_hha, paste0("HHA WAIS ~ ", pc, " + frac_race"))
}
## 
##  ================================================================================ 
## HHA WAIS ~ PC2H_z + frac_race 
## R2 = 0.061  Adj-R2 = 0.0318 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0343    0.1349    +0.254      0.7996
##               PC2H_z    +0.2066    0.0765    +2.699      0.0073
##           frac_black    -0.2130    0.6422    -0.332      0.7404
##           frac_amind    -0.0442    0.2471    -0.179      0.8580
##           frac_other    +0.1371    0.1571    +0.873      0.3835
##             frac_unk    -0.1746    0.4385    -0.398      0.6908
##  hisp_ethPuertoRican    -0.3648    0.1987    -1.836      0.0673
##    hisp_ethOtherHisp    -0.0928    0.1611    -0.576      0.5652
##      hisp_ethUnknown    -0.0196    0.5018    -0.039      0.9689
##          gen_2ndTRUE    +0.0612    0.2048    +0.299      0.7652
##          gen_3rdTRUE    +0.4197    0.2155    +1.947      0.0524
## N = 333 
## 
##  ================================================================================ 
## HHA WAIS ~ PC3H_z + frac_race 
## R2 = 0.0599  Adj-R2 = 0.0307 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0257    0.1335    +0.192      0.8477
##               PC3H_z    -0.1950    0.0745    -2.617      0.0093
##           frac_black    -0.2224    0.6900    -0.322      0.7475
##           frac_amind    -0.0795    0.2412    -0.330      0.7419
##           frac_other    +0.1304    0.1562    +0.835      0.4043
##             frac_unk    -0.1523    0.4366    -0.349      0.7275
##  hisp_ethPuertoRican    -0.2872    0.1829    -1.570      0.1174
##    hisp_ethOtherHisp    -0.0948    0.1624    -0.584      0.5597
##      hisp_ethUnknown    -0.0625    0.5041    -0.124      0.9014
##          gen_2ndTRUE    +0.0612    0.2021    +0.303      0.7623
##          gen_3rdTRUE    +0.3572    0.2090    +1.709      0.0885
## N = 333
for (pc in c("PC2H_z", "PC3H_z")) {
  f <- as.formula(paste("SES ~", pc, "+ frac_black + frac_amind + frac_other + frac_unk + hisp_eth + gen_2nd + gen_3rd"))
  run_model_h(f, d_hha, paste0("HHA SES ~ ", pc, " + frac_race"))
}
## 
##  ================================================================================ 
## HHA SES ~ PC2H_z + frac_race 
## R2 = 0.1034  Adj-R2 = 0.0831 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.2373    0.1401    +1.693      0.0911
##               PC2H_z    +0.2364    0.0948    +2.493      0.0130
##           frac_black    -0.1359    0.4014    -0.339      0.7350
##           frac_amind    -0.5533    0.1773    -3.121      0.0019
##           frac_other    +0.0393    0.1807    +0.217      0.8279
##             frac_unk    -0.2312    0.1793    -1.290      0.1977
##  hisp_ethPuertoRican    -0.2527    0.2695    -0.938      0.3489
##        hisp_ethCuban    -0.2892    0.1786    -1.620      0.1060
##    hisp_ethOtherHisp    +0.1607    0.1979    +0.812      0.4174
##      hisp_ethUnknown    -0.7846    0.5022    -1.562      0.1188
##          gen_2ndTRUE    -0.1589    0.1525    -1.042      0.2980
##          gen_3rdTRUE    +0.1198    0.4313    +0.278      0.7813
## N = 499 
## 
##  ================================================================================ 
## HHA SES ~ PC3H_z + frac_race 
## R2 = 0.1261  Adj-R2 = 0.1063 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.2329    0.1358    +1.715      0.0870
##               PC3H_z    -0.2820    0.0644    -4.382    1.44e-05
##           frac_black    +0.0109    0.3535    +0.031      0.9755
##           frac_amind    -0.5726    0.1752    -3.268      0.0012
##           frac_other    +0.0318    0.1782    +0.179      0.8583
##             frac_unk    -0.1996    0.1687    -1.183      0.2373
##  hisp_ethPuertoRican    -0.2024    0.2584    -0.783      0.4339
##        hisp_ethCuban    -0.2637    0.1777    -1.484      0.1384
##    hisp_ethOtherHisp    +0.1544    0.1984    +0.778      0.4367
##      hisp_ethUnknown    -0.8308    0.5157    -1.611      0.1078
##          gen_2ndTRUE    -0.1366    0.1405    -0.973      0.3313
##          gen_3rdTRUE    +0.0850    0.3691    +0.230      0.8180
## N = 499
# ── Create PC_EUR_composite ──
d_hpa$PC_EUR_composite <- as.vector(scale(scale(d_hpa$K5PC2H) - scale(d_hpa$K5PC3H)))
d_hpa_noHW$PC_EUR_composite <- as.vector(scale(scale(d_hpa_noHW$K5PC2H) - scale(d_hpa_noHW$K5PC3H)))
d_hha$PC_EUR_composite <- as.vector(scale(scale(d_hha$K5PC2H) - scale(d_hha$K5PC3H)))

# HHA: PC_EUR + frac_race
for (dv in c("PPVT", "WJ9", "WJ10")) {
  f <- as.formula(paste(dv, "~ PC_EUR_composite + frac_black + frac_amind + frac_other + frac_unk + hisp_eth + gen_2nd + gen_3rd + sex + age_c"))
  run_model_h(f, d_hha, paste0("HHA: ", dv, " ~ PC_EUR + frac_race"))
}
## 
##  ================================================================================ 
## HHA: PPVT ~ PC_EUR + frac_race 
## R2 = 0.0766  Adj-R2 = 0.0517 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0615    0.2068    +0.297      0.7664
##     PC_EUR_composite    +0.1420    0.0752    +1.889      0.0595
##           frac_black    +0.4458    0.7219    +0.618      0.5372
##           frac_amind    -0.2584    0.2175    -1.188      0.2354
##           frac_other    -0.1655    0.1856    -0.892      0.3730
##             frac_unk    -0.6930    0.2456    -2.822      0.0050
##  hisp_ethPuertoRican    +0.0604    0.2406    +0.251      0.8020
##        hisp_ethCuban    -0.8570    0.1813    -4.727    2.99e-06
##    hisp_ethOtherHisp    +0.2164    0.1857    +1.165      0.2444
##      hisp_ethUnknown    +0.0906    0.3950    +0.229      0.8186
##          gen_2ndTRUE    -0.0270    0.1585    -0.170      0.8647
##          gen_3rdTRUE    -0.1846    0.3548    -0.520      0.6031
##                  sex    -0.0405    0.1433    -0.282      0.7778
##                age_c    -0.0940    0.0768    -1.224      0.2216
## N = 496 
## 
##  ================================================================================ 
## HHA: WJ9 ~ PC_EUR + frac_race 
## R2 = 0.0699  Adj-R2 = 0.0444 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.1219    0.2282    +0.534      0.5934
##     PC_EUR_composite    +0.0660    0.0597    +1.106      0.2694
##           frac_black    +0.1095    0.3805    +0.288      0.7736
##           frac_amind    -0.4712    0.2709    -1.739      0.0827
##           frac_other    -0.0846    0.1917    -0.441      0.6592
##             frac_unk    -0.7270    0.3061    -2.375      0.0180
##  hisp_ethPuertoRican    -0.0119    0.2214    -0.054      0.9571
##        hisp_ethCuban    -0.0092    0.2010    -0.046      0.9636
##    hisp_ethOtherHisp    -0.2304    0.1458    -1.580      0.1148
##      hisp_ethUnknown    +0.5817    0.3221    +1.806      0.0716
##          gen_2ndTRUE    -0.0299    0.1531    -0.195      0.8455
##          gen_3rdTRUE    +0.0398    0.3442    +0.116      0.9079
##                  sex    +0.0999    0.1305    +0.765      0.4444
##                age_c    -0.0905    0.0730    -1.239      0.2160
## N = 488 
## 
##  ================================================================================ 
## HHA: WJ10 ~ PC_EUR + frac_race 
## R2 = 0.0487  Adj-R2 = 0.0231 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0331    0.2332    +0.142      0.8872
##     PC_EUR_composite    +0.1473    0.0785    +1.877      0.0611
##           frac_black    -0.0604    0.6296    -0.096      0.9236
##           frac_amind    -0.2850    0.2125    -1.341      0.1807
##           frac_other    -0.3061    0.2203    -1.389      0.1653
##             frac_unk    -0.1379    0.2878    -0.479      0.6322
##  hisp_ethPuertoRican    +0.0162    0.2213    +0.073      0.9416
##        hisp_ethCuban    +0.7264    0.4094    +1.774      0.0766
##    hisp_ethOtherHisp    -0.1882    0.2319    -0.812      0.4175
##      hisp_ethUnknown    -0.4630    0.5027    -0.921      0.3575
##          gen_2ndTRUE    +0.4075    0.1877    +2.171      0.0305
##          gen_3rdTRUE    +0.2579    0.3834    +0.673      0.5015
##                  sex    +0.0853    0.1583    +0.539      0.5904
##                age_c    -0.0102    0.0843    -0.122      0.9033
## N = 496
run_model_h(ave_WAIS_res_z ~ PC_EUR_composite + frac_black + frac_amind + frac_other + frac_unk + hisp_eth + gen_2nd + gen_3rd, d_hha,
            "HHA WAIS ~ PC_EUR + frac_race")
## 
##  ================================================================================ 
## HHA WAIS ~ PC_EUR + frac_race 
## R2 = 0.0625  Adj-R2 = 0.0334 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.0464    0.1331    -0.349      0.7274
##     PC_EUR_composite    +0.2492    0.0924    +2.697      0.0074
##           frac_black    -0.1803    0.6732    -0.268      0.7890
##           frac_amind    -0.0611    0.2438    -0.251      0.8021
##           frac_other    +0.1326    0.1562    +0.849      0.3967
##             frac_unk    -0.1658    0.4380    -0.378      0.7053
##  hisp_ethPuertoRican    -0.3320    0.1908    -1.740      0.0828
##    hisp_ethOtherHisp    -0.0968    0.1615    -0.599      0.5495
##      hisp_ethUnknown    -0.0398    0.5035    -0.079      0.9370
##          gen_2ndTRUE    +0.0691    0.2027    +0.341      0.7334
##          gen_3rdTRUE    +0.3873    0.2113    +1.833      0.0678
## N = 333
run_model_h(SES ~ PC_EUR_composite + frac_black + frac_amind + frac_other + frac_unk + hisp_eth + gen_2nd + gen_3rd, d_hha,
            "HHA SES ~ PC_EUR + frac_race")
## 
##  ================================================================================ 
## HHA SES ~ PC_EUR + frac_race 
## R2 = 0.1264  Adj-R2 = 0.1067 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.2182    0.1370    +1.592      0.1120
##     PC_EUR_composite    +0.3007    0.0726    +4.143    4.03e-05
##           frac_black    +0.0734    0.3575    +0.205      0.8374
##           frac_amind    -0.5568    0.1755    -3.173      0.0016
##           frac_other    +0.0389    0.1783    +0.218      0.8273
##             frac_unk    -0.1716    0.1695    -1.012      0.3118
##  hisp_ethPuertoRican    -0.2615    0.2632    -0.994      0.3209
##        hisp_ethCuban    -0.2233    0.2041    -1.094      0.2745
##    hisp_ethOtherHisp    +0.1501    0.1949    +0.770      0.4414
##      hisp_ethUnknown    -0.8340    0.5164    -1.615      0.1069
##          gen_2ndTRUE    -0.1023    0.1466    -0.698      0.4854
##          gen_3rdTRUE    +0.1143    0.3852    +0.297      0.7668
## N = 499
# ==============================================================
# H17. Two-PC Models
# ==============================================================
# PC2 in conjunction with PC3 will capture African-European (European higher) and European-non-European (European lower) conditioned on African, which will proxy European-Amerindian
# However PC2 and PC3 are colinear in this sample and not clearly distinguished. 

cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("3-PC MODELS: All PCs Simultaneously (for comparison)\n")
## 3-PC MODELS: All PCs Simultaneously (for comparison)
cat("NOTE: PC coefficients may be distorted by collinearity\n")
## NOTE: PC coefficients may be distorted by collinearity
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
# HPA
run_model_h(ave_WAIS_res_z ~ PC2H_z + PC3H_z + mixed_h + hisp_eth + gen_2nd + gen_3rd, d_hpa_noHW,
            "HPA Average WAIS (3-PC, excl HW)")
## 
##  ================================================================================ 
## HPA Average WAIS (3-PC, excl HW) 
## R2 = 0.0575  Adj-R2 = 0.0372 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0628    0.0942    +0.667      0.5054
##               PC2H_z    +0.1250    0.0855    +1.462      0.1448
##               PC3H_z    -0.0943    0.0865    -1.090      0.2766
##  hisp_ethPuertoRican    -0.2767    0.1799    -1.538      0.1251
##    hisp_ethOtherHisp    -0.0694    0.1617    -0.429      0.6680
##      hisp_ethUnknown    -0.1931    0.4011    -0.481      0.6305
##          gen_2ndTRUE    +0.0904    0.2040    +0.443      0.6578
##          gen_3rdTRUE    +0.4548    0.2262    +2.011      0.0452
## N = 333
run_model_h(SES ~ PC2H_z + PC3H_z + mixed_h + hisp_eth + gen_2nd + gen_3rd, d_hpa_noHW,
            "HPA SES (3-PC, excl HW)")
## 
##  ================================================================================ 
## HPA SES (3-PC, excl HW) 
## R2 = 0.1106  Adj-R2 = 0.0961 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.1446    0.1009    +1.434      0.1523
##               PC2H_z    +0.0934    0.0566    +1.652      0.0991
##               PC3H_z    -0.2305    0.0460    -5.013    7.51e-07
##  hisp_ethPuertoRican    -0.1569    0.2404    -0.653      0.5142
##        hisp_ethCuban    -0.1461    0.1858    -0.786      0.4322
##    hisp_ethOtherHisp    +0.2199    0.1978    +1.112      0.2667
##      hisp_ethUnknown    -0.9392    0.5420    -1.733      0.0838
##          gen_2ndTRUE    -0.0911    0.1505    -0.605      0.5454
##          gen_3rdTRUE    +0.1536    0.3863    +0.398      0.6911
## N = 499
for (dv in c("PPVT", "WJ9", "WJ10")) {
  f <- as.formula(paste(dv, "~ PC2H_z + PC3H_z + mixed_h + hisp_eth + gen_2nd + gen_3rd + sex + age_c"))
  run_model_h(f, d_hpa, paste0("HPA: ", dv, " (3-PC)"))
}
## 
##  ================================================================================ 
## HPA: PPVT (3-PC) 
## R2 = 0.1763  Adj-R2 = 0.1629 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.2096    0.1244    -1.684      0.0926
##               PC2H_z    +0.0277    0.0573    +0.484      0.6289
##               PC3H_z    -0.1647    0.0577    -2.857      0.0044
##              mixed_h    +0.7085    0.1284    +5.516    4.92e-08
##  hisp_ethPuertoRican    +0.0147    0.1755    +0.084      0.9331
##        hisp_ethCuban    -1.2440    0.4221    -2.947      0.0033
##    hisp_ethOtherHisp    +0.1497    0.1572    +0.952      0.3413
##      hisp_ethUnknown    -0.2082    0.1980    -1.052      0.2933
##          gen_2ndTRUE    -0.0992    0.1281    -0.775      0.4387
##          gen_3rdTRUE    -0.1388    0.3014    -0.460      0.6453
##                  sex    +0.0347    0.1175    +0.295      0.7677
##                age_c    -0.0655    0.0619    -1.059      0.2899
## N = 690 
## 
##  ================================================================================ 
## HPA: WJ9 (3-PC) 
## R2 = 0.1081  Adj-R2 = 0.0934 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.1587    0.1327    -1.196      0.2321
##               PC2H_z    +0.0151    0.0420    +0.359      0.7194
##               PC3H_z    -0.0516    0.0469    -1.101      0.2715
##              mixed_h    +0.6044    0.1211    +4.992    7.63e-07
##  hisp_ethPuertoRican    +0.0211    0.1741    +0.121      0.9035
##        hisp_ethCuban    -0.9391    0.5898    -1.592      0.1118
##    hisp_ethOtherHisp    -0.0562    0.1319    -0.426      0.6704
##      hisp_ethUnknown    -0.0989    0.1937    -0.511      0.6096
##          gen_2ndTRUE    -0.0996    0.1308    -0.762      0.4464
##          gen_3rdTRUE    -0.0208    0.2688    -0.078      0.9382
##                  sex    +0.1283    0.1111    +1.155      0.2486
##                age_c    -0.1007    0.0615    -1.638      0.1018
## N = 680 
## 
##  ================================================================================ 
## HPA: WJ10 (3-PC) 
## R2 = 0.0593  Adj-R2 = 0.044 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.2301    0.1545    -1.489      0.1369
##               PC2H_z    +0.0457    0.0728    +0.627      0.5307
##               PC3H_z    -0.0705    0.0729    -0.967      0.3339
##              mixed_h    +0.4702    0.1418    +3.317      0.0010
##  hisp_ethPuertoRican    -0.0076    0.1667    -0.045      0.9638
##        hisp_ethCuban    -0.6139    0.6866    -0.894      0.3716
##    hisp_ethOtherHisp    +0.0001    0.1856    +0.001      0.9994
##      hisp_ethUnknown    -0.0096    0.2329    -0.041      0.9672
##          gen_2ndTRUE    +0.2404    0.1529    +1.572      0.1163
##          gen_3rdTRUE    +0.1577    0.3049    +0.517      0.6051
##                  sex    +0.0779    0.1303    +0.598      0.5503
##                age_c    -0.0137    0.0684    -0.200      0.8416
## N = 690
# HHA
run_model_h(ave_WAIS_res_z ~ PC2H_z + PC3H_z + hisp_eth + gen_2nd + gen_3rd, d_hha,
            "HHA WAIS (3-PC)")
## 
##  ================================================================================ 
## HHA WAIS (3-PC) 
## R2 = 0.0575  Adj-R2 = 0.0372 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.0628    0.0942    +0.667      0.5054
##               PC2H_z    +0.1250    0.0855    +1.462      0.1448
##               PC3H_z    -0.0943    0.0865    -1.090      0.2766
##  hisp_ethPuertoRican    -0.2767    0.1799    -1.538      0.1251
##    hisp_ethOtherHisp    -0.0694    0.1617    -0.429      0.6680
##      hisp_ethUnknown    -0.1931    0.4011    -0.481      0.6305
##          gen_2ndTRUE    +0.0904    0.2040    +0.443      0.6578
##          gen_3rdTRUE    +0.4548    0.2262    +2.011      0.0452
## N = 333
run_model_h(SES ~ PC2H_z + PC3H_z + hisp_eth + gen_2nd + gen_3rd, d_hha,
            "HHA SES (3-PC)")
## 
##  ================================================================================ 
## HHA SES (3-PC) 
## R2 = 0.1106  Adj-R2 = 0.0961 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.1446    0.1009    +1.434      0.1523
##               PC2H_z    +0.0934    0.0566    +1.652      0.0991
##               PC3H_z    -0.2305    0.0460    -5.013    7.51e-07
##  hisp_ethPuertoRican    -0.1569    0.2404    -0.653      0.5142
##        hisp_ethCuban    -0.1461    0.1858    -0.786      0.4322
##    hisp_ethOtherHisp    +0.2199    0.1978    +1.112      0.2667
##      hisp_ethUnknown    -0.9392    0.5420    -1.733      0.0838
##          gen_2ndTRUE    -0.0911    0.1505    -0.605      0.5454
##          gen_3rdTRUE    +0.1536    0.3863    +0.398      0.6911
## N = 499
for (dv in c("PPVT", "WJ9", "WJ10")) {
  f <- as.formula(paste(dv, "~ PC2H_z + PC3H_z + hisp_eth + gen_2nd + gen_3rd + sex + age_c"))
  run_model_h(f, d_hha, paste0("HHA: ", dv, " (3-PC)"))
}
## 
##  ================================================================================ 
## HHA: PPVT (3-PC) 
## R2 = 0.0551  Adj-R2 = 0.0356 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.0596    0.1538    -0.388      0.6983
##               PC2H_z    +0.0436    0.0517    +0.843      0.3995
##               PC3H_z    -0.1163    0.0519    -2.240      0.0255
##  hisp_ethPuertoRican    +0.0571    0.2278    +0.251      0.8023
##        hisp_ethCuban    -0.7795    0.1655    -4.710    3.24e-06
##    hisp_ethOtherHisp    +0.2249    0.1984    +1.134      0.2575
##      hisp_ethUnknown    -0.3295    0.3744    -0.880      0.3793
##          gen_2ndTRUE    -0.0749    0.1650    -0.454      0.6502
##          gen_3rdTRUE    -0.2215    0.3593    -0.617      0.5378
##                  sex    -0.0343    0.1479    -0.232      0.8169
##                age_c    -0.1179    0.0756    -1.560      0.1194
## N = 496 
## 
##  ================================================================================ 
## HHA: WJ9 (3-PC) 
## R2 = 0.0441  Adj-R2 = 0.0241 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.0213    0.1603    -0.133      0.8945
##               PC2H_z    -0.0190    0.0371    -0.512      0.6088
##               PC3H_z    -0.1068    0.0375    -2.849      0.0046
##  hisp_ethPuertoRican    +0.0444    0.2082    +0.213      0.8313
##        hisp_ethCuban    +0.1032    0.1991    +0.518      0.6044
##    hisp_ethOtherHisp    -0.1687    0.1575    -1.072      0.2845
##      hisp_ethUnknown    +0.1238    0.2160    +0.573      0.5668
##          gen_2ndTRUE    -0.0561    0.1624    -0.345      0.7302
##          gen_3rdTRUE    +0.0547    0.3460    +0.158      0.8746
##                  sex    +0.1131    0.1364    +0.829      0.4074
##                age_c    -0.1350    0.0733    -1.842      0.0661
## N = 488 
## 
##  ================================================================================ 
## HHA: WJ10 (3-PC) 
## R2 = 0.0406  Adj-R2 = 0.0209 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.1021    0.1848    -0.552      0.5809
##               PC2H_z    +0.0004    0.0546    +0.008      0.9938
##               PC3H_z    -0.1500    0.0501    -2.994      0.0029
##  hisp_ethPuertoRican    -0.0595    0.2059    -0.289      0.7729
##        hisp_ethCuban    +0.7511    0.3892    +1.930      0.0542
##    hisp_ethOtherHisp    -0.2667    0.2271    -1.174      0.2408
##      hisp_ethUnknown    -0.4653    0.4924    -0.945      0.3452
##          gen_2ndTRUE    +0.3528    0.1891    +1.865      0.0627
##          gen_3rdTRUE    +0.1331    0.4119    +0.323      0.7466
##                  sex    +0.0836    0.1572    +0.532      0.5950
##                age_c    -0.0054    0.0813    -0.066      0.9471
## N = 496
# The two-PC model consistently gives smaller effects than either single-PC model. PC2H and PC3H are each capturing a mix of European-vs-African and European-vs-Amerindian variation, and when you partial one out, you're removing most of the signal the other needs. This is the textbook consequence of putting two r = -.72 predictors in the same model.
# This confirms the single-PC approach was the right call, and reinforces why the results are supplementary; you can't disentangle the ancestry effects even with the best specification available.



d_hha$PC_EUR_composite <- as.vector(scale(scale(d_hha$K5PC2H) - scale(d_hha$K5PC3H)))

# ==============================================================
# H17b. One-PC Models attempting to isolate European effect.
# ==============================================================

# Since PC3 is reverse coded we subtract 
d_hpa_noHW$PC_EUR_composite <- as.vector(scale(scale(d_hpa_noHW$K5PC2H) - scale(d_hpa_noHW$K5PC3H)))
d_hpa$PC_EUR_composite <- as.vector(scale(scale(d_hpa$K5PC2H) - scale(d_hpa$K5PC3H)))
d_hha$PC_EUR_composite <- as.vector(scale(scale(d_hha$K5PC2H) - scale(d_hha$K5PC3H)))

# HPA
run_model_h(ave_WAIS_res_z ~ PC_EUR_composite + mixed_h + hisp_eth + gen_2nd + gen_3rd, d_hpa_noHW,
            "HPA Average WAIS (3-PC, excl HW)")
## 
##  ================================================================================ 
## HPA Average WAIS (3-PC, excl HW) 
## R2 = 0.0575  Adj-R2 = 0.0401 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.0190    0.0914    -0.208      0.8356
##     PC_EUR_composite    +0.2566    0.0848    +3.025      0.0027
##  hisp_ethPuertoRican    -0.2713    0.1805    -1.503      0.1338
##    hisp_ethOtherHisp    -0.0695    0.1614    -0.431      0.6669
##      hisp_ethUnknown    -0.1947    0.4005    -0.486      0.6271
##          gen_2ndTRUE    +0.0907    0.2036    +0.445      0.6565
##          gen_3rdTRUE    +0.4503    0.2213    +2.034      0.0427
## N = 333
run_model_h(SES ~ PC_EUR_composite + mixed_h + hisp_eth + gen_2nd + gen_3rd, d_hpa_noHW,
            "HPA SES (3-PC, excl HW)")
## 
##  ================================================================================ 
## HPA SES (3-PC, excl HW) 
## R2 = 0.1079  Adj-R2 = 0.0952 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.1411    0.1010    +1.396      0.1633
##     PC_EUR_composite    +0.3039    0.0699    +4.345    1.69e-05
##  hisp_ethPuertoRican    -0.1779    0.2386    -0.746      0.4562
##        hisp_ethCuban    -0.1399    0.1916    -0.730      0.4657
##    hisp_ethOtherHisp    +0.2199    0.1966    +1.118      0.2639
##      hisp_ethUnknown    -0.9331    0.5395    -1.730      0.0843
##          gen_2ndTRUE    -0.0848    0.1491    -0.569      0.5695
##          gen_3rdTRUE    +0.1661    0.3987    +0.417      0.6771
## N = 499
for (dv in c("PPVT", "WJ9", "WJ10")) {
  f <- as.formula(paste(dv, "~ PC_EUR_composite + mixed_h + hisp_eth + gen_2nd + gen_3rd + sex + age_c"))
  run_model_h(f, d_hpa, paste0("HPA: ", dv, " (3-PC)"))
}
## 
##  ================================================================================ 
## HPA: PPVT (3-PC) 
## R2 = 0.1728  Adj-R2 = 0.1606 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.2274    0.1221    -1.862      0.0630
##     PC_EUR_composite    +0.1719    0.0527    +3.265      0.0012
##              mixed_h    +0.7429    0.1296    +5.730    1.51e-08
##  hisp_ethPuertoRican    +0.0038    0.1760    +0.021      0.9829
##        hisp_ethCuban    -1.2184    0.4243    -2.871      0.0042
##    hisp_ethOtherHisp    +0.1561    0.1562    +0.999      0.3180
##      hisp_ethUnknown    -0.2064    0.1982    -1.042      0.2980
##          gen_2ndTRUE    -0.0781    0.1230    -0.635      0.5257
##          gen_3rdTRUE    -0.1217    0.2964    -0.411      0.6815
##                  sex    +0.0359    0.1177    +0.305      0.7603
##                age_c    -0.0692    0.0622    -1.113      0.2662
## N = 690 
## 
##  ================================================================================ 
## HPA: WJ9 (3-PC) 
## R2 = 0.1079  Adj-R2 = 0.0945 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.1633    0.1311    -1.246      0.2131
##     PC_EUR_composite    +0.0594    0.0574    +1.033      0.3019
##              mixed_h    +0.6136    0.1167    +5.260    1.94e-07
##  hisp_ethPuertoRican    +0.0181    0.1738    +0.104      0.9172
##        hisp_ethCuban    -0.9325    0.5893    -1.582      0.1141
##    hisp_ethOtherHisp    -0.0546    0.1309    -0.417      0.6770
##      hisp_ethUnknown    -0.0986    0.1930    -0.511      0.6098
##          gen_2ndTRUE    -0.0940    0.1286    -0.731      0.4652
##          gen_3rdTRUE    -0.0163    0.2665    -0.061      0.9513
##                  sex    +0.1286    0.1108    +1.161      0.2460
##                age_c    -0.1017    0.0613    -1.658      0.0978
## N = 680 
## 
##  ================================================================================ 
## HPA: WJ10 (3-PC) 
## R2 = 0.0592  Adj-R2 = 0.0453 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.2336    0.1523    -1.533      0.1257
##     PC_EUR_composite    +0.1044    0.0646    +1.616      0.1066
##              mixed_h    +0.4764    0.1461    +3.261      0.0012
##  hisp_ethPuertoRican    -0.0096    0.1670    -0.057      0.9542
##        hisp_ethCuban    -0.6093    0.6829    -0.892      0.3726
##    hisp_ethOtherHisp    +0.0012    0.1841    +0.007      0.9948
##      hisp_ethUnknown    -0.0093    0.2318    -0.040      0.9681
##          gen_2ndTRUE    +0.2441    0.1477    +1.653      0.0988
##          gen_3rdTRUE    +0.1608    0.3023    +0.532      0.5949
##                  sex    +0.0781    0.1301    +0.600      0.5487
##                age_c    -0.0143    0.0683    -0.210      0.8336
## N = 690
# HHA
run_model_h(ave_WAIS_res_z ~ PC_EUR_composite + hisp_eth + gen_2nd + gen_3rd, d_hha,
            "HHA WAIS (3-PC)")
## 
##  ================================================================================ 
## HHA WAIS (3-PC) 
## R2 = 0.0575  Adj-R2 = 0.0401 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.0190    0.0914    -0.208      0.8356
##     PC_EUR_composite    +0.2566    0.0848    +3.025      0.0027
##  hisp_ethPuertoRican    -0.2713    0.1805    -1.503      0.1338
##    hisp_ethOtherHisp    -0.0695    0.1614    -0.431      0.6669
##      hisp_ethUnknown    -0.1947    0.4005    -0.486      0.6271
##          gen_2ndTRUE    +0.0907    0.2036    +0.445      0.6565
##          gen_3rdTRUE    +0.4503    0.2213    +2.034      0.0427
## N = 333
run_model_h(SES ~ PC_EUR_composite + hisp_eth + gen_2nd + gen_3rd, d_hha,
            "HHA SES (3-PC)")
## 
##  ================================================================================ 
## HHA SES (3-PC) 
## R2 = 0.1079  Adj-R2 = 0.0952 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    +0.1411    0.1010    +1.396      0.1633
##     PC_EUR_composite    +0.3039    0.0699    +4.345    1.69e-05
##  hisp_ethPuertoRican    -0.1779    0.2386    -0.746      0.4562
##        hisp_ethCuban    -0.1399    0.1916    -0.730      0.4657
##    hisp_ethOtherHisp    +0.2199    0.1966    +1.118      0.2639
##      hisp_ethUnknown    -0.9331    0.5395    -1.730      0.0843
##          gen_2ndTRUE    -0.0848    0.1491    -0.569      0.5695
##          gen_3rdTRUE    +0.1661    0.3987    +0.417      0.6771
## N = 499
for (dv in c("PPVT", "WJ9", "WJ10")) {
  f <- as.formula(paste(dv, "~ PC_EUR_composite + hisp_eth + gen_2nd + gen_3rd + sex + age_c"))
  run_model_h(f, d_hha, paste0("HHA: ", dv, " (3-PC)"))
}
## 
##  ================================================================================ 
## HHA: PPVT (3-PC) 
## R2 = 0.0543  Adj-R2 = 0.0368 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.0606    0.1541    -0.393      0.6944
##     PC_EUR_composite    +0.1500    0.0703    +2.133      0.0334
##  hisp_ethPuertoRican    +0.0458    0.2268    +0.202      0.8402
##        hisp_ethCuban    -0.7749    0.1685    -4.599    5.43e-06
##    hisp_ethOtherHisp    +0.2252    0.1979    +1.138      0.2557
##      hisp_ethUnknown    -0.3260    0.3728    -0.874      0.3823
##          gen_2ndTRUE    -0.0714    0.1646    -0.434      0.6647
##          gen_3rdTRUE    -0.2133    0.3555    -0.600      0.5488
##                  sex    -0.0380    0.1478    -0.257      0.7971
##                age_c    -0.1187    0.0755    -1.572      0.1165
## N = 496 
## 
##  ================================================================================ 
## HHA: WJ9 (3-PC) 
## R2 = 0.0416  Adj-R2 = 0.0236 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.0201    0.1607    -0.125      0.9003
##     PC_EUR_composite    +0.0849    0.0544    +1.559      0.1197
##  hisp_ethPuertoRican    +0.0245    0.2071    +0.118      0.9059
##        hisp_ethCuban    +0.1111    0.2050    +0.542      0.5879
##    hisp_ethOtherHisp    -0.1684    0.1572    -1.071      0.2848
##      hisp_ethUnknown    +0.1298    0.2155    +0.602      0.5473
##          gen_2ndTRUE    -0.0502    0.1629    -0.308      0.7580
##          gen_3rdTRUE    +0.0688    0.3363    +0.204      0.8381
##                  sex    +0.1066    0.1364    +0.781      0.4349
##                age_c    -0.1365    0.0732    -1.865      0.0628
## N = 488 
## 
##  ================================================================================ 
## HHA: WJ10 (3-PC) 
## R2 = 0.0377  Adj-R2 = 0.0199 
## ================================================================================ 
##             Variable          B        SE         t           p
## ------------------------------------------------------------ 
##          (Intercept)    -0.1015    0.1853    -0.548      0.5841
##     PC_EUR_composite    +0.1441    0.0747    +1.929      0.0543
##  hisp_ethPuertoRican    -0.0831    0.2041    -0.407      0.6840
##        hisp_ethCuban    +0.7607    0.3969    +1.917      0.0559
##    hisp_ethOtherHisp    -0.2664    0.2266    -1.176      0.2402
##      hisp_ethUnknown    -0.4581    0.4898    -0.935      0.3501
##          gen_2ndTRUE    +0.3597    0.1892    +1.901      0.0579
##          gen_3rdTRUE    +0.1501    0.3988    +0.376      0.7068
##                  sex    +0.0757    0.1571    +0.482      0.6299
##                age_c    -0.0071    0.0813    -0.087      0.9303
## N = 496
# The limitation remains: we can't tell whether the non-European effect is driven by African or Amerindian ancestry. 

# ==============================================================
# H17c. Mediation Analyses
# ==============================================================
# Note on warnings: 
# The "rank-deficient fit" warnings during bootstrap are due to near-empty ethnicity × generation cells in some resamples (N=325-487 with 6 predictors including 2-factor + 2-binary generation indicators). However, all 1000 bootstrap iterations completed, and percentile CIs are robust to this form of instability.

cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("MEDIATION ANALYSES\n")
## MEDIATION ANALYSES
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
prep_mediation_data <- function(data) {
  # Remove Unknown entirely
  data <- data[data$hisp_eth != "Unknown", ]
  # Collapse Cuban into OtherHisp (too few cases for stable bootstrap otherwise)
  levels(data$hisp_eth)[levels(data$hisp_eth) == "Cuban"] <- "OtherHisp"
  data$hisp_eth <- droplevels(data$hisp_eth)
  data
}

# ── Mediation 1a: PC_EUR -> Parental WAIS -> PPVT (HPA excl HW) ────
d_med1a <- d_hpa_noHW[complete.cases(d_hpa_noHW[, c("PPVT", "K5PC2H", 
    "K5PC3H", "ave_WAIS_raw", "hisp_eth", "gen_2nd", "gen_3rd", "sex", 
    "age")]) & !is.na(d_hpa_noHW$wt), ]
d_med1a <- prep_mediation_data(d_med1a)

d_med1a$PC_EUR <- as.vector(scale(scale(d_med1a$K5PC2H) - scale(d_med1a$K5PC3H)))
d_med1a$PPVT_z <- as.vector(scale(d_med1a$PPVT))
d_med1a$W <- as.vector(scale(d_med1a$ave_WAIS_raw))
d_med1a$age_c <- as.vector(scale(d_med1a$age))

med_M1a <- lm(W ~ PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med1a, weights = wt)
out_Y1a <- lm(PPVT_z ~ W + PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med1a, weights = wt)
set.seed(33333)
med1a <- mediate(med_M1a, out_Y1a, treat = "PC_EUR", mediator = "W", 
    boot = TRUE, sims = 1000)
## Running nonparametric bootstrap
## Warning in predict.lm(new.fit.M, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.M, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
summary(med1a)
## 
## Causal Mediation Analysis 
## 
## Nonparametric Bootstrap Confidence Intervals with the Percentile Method
## 
##                   Estimate 95% CI Lower 95% CI Upper p-value  
## ACME            0.04297327   0.00029534   0.09515476   0.046 *
## ADE             0.11355041  -0.06519125   0.30418722   0.260  
## Total Effect    0.15652369  -0.02428420   0.35096711   0.102  
## Prop. Mediated  0.27454805  -1.02921185   2.77181927   0.132  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Sample Size Used: 325 
## 
## 
## Simulations: 1000
# ── Mediation 1b: PC_EUR -> Parental WAIS -> PPVT (HHA) ──────────
d_med1b <- d_hha[complete.cases(d_hha[, c("PPVT", "K5PC2H", "K5PC3H", 
    "ave_WAIS_raw", "hisp_eth", "gen_2nd", "gen_3rd", "sex", "age")]) & 
    !is.na(d_hha$wt), ]
d_med1b <- prep_mediation_data(d_med1b)

d_med1b$PC_EUR <- as.vector(scale(scale(d_med1b$K5PC2H) - scale(d_med1b$K5PC3H)))
d_med1b$PPVT_z <- as.vector(scale(d_med1b$PPVT))
d_med1b$W <- as.vector(scale(d_med1b$ave_WAIS_raw))
d_med1b$age_c <- as.vector(scale(d_med1b$age))

med_M1b <- lm(W ~ PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med1b, weights = wt)
out_Y1b <- lm(PPVT_z ~ W + PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med1b, weights = wt)
set.seed(33333)
med1b <- mediate(med_M1b, out_Y1b, treat = "PC_EUR", mediator = "W", 
    boot = TRUE, sims = 1000)
## Running nonparametric bootstrap
## Warning in predict.lm(new.fit.M, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.M, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
summary(med1b)
## 
## Causal Mediation Analysis 
## 
## Nonparametric Bootstrap Confidence Intervals with the Percentile Method
## 
##                   Estimate 95% CI Lower 95% CI Upper p-value  
## ACME            0.04297327   0.00029534   0.09515476   0.046 *
## ADE             0.11355041  -0.06519125   0.30418722   0.260  
## Total Effect    0.15652369  -0.02428420   0.35096711   0.102  
## Prop. Mediated  0.27454805  -1.02921185   2.77181927   0.132  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Sample Size Used: 325 
## 
## 
## Simulations: 1000
# ── Mediation 2a: PC_EUR -> Parental WAIS -> SES (HPA excl HW) ────
d_med2a <- d_hpa_noHW[complete.cases(d_hpa_noHW[, c("SES_raw", "K5PC2H", 
    "K5PC3H", "ave_WAIS_raw", "hisp_eth", "gen_2nd", "gen_3rd", "sex", 
    "age")]) & !is.na(d_hpa_noHW$wt), ]
d_med2a <- prep_mediation_data(d_med2a)

d_med2a$PC_EUR <- as.vector(scale(scale(d_med2a$K5PC2H) - scale(d_med2a$K5PC3H)))
d_med2a$SES <- as.vector(scale(d_med2a$SES_raw))
d_med2a$W <- as.vector(scale(d_med2a$ave_WAIS_raw))
d_med2a$age_c <- as.vector(scale(d_med2a$age))

med_M2a <- lm(W ~ PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med2a, weights = wt)
out_Y2a <- lm(SES ~ W + PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med2a, weights = wt)
set.seed(44444)
med2a <- mediate(med_M2a, out_Y2a, treat = "PC_EUR", mediator = "W", 
    boot = TRUE, sims = 1000)
## Running nonparametric bootstrap
summary(med2a)
## 
## Causal Mediation Analysis 
## 
## Nonparametric Bootstrap Confidence Intervals with the Percentile Method
## 
##                 Estimate 95% CI Lower 95% CI Upper p-value    
## ACME            0.077521     0.026762     0.131482  <2e-16 ***
## ADE             0.107153    -0.033169     0.261568   0.142    
## Total Effect    0.184675     0.048956     0.331567   0.004 ** 
## Prop. Mediated  0.419773     0.133413     1.488295   0.004 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Sample Size Used: 325 
## 
## 
## Simulations: 1000
# ── Mediation 2b: PC_EUR -> Parental WAIS -> SES (HHA) ───────────
d_med2b <- d_hha[complete.cases(d_hha[, c("SES_raw", "K5PC2H", "K5PC3H", 
    "ave_WAIS_raw", "hisp_eth", "gen_2nd", "gen_3rd", "sex", "age")]) & 
    !is.na(d_hha$wt), ]
d_med2b <- prep_mediation_data(d_med2b)

d_med2b$PC_EUR <- as.vector(scale(scale(d_med2b$K5PC2H) - scale(d_med2b$K5PC3H)))
d_med2b$SES <- as.vector(scale(d_med2b$SES_raw))
d_med2b$W <- as.vector(scale(d_med2b$ave_WAIS_raw))
d_med2b$age_c <- as.vector(scale(d_med2b$age))

med_M2b <- lm(W ~ PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med2b, weights = wt)
out_Y2b <- lm(SES ~ W + PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med2b, weights = wt)
set.seed(44444)
med2b <- mediate(med_M2b, out_Y2b, treat = "PC_EUR", mediator = "W", 
    boot = TRUE, sims = 1000)
## Running nonparametric bootstrap
summary(med2b)
## 
## Causal Mediation Analysis 
## 
## Nonparametric Bootstrap Confidence Intervals with the Percentile Method
## 
##                 Estimate 95% CI Lower 95% CI Upper p-value    
## ACME            0.077521     0.026762     0.131482  <2e-16 ***
## ADE             0.107153    -0.033169     0.261568   0.142    
## Total Effect    0.184675     0.048956     0.331567   0.004 ** 
## Prop. Mediated  0.419773     0.133413     1.488295   0.004 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Sample Size Used: 325 
## 
## 
## Simulations: 1000
# ── Mediation 3a: PC_EUR -> SES -> PPVT (HPA excl HW) ─────────────
d_med3a <- d_hpa_noHW[complete.cases(d_hpa_noHW[, c("PPVT", "K5PC2H", 
    "K5PC3H", "SES_raw", "hisp_eth", "gen_2nd", "gen_3rd", "sex", 
    "age")]) & !is.na(d_hpa_noHW$wt), ]
d_med3a <- prep_mediation_data(d_med3a)

d_med3a$PC_EUR <- as.vector(scale(scale(d_med3a$K5PC2H) - scale(d_med3a$K5PC3H)))
d_med3a$PPVT_z <- as.vector(scale(d_med3a$PPVT))
d_med3a$SES <- as.vector(scale(d_med3a$SES_raw))
d_med3a$age_c <- as.vector(scale(d_med3a$age))

med_M3a <- lm(SES ~ PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med3a, weights = wt)
out_Y3a <- lm(PPVT_z ~ SES + PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med3a, weights = wt)
set.seed(55555)
med3a <- mediate(med_M3a, out_Y3a, treat = "PC_EUR", mediator = "SES", 
    boot = TRUE, sims = 1000)
## Running nonparametric bootstrap
## Warning in predict.lm(new.fit.M, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.M, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
summary(med3a)
## 
## Causal Mediation Analysis 
## 
## Nonparametric Bootstrap Confidence Intervals with the Percentile Method
## 
##                  Estimate 95% CI Lower 95% CI Upper p-value    
## ACME            0.1265904    0.0724407    0.1767650  <2e-16 ***
## ADE             0.0328746   -0.1296592    0.1815825   0.550    
## Total Effect    0.1594650    0.0042302    0.3032833   0.044 *  
## Prop. Mediated  0.7938443    0.2683384    3.3810137   0.044 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Sample Size Used: 487 
## 
## 
## Simulations: 1000
# ── Mediation 3b: PC_EUR -> SES -> PPVT (HHA) ─────────────────────
d_med3b <- d_hha[complete.cases(d_hha[, c("PPVT", "K5PC2H", "K5PC3H", 
    "SES_raw", "hisp_eth", "gen_2nd", "gen_3rd", "sex", "age")]) & 
    !is.na(d_hha$wt), ]
d_med3b <- prep_mediation_data(d_med3b)

d_med3b$PC_EUR <- as.vector(scale(scale(d_med3b$K5PC2H) - scale(d_med3b$K5PC3H)))
d_med3b$PPVT_z <- as.vector(scale(d_med3b$PPVT))
d_med3b$SES <- as.vector(scale(d_med3b$SES_raw))
d_med3b$age_c <- as.vector(scale(d_med3b$age))

med_M3b <- lm(SES ~ PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med3b, weights = wt)
out_Y3b <- lm(PPVT_z ~ SES + PC_EUR + hisp_eth + gen_2nd + gen_3rd + sex + age_c, 
    data = d_med3b, weights = wt)
set.seed(55555)
med3b <- mediate(med_M3b, out_Y3b, treat = "PC_EUR", mediator = "SES", 
    boot = TRUE, sims = 1000)
## Running nonparametric bootstrap
## Warning in predict.lm(new.fit.M, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.M, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.t):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
## Warning in predict.lm(new.fit.Y, type = "response", newdata = pred.data.c):
## prediction from rank-deficient fit; attr(*, "non-estim") has doubtful cases
summary(med3b)
## 
## Causal Mediation Analysis 
## 
## Nonparametric Bootstrap Confidence Intervals with the Percentile Method
## 
##                  Estimate 95% CI Lower 95% CI Upper p-value    
## ACME            0.1265904    0.0724407    0.1767650  <2e-16 ***
## ADE             0.0328746   -0.1296592    0.1815825   0.550    
## Total Effect    0.1594650    0.0042302    0.3032833   0.044 *  
## Prop. Mediated  0.7938443    0.2683384    3.3810137   0.044 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Sample Size Used: 487 
## 
## 
## Simulations: 1000
# Verify all mediation subsets have at most 3 clean levels
cat("\nFactor level check:\n")
## 
## Factor level check:
for (nm in c("d_med1a","d_med1b","d_med2a","d_med2b","d_med3a","d_med3b")) {
  cat(sprintf("  %-8s: %s\n", nm, 
      paste(table(get(nm)$hisp_eth), collapse = " / ")))
}
##   d_med1a : 200 / 61 / 64
##   d_med1b : 200 / 61 / 64
##   d_med2a : 200 / 61 / 64
##   d_med2b : 200 / 61 / 64
##   d_med3a : 301 / 65 / 121
##   d_med3b : 301 / 65 / 121
# ==============================================================
# H18. Descriptive Table
# ==============================================================

cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("TABLE: Hispanic Sample Composition\n")
## TABLE: Hispanic Sample Composition
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
wt_mean <- function(x, w) {
  keep <- !is.na(x) & !is.na(w) & w > 0
  if (sum(keep) == 0) return(list(m = NA, n = 0))
  list(m = weighted.mean(x[keep], w[keep]), n = sum(keep))
}

print_row_h <- function(label, subset, hpa_status, hha_status) {
  n <- nrow(subset)
  pct <- 100 * n / nrow(d)
  pc1_m <- mean(subset$K5PC1H, na.rm = TRUE)
  pc2_m <- mean(subset$K5PC2H, na.rm = TRUE)
  w_res <- wt_mean(subset$ave_WAIS_raw, subset$wt)
  w_str <- ifelse(is.na(w_res$m), "    --", sprintf("%.2f", w_res$m))
  cat(sprintf("  %-25s %5d %5.1f%% %+.4f %+.4f  %4s  %4s  %5d %7s\n",
              label, n, pct, pc1_m, pc2_m, hpa_status, hha_status,
              w_res$n, w_str))
}

cat(sprintf("\n%-27s %5s %6s %7s %7s  %4s  %4s  %5s %7s\n",
            "Category", "N", "%", "PC1H", "PC2H", "HPA", "HHA", "N(W)", "Wt.W"))
## 
## Category                        N      %    PC1H    PC2H   HPA   HHA   N(W)    Wt.W
cat(paste(rep("-", 85), collapse = ""), "\n")
## -------------------------------------------------------------------------------------
cat("Panel A: Analytic Sample\n")
## Panel A: Analytic Sample
hh <- d[d$any_hisp_parent & !d$african_origin & d$mixed_h == 0, ]
print_row_h("Both Hispanic (HH)", hh, "Yes", "Yes*")
##   Both Hispanic (HH)          521  62.1% -0.0085 +0.0029   Yes  Yes*    333   -0.51
hw <- d[d$any_hisp_parent & !d$african_origin & d$mixed_h == 1, ]
print_row_h("Mixed couple (HW/HB/HO)", hw, "Yes", "Excl")
##   Mixed couple (HW/HB/HO)     206  24.6% +0.0225 +0.0118   Yes  Excl    171    0.42
cat("\nPanel B: Excluded\n")
## 
## Panel B: Excluded
afr <- d[d$any_hisp_parent & d$african_origin, ]
if (nrow(afr) > 0) print_row_h("African origin (excl)", afr, "Excl", "Excl")
no_hisp <- d[!d$any_hisp_parent, ]
print_row_h("No Hispanic parent", no_hisp, "Excl", "Excl")
##   No Hispanic parent          112  13.3% +0.0195 -0.0322  Excl  Excl     71    0.43
cat(sprintf("\n*HHA = Both parents Hispanic, excl African origin: N=%d\n", nrow(d_hha)))
## 
## *HHA = Both parents Hispanic, excl African origin: N=521
# ==============================================================
# Mixed parentage families 
# ==============================================================

# Reconstruct couple type for mixed families
d_mixed <- d_hpa[d_hpa$mixed_h == 1, ]
d_mixed$couple_type <- NA_character_
d_mixed$couple_type[d_mixed$CF1ETHRACE == 1 | d_mixed$CM1ETHRACE == 1] <- "HW"
d_mixed$couple_type[d_mixed$CF1ETHRACE == 2 | d_mixed$CM1ETHRACE == 2] <- "HB"
d_mixed$couple_type[is.na(d_mixed$couple_type)] <- "HO"

d_mixed <- d_hpa[!(d_hpa$CF1ETHRACE == 3 & d_hpa$CM1ETHRACE == 3), ]
cat("Mixed-couple Hispanic (HPA minus HHA): N =", nrow(d_mixed), "\n")
## Mixed-couple Hispanic (HPA minus HHA): N = 206
print(table(d_mixed$mixed_h))
## 
##   1 
## 206
# PPVT by couple type
cat("\nPPVT by couple type:\n")
## 
## PPVT by couple type:
for (s in c("HW", "HB", "HO")) {
  sub <- d_mixed[d_mixed$mixed_h == s & !is.na(d_mixed$PPVT), ]
  if (nrow(sub) >= 2) {
    cat(sprintf("  %s: N = %d, Mean = %.2f, SD = %.2f\n",
                s, nrow(sub), mean(sub$PPVT), sd(sub$PPVT)))
  }
}

#HW: N = 104, Mean = 103.53, SD = 16.31
#HB: N = 57, Mean = 93.82, SD = 11.68
#HO: N = 33, Mean = 99.09, SD = 13.18

### More diagnostic 

# ==============================================================
# Side-by-Side PC Diagnostics: Add Health vs FFCWS Hispanic
# ==============================================================

cat("\n", paste(rep("#", 80), collapse = ""), "\n")
## 
##  ################################################################################
cat("COMPARISON: Add Health vs FFCWS Hispanic PC Diagnostics\n")
## COMPARISON: Add Health vs FFCWS Hispanic PC Diagnostics
cat(paste(rep("#", 80), collapse = ""), "\n")
## ################################################################################
# ---- FFCWS: Fractional SIRE correlations with PCs ----
# Build fractional SIRE on full FFCWS Hispanic sample (d from Hispanic script)

cat("\n--- FFCWS: PC Correlations with Fractional SIRE (full sample, N =", nrow(d), ") ---\n")
## 
## --- FFCWS: PC Correlations with Fractional SIRE (full sample, N = 839 ) ---
# Fractional SIRE coding
d$frac_nhw <- 0
d$frac_nhb <- 0
d$frac_mex <- 0
d$frac_pr  <- 0

recode_eth_frac <- function(ethrace, h3b) {
  # Returns: "NHW", "NHB", "Mexican", "PR", "OtherHisp", or NA
  ifelse(ethrace == 1, "NHW",
         ifelse(ethrace == 2, "NHB",
                ifelse(ethrace == 3 & h3b == 1, "Mexican",
                       ifelse(ethrace == 3 & h3b == 2, "PR",
                              ifelse(ethrace == 3, "OtherHisp", NA_character_)))))
}

d$m_sire_eth <- recode_eth_frac(d$CM1ETHRACE, d$M1H3B)
d$f_sire_eth <- recode_eth_frac(d$CF1ETHRACE, d$F1H3B)

d$frac_nhw <- 0; d$frac_nhb <- 0; d$frac_mex <- 0; d$frac_pr <- 0

for (i in 1:nrow(d)) {
  me <- d$m_sire_eth[i]
  fe <- d$f_sire_eth[i]
  n_known <- sum(!is.na(c(me, fe)))
  if (n_known == 0) next
  
  for (parent_eth in na.omit(c(me, fe))) {
    w <- ifelse(n_known == 2, 0.5, 1.0)
    if (parent_eth == "NHW")     d$frac_nhw[i] <- d$frac_nhw[i] + w
    if (parent_eth == "NHB")     d$frac_nhb[i] <- d$frac_nhb[i] + w
    if (parent_eth == "Mexican") d$frac_mex[i] <- d$frac_mex[i] + w
    if (parent_eth == "PR")      d$frac_pr[i]  <- d$frac_pr[i]  + w
  }
}

cat(sprintf("\n%-8s %12s %12s %12s %12s\n",
            "PC", "r(frac_NHW)", "r(frac_NHB)", "r(frac_Mex)", "r(frac_PR)"))
## 
## PC        r(frac_NHW)  r(frac_NHB)  r(frac_Mex)   r(frac_PR)
cat(paste(rep("-", 60), collapse = ""), "\n")
## ------------------------------------------------------------
for (i in 1:5) {
  pc_var <- paste0("K5PC", i, "H")
  r_nhw <- cor(d[[pc_var]], d$frac_nhw, use = "complete.obs")
  r_nhb <- cor(d[[pc_var]], d$frac_nhb, use = "complete.obs")
  r_mex <- cor(d[[pc_var]], d$frac_mex, use = "complete.obs")
  r_pr  <- cor(d[[pc_var]], d$frac_pr,  use = "complete.obs")
  cat(sprintf("%-8s %+12.4f %+12.4f %+12.4f %+12.4f\n",
              pc_var, r_nhw, r_nhb, r_mex, r_pr))
}
## K5PC1H        +0.1071      +0.5437      -0.5100      +0.3686
## K5PC2H        +0.4237      -0.3671      +0.0804      +0.1290
## K5PC3H        -0.4285      +0.2769      +0.2721      +0.0634
## K5PC4H        -0.0793      +0.0200      -0.0431      -0.0704
## K5PC5H        -0.1128      -0.2129      -0.3031      +0.6275
# ---- Comparison Table ----
cat("\n\n", paste(rep("=", 80), collapse = ""), "\n")
## 
## 
##  ================================================================================
cat("SUMMARY COMPARISON\n")
## SUMMARY COMPARISON
cat(paste(rep("=", 80), collapse = ""), "\n")
## ================================================================================
cat("\n                    Add Health                    FFCWS\n")
## 
##                     Add Health                    FFCWS
cat("                    (Hisp-only PCA)               (NHW+NHB in panel)\n")
##                     (Hisp-only PCA)               (NHW+NHB in panel)
cat(paste(rep("-", 70), collapse = ""), "\n")
## ----------------------------------------------------------------------
cat("\nPC Interpretation:\n")
## 
## PC Interpretation:
cat("  Amerindian:       PC3 (r=+.64 Mex, r=-.48 PR)  Not identifiable\n")
##   Amerindian:       PC3 (r=+.64 Mex, r=-.48 PR)  Not identifiable
cat("  African:          PC5 (r=-.63 PR)               PC1H (r=+.57 NHB)\n")
##   African:          PC5 (r=-.63 PR)               PC1H (r=+.57 NHB)
cat("  European:         -PC5 (flipped)                PC2H (r=+.47 NHW)\n")
##   European:         -PC5 (flipped)                PC2H (r=+.47 NHW)
cat("  Non-European:     --                            PC3H (r=+.43 BothHisp)\n")
##   Non-European:     --                            PC3H (r=+.43 BothHisp)
cat("\nPGS Validation:\n")
## 
## PGS Validation:
cat("  WHR -> Amerindian:  R2=.39, PC3 B=+.56          Cannot validate\n")
##   WHR -> Amerindian:  R2=.39, PC3 B=+.56          Cannot validate
cat("  MDD3 -> African:   R2=.93, PC5 B=-.96           Cannot validate\n")
##   MDD3 -> African:   R2=.93, PC5 B=-.96           Cannot validate
cat("  Cross-loading:     Minimal                      N/A\n")
##   Cross-loading:     Minimal                      N/A
cat("\nPC Intercorrelations (within Hispanic sample):\n")
## 
## PC Intercorrelations (within Hispanic sample):
cat("  Add Health: max |r| = .18 (near-orthogonal)\n")
##   Add Health: max |r| = .18 (near-orthogonal)
cat("  FFCWS HHA:  PC2xPC3 = -.72 (severely collinear)\n")
##   FFCWS HHA:  PC2xPC3 = -.72 (severely collinear)
cat("\nMeasurement Invariance:\n")
## 
## Measurement Invariance:
cat("  Add Health AFR PC:  All pass (metric, scalar, strict)\n")
##   Add Health AFR PC:  All pass (metric, scalar, strict)
cat("  Add Health AMR PC:  Metric FAILS (DCFI=-.017)\n")
##   Add Health AMR PC:  Metric FAILS (DCFI=-.017)
cat("  FFCWS AFR PC:       Metric pass, Scalar FAILS (DCFI=-.022)\n")
##   FFCWS AFR PC:       Metric pass, Scalar FAILS (DCFI=-.022)
cat("\nConsequence:\n")
## 
## Consequence:
cat("  Add Health: g composite used for African PC models\n")
##   Add Health: g composite used for African PC models
cat("              g dropped for Amerindian PC models\n")
##               g dropped for Amerindian PC models
cat("  FFCWS:      g dropped entirely for Hispanic sample\n")
##   FFCWS:      g dropped entirely for Hispanic sample
cat("              Results relegated to supplement\n")
##               Results relegated to supplement