Measurement error in sibling fixed effects
30 October, 2025
Init
library(kirkegaard)## Loading required package: tidyverse## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr 1.1.4 ✔ readr 2.1.5
## ✔ forcats 1.0.1 ✔ stringr 1.5.2
## ✔ ggplot2 4.0.0 ✔ tibble 3.3.0
## ✔ lubridate 1.9.4 ✔ tidyr 1.3.1
## ✔ purrr 1.1.0
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag() masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
## Loading required package: magrittr
##
##
## Attaching package: 'magrittr'
##
##
## The following object is masked from 'package:purrr':
##
## set_names
##
##
## The following object is masked from 'package:tidyr':
##
## extract
##
##
## Loading required package: weights
##
## Loading required package: assertthat
##
##
## Attaching package: 'assertthat'
##
##
## The following object is masked from 'package:tibble':
##
## has_name
##
##
## Loading required package: psych
##
##
## Attaching package: 'psych'
##
##
## The following objects are masked from 'package:ggplot2':
##
## %+%, alpha
##
##
## Loading required package: robustbase
##
##
## Attaching package: 'kirkegaard'
##
##
## The following object is masked from 'package:psych':
##
## rescale
##
##
## The following object is masked from 'package:assertthat':
##
## are_equal
##
##
## The following object is masked from 'package:purrr':
##
## is_logical
##
##
## The following object is masked from 'package:base':
##
## +load_packages(
fixest,
splines
)
theme_set(theme_bw())
options(
digits = 3
)
#multithreading
#library(future)
#plan(multisession(workers = 8))Functions
Analysis
Simulation 1
set.seed(1)
n_families <- 100000 # Number of families
siblings_per_family <- 2
# Sibling correlation
r_sibling <- 0.5
# Effect size
beta <- 0.5
# For X: family mean + individual deviation
family_X <- rnorm(n_families, 0, sqrt(r_sibling))
individual_X <- matrix(rnorm(n_families * siblings_per_family, 0, sqrt(1 - r_sibling)),
nrow = n_families, ncol = siblings_per_family)
X <- family_X + individual_X
# For Y: family mean + individual deviation + effect of X
family_Y <- rnorm(n_families, 0, sqrt(r_sibling))
individual_Y <- matrix(rnorm(n_families * siblings_per_family, 0, sqrt(1 - r_sibling)),
nrow = n_families, ncol = siblings_per_family)
Y <- beta * X + family_Y + individual_Y
# Format as data.frame for analysis
sim_data <- data.frame(
family = rep(1:n_families, each = siblings_per_family),
sib = rep(1:siblings_per_family, times = n_families),
X = as.vector(t(X)),
Y = as.vector(t(Y))
)
sim_data_cors = sim_data %>% wtd.cors()
sim_data_cors## family sib X Y
## family 1.000000 0.000000 -0.000105 -0.001299
## sib 0.000000 1.000000 -0.000381 -0.000444
## X -0.000105 -0.000381 1.000000 0.447131
## Y -0.001299 -0.000444 0.447131 1.000000#verify siblings correlate 0.5
sim_data %>%
select(-Y) %>%
pivot_wider(names_from = sib, values_from = X) %>%
select(-1) %>%
wtd.cors()## 1 2
## 1 1.000 0.503
## 2 0.503 1.000sim_data %>%
select(-X) %>%
pivot_wider(names_from = sib, values_from = Y) %>%
select(-1) %>%
wtd.cors()## 1 2
## 1 1.000 0.503
## 2 0.503 1.000# Naive regression ignoring family structure
naive_model <- feols(Y ~ X, data = sim_data)
summary(naive_model)## OLS estimation, Dep. Var.: Y
## Observations: 200,000
## Standard-errors: IID
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.00112 0.00224 -0.5 0.6168
## X 0.50046 0.00224 223.6 < 2.2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## RMSE: 1.00271 Adj. R2: 0.199922# Sibling fixed effects regression
sib_fe_model <- feols(Y ~ X | family, data = sim_data)
summary(sib_fe_model)## OLS estimation, Dep. Var.: Y
## Observations: 200,000
## Fixed-effects: family: 100,000
## Standard-errors: IID
## Estimate Std. Error t value Pr(>|t|)
## X 0.499 0.00317 158 < 2.2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## RMSE: 0.500285 Adj. R2: 0.601669
## Within R2: 0.199029#now we add some measurement error to the exposure
#specify reliability
rel_X = 0.7
measurement_error_sd <- sqrt((1 - rel_X) / rel_X)
#add error
sim_data$X_measured <- standardize(sim_data$X + rnorm(nrow(sim_data), 0, measurement_error_sd))
#verify reliability is correct
cor(sim_data$X, sim_data$X_measured)^2## [1] 0.7#repeat models
# Naive regression ignoring family structure with measurement error
naive_model_me <- feols(Y ~ X_measured, data = sim_data)
summary(naive_model_me)## OLS estimation, Dep. Var.: Y
## Observations: 200,000
## Standard-errors: IID
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.00174 0.00233 -0.749 0.45379
## X_measured 0.41759 0.00233 179.512 < 2.2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## RMSE: 1.04033 Adj. R2: 0.138762# Sibling fixed effects regression with measurement error
sib_fe_model_me <- feols(Y ~ X_measured | family, data = sim_data)
summary(sib_fe_model_me)## OLS estimation, Dep. Var.: Y
## Observations: 200,000
## Fixed-effects: family: 100,000
## Standard-errors: IID
## Estimate Std. Error t value Pr(>|t|)
## X_measured 0.321 0.00293 109 < 2.2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## RMSE: 0.528239 Adj. R2: 0.555912
## Within R2: 0.107019# Compare estimates
estimates <- data.frame(
Model = c("Naive", "Sibling FE", "Naive with ME", "Sibling FE with ME"),
Estimate = c(coef(naive_model)["X"],
coef(sib_fe_model)["X"],
coef(naive_model_me)["X_measured"],
coef(sib_fe_model_me)["X_measured"])
)
estimates#repeat this for every reliability between 0.5 and 1
reliabilities <- seq(0.5, 1, by = 0.01)
set.seed(1)
results <- map_dfr(reliabilities, function(rel_X) {
measurement_error_sd <- sqrt((1 - rel_X) / rel_X)
sim_data$X_measured <- standardize(sim_data$X + rnorm(nrow(sim_data), 0, measurement_error_sd))
naive_model_me <- feols(Y ~ X_measured, data = sim_data)
sib_fe_model_me <- feols(Y ~ X_measured | family, data = sim_data)
tibble(
Reliability = rel_X,
Naive_Estimate = coef(naive_model_me)["X_measured"],
Sibling_FE_Estimate = coef(sib_fe_model_me)["X_measured"]
)
})
#numerical example at reliability = 0.7
sim_data$X_measured <- standardize(sim_data$X + rnorm(nrow(sim_data), 0, sqrt((1 - 0.7) / 0.7)))
#what is the sibling cor for X and X_measured
sim_data %>%
select(family, sib, X_measured) %>%
pivot_wider(names_from = sib, values_from = X_measured) %>%
summarise(cor = cor(`1`, `2`)) %>%
pull(cor)## [1] 0.352#analytic estimate
r_sibling * 0.7## [1] 0.35#add error adjusted estimates
results <- results %>%
mutate(
Naive_Estimate_Adjusted = Naive_Estimate / sqrt(Reliability),
# Sibling_FE_Estimate_Adjusted = Sibling_FE_Estimate / Reliability^1.15,
Naive_FE_correction_factor = beta / Naive_Estimate,
Sibling_FE_correction_factor = beta / Sibling_FE_Estimate,
Sibling_FE_Estimate_Adjusted = Sibling_FE_Estimate / (1 - (1 - Reliability) / (1 - (r_sibling*Reliability))),
# Sibling_FE_Estimate_Adjusted = Sibling_FE_Estimate / (Reliability * (1-r_sibling)),
)
# Plot results
results %>%
pivot_longer(cols = c(Naive_Estimate, Sibling_FE_Estimate,
Naive_Estimate_Adjusted, Sibling_FE_Estimate_Adjusted),
names_to = "Model",
values_to = "Estimate") %>%
ggplot(aes(x = Reliability, y = Estimate, color = Model)) +
geom_point() +
geom_smooth() +
geom_hline(yintercept = beta, linetype = "dashed", color = "black") +
labs(title = "Effect of Measurement Error on Estimates",
y = "Estimated Effect of X on Y",
x = "Reliability of X") +
theme_minimal()## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'
GG_save("figs/beta_comparison_adjusted.png")## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'#figure out a correct attentuation factor for the sibling FE estimate
#what does the plot look like?
results %>%
ggplot(aes(x = Reliability, Sibling_FE_correction_factor)) +
geom_point() +
geom_smooth() +
theme_bw() +
labs(
title = "Correction Factor for Sibling FE Estimate vs Reliability",
subtitle = "True effect = 0.5, sibling correlations are 0.5",
y = "Correction Factor (True Effect / Estimated Effect)",
x = "Reliability of X"
)## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'
GG_save("figs/sibling_fe_correction_factor.png")## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'#plot against the inverse of reliability to different powers
results %>%
mutate(
`inv_rel_1.00` = Sibling_FE_Estimate / Reliability,
`inv_rel_1.05` = Sibling_FE_Estimate / Reliability^1.05,
`inv_rel_1.10` = Sibling_FE_Estimate / Reliability^1.10,
`inv_rel_1.15` = Sibling_FE_Estimate / Reliability^1.15,
`inv_rel_1.20` = Sibling_FE_Estimate / Reliability^1.20,
) %>%
pivot_longer(cols = c(Sibling_FE_Estimate, matches("inv_rel_1.")),
names_to = "Model",
values_to = "Estimate") %>%
ggplot(aes(x = Reliability, y = Estimate, color = Model)) +
geom_point() +
geom_smooth() +
geom_hline(yintercept = beta, linetype = "dashed", color = "black") +
labs(title = "Effect of Measurement Error on Sibling FE Estimates with different power corrections",
subtitle = "True effect = 0.5, sibling correlations are 0.5",
y = "Estimated Effect of X on Y",
x = "Reliability of X") +
theme_bw()## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'
GG_save("figs/sibling_fe_inverse_powers.png")## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'#looks like almost inverse function
nls_fit <- nls(Sibling_FE_correction_factor ~ Reliability^-a, start = list(a=1), data=results)
nls_fit2 <- nls(Sibling_FE_correction_factor ~ a / Reliability + b, start = list(a=1, b=0), data=results)
nls_fit3 <- nls(Sibling_FE_correction_factor ~ exp(a * (1 - Reliability)), start = list(a=1), data=results)
#predict and compare
results <- results %>%
mutate(
Sibling_FE_Estimate_Adjusted_Spearman = Sibling_FE_Estimate / sqrt(Reliability),
Sibling_FE_Estimate_Adjusted_Spearman_sq = Sibling_FE_Estimate / Reliability,
Sibling_FE_Estimate_Adjusted_inverse = Sibling_FE_Estimate * (Reliability^-coef(nls_fit)["a"]),
Sibling_FE_Estimate_Adjusted_rational = Sibling_FE_Estimate * predict(nls_fit2),
Sibling_FE_Estimate_Adjusted_exp = Sibling_FE_Estimate * predict(nls_fit3),
)
# Plot results with NLS adjustment
results %>%
pivot_longer(cols = c(Sibling_FE_Estimate, matches("Sibling_FE_Estimate_Adjusted")),
names_to = "Model",
values_to = "Estimate") %>%
ggplot(aes(x = Reliability, y = Estimate, color = Model)) +
geom_point() +
geom_smooth() +
geom_hline(yintercept = beta, linetype = "dashed", color = "black") +
labs(title = "Effect of Measurement Error on Sibling FE Estimates and correction methods",
y = "Estimated Effect of X on Y",
x = "Reliability of X") +
theme_bw()## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'
GG_save("figs/sibling_fe_nls_corrections.png")## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'Simulation 2
# Vary sibling correlation, reliability, and beta
sibling_correlations <- seq(0, 0.9, by = 0.1)
reliabilities <- seq(0.5, 1, by = 0.1)
betas <- c(0.2, 0.5, 0.8)
set.seed(1)
simulation_results <- expand_grid(
Sibling_Correlation = sibling_correlations,
Reliability = reliabilities,
Beta = betas
) %>%
rowwise() %>%
mutate(
Measurement_Error_SD = sqrt((1 - Reliability) / Reliability),
# Simulate data
Results = list({
n_families <- 50000
siblings_per_family <- 2
family_X <- rnorm(n_families, 0, sqrt(Sibling_Correlation))
individual_X <- matrix(rnorm(n_families * siblings_per_family, 0, sqrt(1 - Sibling_Correlation)),
nrow = n_families, ncol = siblings_per_family)
X <- family_X + individual_X
family_Y <- rnorm(n_families, 0, sqrt(Sibling_Correlation))
individual_Y <- matrix(rnorm(n_families * siblings_per_family, 0, sqrt(1 - Sibling_Correlation)),
nrow = n_families, ncol = siblings_per_family)
Y <- Beta * X + family_Y + individual_Y
sim_data <- data.frame(
family = rep(1:n_families, each = siblings_per_family),
sib = rep(1:siblings_per_family, times = n_families),
X = as.vector(t(X)),
Y = as.vector(t(Y))
)
sim_data$X_measured <- standardize(sim_data$X + rnorm(nrow(sim_data), 0, Measurement_Error_SD))
sib_fe_model_me <- feols(Y ~ X_measured | family, data = sim_data)
tibble(
Estimated_Effect = coef(sib_fe_model_me)["X_measured"]
)
})
) %>%
unnest(cols = c(Results))
#apply the fitted models from above
simulation_results <- simulation_results %>%
mutate(
rational = Estimated_Effect * predict(nls_fit2, newdata = data.frame(Reliability = Reliability)),
exp = Estimated_Effect * predict(nls_fit3, newdata = data.frame(Reliability = Reliability)),
inverse = Estimated_Effect * (Reliability^-coef(nls_fit)["a"])
)
# Plot results for each beta
simulation_results %>%
pivot_longer(cols = c(Estimated_Effect, rational, exp, inverse),
names_to = "Model",
values_to = "Estimate") %>%
ggplot(aes(x = Reliability, y = Estimate, color = Model)) +
geom_point() +
geom_smooth() +
geom_hline(aes(yintercept = Beta), linetype = "dashed", color = "black") +
facet_wrap(~ Beta + Sibling_Correlation, labeller = "label_both") +
labs(title = "Effect of Measurement Error on Sibling FE Estimates across parameters",
y = "Estimated Effect of X on Y",
x = "Reliability of X") +
theme_bw() +
theme(strip.text = element_text(size = 7))## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
GG_save("figs/simulation2_results.png")## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf#try some more models
simulation_results <- simulation_results %>%
mutate(
Correction_Factor = Beta / Estimated_Effect
)
# 1. Power Product Model
nls_fit1 <- nls(Correction_Factor ~ Reliability^-a * (1 - Sibling_Correlation)^-b,
start = list(a=1, b=1), data = simulation_results)
# 2. Reciprocal-Linear Model
nls_fit2 <- nls(Correction_Factor ~ a / (Reliability + b * Sibling_Correlation),
start = list(a=1, b=1), data = simulation_results)
# 3. Product Exponential Model
nls_fit3 <- nls(Correction_Factor ~ exp(a * (1 - Reliability) + b * Sibling_Correlation),
start = list(a=1, b=1), data = simulation_results)
# 4. Power of Linear Combination
nls_fit4 <- nls(Correction_Factor ~ (Reliability * (1 - Sibling_Correlation))^-a,
start = list(a=1), data = simulation_results)
# 5. Generalized Product Model
nls_fit5 <- nls(Correction_Factor ~ a * Reliability^-b * (1 - Sibling_Correlation)^-c,
start = list(a=1, b=1, c=1), data = simulation_results)
# 6. Additive Exponent Model
nls_fit6 <- nls(Correction_Factor ~ Reliability^-a + (1 - Sibling_Correlation)^-b,
start = list(a=1, b=1), data = simulation_results)
#spline interaction
lm_fit_spline <- lm(Correction_Factor ~ ns(Reliability, df=4) * ns(Sibling_Correlation, df=4),
data = simulation_results)
#apply models to the data
simulation_results <- simulation_results %>%
mutate(
Power_Product = Estimated_Effect * predict(nls_fit1, newdata = simulation_results),
Reciprocal_Linear = Estimated_Effect * predict(nls_fit2, newdata = simulation_results),
Product_Exponential = Estimated_Effect * predict(nls_fit3, newdata = simulation_results),
Power_Linear_Combination = Estimated_Effect * predict(nls_fit4, newdata = simulation_results),
Generalized_Product = Estimated_Effect * predict(nls_fit5, newdata = simulation_results),
Additive_Exponent = Estimated_Effect * predict(nls_fit6, newdata = simulation_results),
Spline_Interaction = Estimated_Effect * predict(lm_fit_spline, newdata = simulation_results)
)
# Plot results for each beta with new models
simulation_results %>%
pivot_longer(cols = c(Estimated_Effect, Power_Product, Reciprocal_Linear, Product_Exponential,
Power_Linear_Combination, Generalized_Product, Additive_Exponent, Spline_Interaction),
names_to = "Model",
values_to = "Estimate") %>%
ggplot(aes(x = Reliability, y = Estimate, color = Model)) +
geom_point() +
geom_smooth() +
geom_hline(aes(yintercept = Beta), linetype = "dashed", color = "black") +
facet_wrap(~ Beta + Sibling_Correlation, labeller = "label_both") +
labs(title = "Effect of Measurement Error on Sibling FE Estimates across parameters with new models",
y = "Estimated Effect of X on Y",
x = "Reliability of X") +
theme_bw() +
theme(strip.text = element_text(size = 7))## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
GG_save("figs/simulation2_results_extended.png")## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6
## Warning in simpleLoess(y, x, w, span, degree = degree, parametric = parametric,
## : Chernobyl! trL>n 6## Warning in sqrt(sum.squares/one.delta): NaNs produced## Warning in stats::qt(level/2 + 0.5, pred$df): NaNs produced## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(ids, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf#compare model accuracy using fixed effects for beta and sibling cor
model_performance <- simulation_results %>%
pivot_longer(cols = c(Power_Product, Reciprocal_Linear, Product_Exponential,
Power_Linear_Combination, Generalized_Product, Additive_Exponent, Spline_Interaction),
names_to = "Model",
values_to = "Estimate") %>%
mutate(
Absolute_Error = abs(Estimate - Beta)
) %>%
group_by(Model) %>%
summarise(
Mean_Absolute_Error = mean(Absolute_Error),
RMSE = sqrt(mean(Absolute_Error^2))
) %>%
arrange(Mean_Absolute_Error)
model_performance#spline predictions for values in embryo selection study
embryo_selection_predictions <- expand_grid(
Sibling_Correlation = seq(0, 0.9, by = 0.1),
Reliability = seq(0.5, 1, by = 0.01)
) %>%
mutate(
Spline_Interaction_Prediction = predict(lm_fit_spline, newdata = .)
)Simulation 3
Consider measurement error in the outcome instead.
# Vary sibling correlation, reliability, and beta
sibling_correlations <- seq(0, 0.9, by = 0.1)
reliabilities <- seq(0.5, 1, by = 0.1)
betas <- c(0.2, 0.5, 0.8)
set.seed(1)
simulation_results <- expand_grid(
Sibling_Correlation = sibling_correlations,
Reliability = reliabilities,
Beta = betas
) %>%
rowwise() %>%
mutate(
# Simulate data
Results = list({
n_families <- 50000
siblings_per_family <- 2
# Simulate family and individual X
family_X <- rnorm(n_families, 0, sqrt(Sibling_Correlation))
individual_X <- matrix(rnorm(n_families * siblings_per_family, 0, sqrt(1 - Sibling_Correlation)),
nrow = n_families, ncol = siblings_per_family)
X <- as.vector(t(family_X + individual_X))
# Simulate family and individual Y noise
family_Y <- rnorm(n_families, 0, sqrt(Sibling_Correlation))
individual_Y <- matrix(rnorm(n_families * siblings_per_family, 0, sqrt(1 - Sibling_Correlation)),
nrow = n_families, ncol = siblings_per_family)
Y_true <- (Beta * X + as.vector(t(family_Y + individual_Y))) %>% standardize()
# Compute measurement error SD for *this* Y_true variance
Measurement_Error_SD <- sqrt((1 - Reliability) / Reliability)
Y_measured <- Y_true * sqrt(Reliability) + rnorm(length(Y_true), 0, Measurement_Error_SD)
sim_data <- data.frame(
family = rep(1:n_families, each = siblings_per_family),
sib = rep(1:siblings_per_family, times = n_families),
X = X,
Y_true = Y_true,
Y_measured = Y_measured
)
true_beta_model <- feols(Y_true ~ X | family, data = sim_data)
sib_fe_model_me <- feols(Y_measured ~ X | family, data = sim_data)
naive_model_me <- feols(Y_measured ~ X, data = sim_data)
tibble(
true_beta = coef(true_beta_model)["X"],
fe_effect = coef(sib_fe_model_me)["X"],
naive_effect = coef(naive_model_me)["X"]
)
})
) %>%
unnest(cols = c(Results))
#calculate the true beta mean by raw beta
simulation_results = simulation_results %>%
group_by(Beta) %>%
summarise(
true_beta_mean = mean(true_beta) %>% round(2),
sd = sd(true_beta)
) %>%
select(-sd) %>%
right_join(simulation_results, by = "Beta")
# Plot results for each beta
simulation_results %>%
mutate(
#adjusted estimates
fe_effect_adj_Spearman = fe_effect / sqrt(Reliability),
naive_effect_adj_Spearman = naive_effect / sqrt(Reliability)
) %>%
pivot_longer(cols = c(fe_effect, naive_effect, fe_effect_adj_Spearman, naive_effect_adj_Spearman),
names_to = "Model",
values_to = "Estimate") %>%
ggplot(aes(x = Reliability, y = Estimate, color = Model)) +
geom_point() +
geom_line() +
geom_hline(aes(yintercept = true_beta_mean), linetype = "dashed", color = "black") +
labs(title = "Effect of Measurement Error in Outcome on Estimates",
y = "Estimated Effect of X on Y",
x = "Reliability of Y") +
theme_bw() +
facet_wrap(~ true_beta_mean + Sibling_Correlation, labeller = "label_both") +
theme(strip.text = element_text(size = 6))
GG_save("figs/simulation3_results.png")Meta
#versions
write_sessioninfo()## R version 4.5.1 (2025-06-13)
## Platform: x86_64-pc-linux-gnu
## Running under: Linux Mint 21.1
##
## Matrix products: default
## BLAS: /usr/lib/x86_64-linux-gnu/blas/libblas.so.3.10.0
## LAPACK: /usr/lib/x86_64-linux-gnu/lapack/liblapack.so.3.10.0 LAPACK version 3.10.0
##
## locale:
## [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C
## [3] LC_TIME=en_US.UTF-8 LC_COLLATE=en_US.UTF-8
## [5] LC_MONETARY=en_DK.UTF-8 LC_MESSAGES=en_US.UTF-8
## [7] LC_PAPER=en_DK.UTF-8 LC_NAME=C
## [9] LC_ADDRESS=C LC_TELEPHONE=C
## [11] LC_MEASUREMENT=en_DK.UTF-8 LC_IDENTIFICATION=C
##
## time zone: Europe/Brussels
## tzcode source: system (glibc)
##
## attached base packages:
## [1] splines stats graphics grDevices utils datasets methods
## [8] base
##
## other attached packages:
## [1] fixest_0.13.2 kirkegaard_2025-10-17 robustbase_0.99-6
## [4] psych_2.5.6 assertthat_0.2.1 weights_1.1.2
## [7] magrittr_2.0.4 lubridate_1.9.4 forcats_1.0.1
## [10] stringr_1.5.2 dplyr_1.1.4 purrr_1.1.0
## [13] readr_2.1.5 tidyr_1.3.1 tibble_3.3.0
## [16] ggplot2_4.0.0 tidyverse_2.0.0
##
## loaded via a namespace (and not attached):
## [1] Rdpack_2.6.4 mnormt_2.1.1 gridExtra_2.3
## [4] sandwich_3.1-1 rlang_1.1.6 multcomp_1.4-28
## [7] dreamerr_1.5.0 compiler_4.5.1 mgcv_1.9-3
## [10] gdata_3.0.1 systemfonts_1.3.1 vctrs_0.6.5
## [13] pkgconfig_2.0.3 shape_1.4.6.1 fastmap_1.2.0
## [16] backports_1.5.0 labeling_0.4.3 rmarkdown_2.30
## [19] tzdb_0.5.0 nloptr_2.2.1 ragg_1.5.0
## [22] xfun_0.53 glmnet_4.1-10 jomo_2.7-6
## [25] cachem_1.1.0 jsonlite_2.0.0 stringmagic_1.2.0
## [28] pan_1.9 broom_1.0.10 parallel_4.5.1
## [31] cluster_2.1.8.1 R6_2.6.1 bslib_0.9.0
## [34] stringi_1.8.7 RColorBrewer_1.1-3 boot_1.3-32
## [37] rpart_4.1.24 jquerylib_0.1.4 numDeriv_2016.8-1.1
## [40] estimability_1.5.1 Rcpp_1.1.0 iterators_1.0.14
## [43] knitr_1.50 zoo_1.8-14 base64enc_0.1-3
## [46] Matrix_1.7-4 nnet_7.3-20 timechange_0.3.0
## [49] tidyselect_1.2.1 rstudioapi_0.17.1 yaml_2.3.10
## [52] codetools_0.2-20 lattice_0.22-7 withr_3.0.2
## [55] S7_0.2.0 coda_0.19-4.1 evaluate_1.0.5
## [58] foreign_0.8-90 survival_3.8-3 pillar_1.11.1
## [61] mice_3.18.0 checkmate_2.3.3 foreach_1.5.2
## [64] reformulas_0.4.1 generics_0.1.4 hms_1.1.3
## [67] scales_1.4.0 minqa_1.2.8 gtools_3.9.5
## [70] xtable_1.8-4 glue_1.8.0 emmeans_1.11.2-8
## [73] Hmisc_5.2-4 tools_4.5.1 data.table_1.17.8
## [76] lme4_1.1-37 mvtnorm_1.3-3 grid_4.5.1
## [79] rbibutils_2.3 colorspace_2.1-2 nlme_3.1-168
## [82] htmlTable_2.4.3 Formula_1.2-5 cli_3.6.5
## [85] textshaping_1.0.4 gtable_0.3.6 DEoptimR_1.1-4
## [88] sass_0.4.10 digest_0.6.37 TH.data_1.1-4
## [91] htmlwidgets_1.6.4 farver_2.1.2 htmltools_0.5.8.1
## [94] lifecycle_1.0.4 mitml_0.4-5 MASS_7.3-65