Regresi Logistik Pulau Sulawesi Tanpa Penanganan
Andi Illa Erviani Nensi
2025-09-30
library(tidyverse)## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr 1.1.4 ✔ readr 2.1.5
## ✔ forcats 1.0.0 ✔ 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 errorslibrary(tidymodels)## ── Attaching packages ────────────────────────────────────── tidymodels 1.4.1 ──
## ✔ broom 1.0.9 ✔ rsample 1.3.1
## ✔ dials 1.4.2 ✔ tailor 0.1.0
## ✔ infer 1.0.9 ✔ tune 2.0.0
## ✔ modeldata 1.5.1 ✔ workflows 1.3.0
## ✔ parsnip 1.3.3 ✔ workflowsets 1.1.1
## ✔ recipes 1.3.1 ✔ yardstick 1.3.2
## ── Conflicts ───────────────────────────────────────── tidymodels_conflicts() ──
## ✖ scales::discard() masks purrr::discard()
## ✖ dplyr::filter() masks stats::filter()
## ✖ recipes::fixed() masks stringr::fixed()
## ✖ dplyr::lag() masks stats::lag()
## ✖ yardstick::spec() masks readr::spec()
## ✖ recipes::step() masks stats::step()library(DataExplorer)
library(readxl)
library(psych)##
## Attaching package: 'psych'
##
## The following objects are masked from 'package:scales':
##
## alpha, rescale
##
## The following objects are masked from 'package:ggplot2':
##
## %+%, alphalibrary(themis)df <- read_excel("D:/S2 IPB/Semester 3/Pemodelan Klasifikasi/tugas-3/Data Tugas-2 (2).xlsx")
df## # A tibble: 6,648 × 7
## Nomor provinsi `Peringkat Akreditasi` Lit_2023 Num_2023 Lit_2024 Num_2024
## <dbl> <chr> <chr> <dbl> <dbl> <dbl> <dbl>
## 1 1 Prov. Jawa … A 20 40 0 0
## 2 2 Prov. Nusa … B 80 48.8 82.2 62.8
## 3 3 Prov. Jawa … A 91.1 82.2 93.3 93.3
## 4 4 Prov. Sumat… A 57.8 57.8 64.4 62.2
## 5 5 Prov. Jawa … B 55.6 66.7 83.3 66.7
## 6 6 Prov. Sulaw… A 51.1 51.1 71.8 55.6
## 7 7 Prov. Papua C 56.5 61.9 69.2 30.8
## 8 8 Prov. Bengk… B 31.6 52.6 73.9 78.3
## 9 9 Prov. Nusa … A 86.7 71.1 88.9 86.7
## 10 10 Prov. Nusa … C 24.4 48.9 17.8 28.9
## # ℹ 6,638 more rowsdf <- df %>%
select(-Nomor)df1 <- df %>% filter(provinsi %in% c("Prov. Sulawesi Utara", "Prov. Sulawesi Tengah", "Prov. Sulawesi Selatan", "Prov. Sulawesi Tenggara", "Prov. Sulawesi Barat"))glimpse(df1)## Rows: 606
## Columns: 6
## $ provinsi <chr> "Prov. Sulawesi Utara", "Prov. Sulawesi Tengah"…
## $ `Peringkat Akreditasi` <chr> "A", "B", "B", "B", "B", "A", "Tidak Terakredit…
## $ Lit_2023 <dbl> 51.11, 32.00, 38.24, 33.33, 68.89, 86.67, 50.00…
## $ Num_2023 <dbl> 51.11, 44.00, 55.88, 66.67, 60.00, 77.78, 37.50…
## $ Lit_2024 <dbl> 71.795, 52.381, 56.250, 20.000, 86.667, 88.889,…
## $ Num_2024 <dbl> 55.556, 47.619, 65.625, 60.000, 86.667, 80.000,…glimpse(df1)## Rows: 606
## Columns: 6
## $ provinsi <chr> "Prov. Sulawesi Utara", "Prov. Sulawesi Tengah"…
## $ `Peringkat Akreditasi` <chr> "A", "B", "B", "B", "B", "A", "Tidak Terakredit…
## $ Lit_2023 <dbl> 51.11, 32.00, 38.24, 33.33, 68.89, 86.67, 50.00…
## $ Num_2023 <dbl> 51.11, 44.00, 55.88, 66.67, 60.00, 77.78, 37.50…
## $ Lit_2024 <dbl> 71.795, 52.381, 56.250, 20.000, 86.667, 88.889,…
## $ Num_2024 <dbl> 55.556, 47.619, 65.625, 60.000, 86.667, 80.000,…df <- df %>%
mutate(across(where(is.character),as.factor))df1 <- df1 %>%
mutate(across(where(is.character),as.factor))Eksplorasi Data Nasional
plot_intro(df,theme_config = theme_classic())
df <- df %>%
na.omitplot_boxplot(data = df,
by = "Peringkat Akreditasi",
geom_boxplot_args = list(fill="#03A9F4"),
ggtheme = theme_classic())
plot_boxplot(data = df,
by = "provinsi",
geom_boxplot_args = list(fill="#03A9F4"),
ggtheme = theme_classic())
1. Distribusi Kategori
# Jumlah sekolah per akreditasi
df %>% count(`Peringkat Akreditasi`) %>%
ggplot(aes(x = `Peringkat Akreditasi`, y = n, fill = `Peringkat Akreditasi`)) +
geom_col() +
theme_classic() +
labs(title = "Distribusi Sekolah per Peringkat Akreditasi", y = "Jumlah")
# Jumlah sekolah per provinsi (Top 10)
df %>% count(provinsi) %>%
arrange(desc(n)) %>%
slice(1:10) %>%
ggplot(aes(x = reorder(provinsi, n), y = n, fill = provinsi)) +
geom_col(show.legend = FALSE) +
coord_flip() +
theme_classic() +
labs(title = "Top 10 Provinsi dengan Jumlah Sekolah Terbanyak")
2. Statistik Ringkasan per Provinsi
df %>%
group_by(provinsi) %>%
summarise(across(starts_with("Lit_"), mean, na.rm = TRUE),
across(starts_with("Num_"), mean, na.rm = TRUE)) %>%
arrange(desc(Lit_2023))## Warning: There was 1 warning in `summarise()`.
## ℹ In argument: `across(starts_with("Lit_"), mean, na.rm = TRUE)`.
## ℹ In group 1: `provinsi = Luar Negeri`.
## Caused by warning:
## ! The `...` argument of `across()` is deprecated as of dplyr 1.1.0.
## Supply arguments directly to `.fns` through an anonymous function instead.
##
## # Previously
## across(a:b, mean, na.rm = TRUE)
##
## # Now
## across(a:b, \(x) mean(x, na.rm = TRUE))## # A tibble: 39 × 5
## provinsi Lit_2023 Lit_2024 Num_2023 Num_2024
## <fct> <dbl> <dbl> <dbl> <dbl>
## 1 Luar Negeri 96.9 95.0 88.3 96.3
## 2 Prov. D.I. Yogyakarta 94.8 95.8 89.9 91.2
## 3 Prov. D.K.I. Jakarta 93.6 94.8 88.1 90.8
## 4 Prov. Jawa Tengah 85.5 86.3 78.6 82.7
## 5 Prov. Bali 84.5 85.3 78.7 83.1
## 6 Prov. Kepulauan Bangka Belitung 84.3 83.2 74.9 78.6
## 7 Prov. Kepulauan Riau 81.6 80.4 74.4 77.7
## 8 Prov. Kalimantan Timur 79.7 83.5 71.6 77.5
## 9 Prov. Kalimantan Selatan 78.0 80.1 69.7 76.9
## 10 Prov. Jawa Barat 76.6 78.8 70.5 76.3
## # ℹ 29 more rows3. Korelasi Antar Variabel Numerik
library(corrplot)## corrplot 0.95 loadeddf %>%
select(starts_with("Lit_"), starts_with("Num_")) %>%
cor(use = "pairwise.complete.obs") %>%
corrplot(method = "color",
tl.cex = 0.7, # ukuran label
addCoef.col = "black", # tampilkan angka korelasi
number.cex = 0.6) # ukuran angka
cor_mat <- df %>%
select(starts_with("Lit_"), starts_with("Num_")) %>%
cor(use = "pairwise.complete.obs")
cor_mat## Lit_2023 Lit_2024 Num_2023 Num_2024
## Lit_2023 1.0000000 0.8201393 0.8720485 0.7898178
## Lit_2024 0.8201393 1.0000000 0.7644512 0.8890335
## Num_2023 0.8720485 0.7644512 1.0000000 0.7569328
## Num_2024 0.7898178 0.8890335 0.7569328 1.00000004. Boxplot & Violin Plot per Akreditasi
df %>%
pivot_longer(cols = starts_with("Lit_"):starts_with("Num_"),
names_to = "Variabel", values_to = "Nilai") %>%
ggplot(aes(x = `Peringkat Akreditasi`, y = Nilai, fill = `Peringkat Akreditasi`)) +
geom_violin(trim = FALSE, alpha = 0.6) +
geom_boxplot(width = 0.1, outlier.size = 0.5, color = "black") +
facet_wrap(~Variabel, scales = "free_y") +
theme_classic() +
labs(title = "Distribusi Literasi & Numerasi per Akreditasi")## Warning in x:y: numerical expression has 2 elements: only the first used
6. Outlier Detection
DataExplorer::plot_density(df, ncol = 2, ggtheme = theme_classic())
Eksplorasi Sulawesi
library(dplyr)plot_intro(df1,theme_config = theme_classic())
library(DataExplorer)
library(ggplot2)
plot_boxplot(data = df1,
by = "Peringkat Akreditasi",
geom_boxplot_args = list(fill="#03A9F4"),
ggtheme = theme_classic())
library(DataExplorer)
library(ggplot2)
plot_boxplot(data = df1,
by = "provinsi",
geom_boxplot_args = list(fill="#03A9F4"),
ggtheme = theme_classic())
library(ggplot2)
library(dplyr)
# Contoh untuk Lit_2023
ggplot(df1, aes(x = provinsi, y = Lit_2023, fill = `Peringkat Akreditasi`)) +
geom_boxplot() +
theme_classic() +
coord_flip() +
labs(title = "Boxplot Literasi 2023 per Provinsi di Sulawesi berdasarkan Akreditasi",
x = "Provinsi", y = "Literasi 2023")
df_long <- df1 %>%
pivot_longer(cols = starts_with("Lit_"):starts_with("Num_"),
names_to = "Variabel", values_to = "Nilai")## Warning in x:y: numerical expression has 2 elements: only the first usedggplot(df_long, aes(x = provinsi, y = Nilai, fill = `Peringkat Akreditasi`)) +
geom_boxplot() +
facet_wrap(~Variabel, scales = "free_y") +
theme_classic() +
coord_flip() +
labs(title = "Boxplot Literasi & Numerasi per Provinsi di Sulawesi berdasarkan Akreditasi",
x = "Provinsi", y = "Nilai")
df1$`Peringkat Akreditasi` <- as.factor(df1$`Peringkat Akreditasi`)library(dplyr)
df1$`Peringkat Akreditasi` <- as.factor(df1$`Peringkat Akreditasi`)colnames(df1)## [1] "provinsi" "Peringkat Akreditasi" "Lit_2023"
## [4] "Num_2023" "Lit_2024" "Num_2024"plot_bar(data = df1,
by = "Peringkat.Akreditasi",
ggtheme = theme_classic())## Warning: `aes_string()` was deprecated in ggplot2 3.0.0.
## ℹ Please use tidy evaluation idioms with `aes()`.
## ℹ See also `vignette("ggplot2-in-packages")` for more information.
## ℹ The deprecated feature was likely used in the DataExplorer package.
## Please report the issue at
## <https://github.com/boxuancui/DataExplorer/issues>.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.
### 1. Distribusi Akreditasi di Sulawesi
df1 %>%
count(`Peringkat Akreditasi`) %>%
ggplot(aes(x = `Peringkat Akreditasi`, y = n, fill = `Peringkat Akreditasi`)) +
geom_col() +
theme_classic() +
labs(title = "Distribusi Sekolah per Akreditasi di Sulawesi", y = "Jumlah")
### 2. Distribusi Sekolah per Provinsi di Sulawesi
df1 %>%
count(provinsi) %>%
ggplot(aes(x = reorder(provinsi, n), y = n, fill = provinsi)) +
geom_col(show.legend = FALSE) +
coord_flip() +
theme_classic() +
labs(title = "Jumlah Sekolah per Provinsi di Sulawesi", y = "Jumlah", x = "Provinsi")
### 3. Rata-rata Literasi & Numerasi per Provinsi
df1 %>%
group_by(provinsi) %>%
summarise(across(starts_with("Lit_"), mean, na.rm = TRUE),
across(starts_with("Num_"), mean, na.rm = TRUE)) %>%
pivot_longer(cols = -provinsi, names_to = "Variabel", values_to = "Rata2") %>%
ggplot(aes(x = provinsi, y = Rata2, fill = Variabel)) +
geom_col(position = "dodge") +
coord_flip() +
theme_classic() +
labs(title = "Rata-rata Literasi & Numerasi per Provinsi di Sulawesi")
### 4. Perbandingan Literasi & Numerasi Antar Akreditasi di
Sulawesi
df1 %>%
pivot_longer(cols = starts_with("Lit_"):starts_with("Num_"),
names_to = "Variabel", values_to = "Nilai") %>%
ggplot(aes(x = `Peringkat Akreditasi`, y = Nilai, fill = `Peringkat Akreditasi`)) +
geom_violin(trim = FALSE, alpha = 0.6) +
geom_boxplot(width = 0.1, color = "black") +
facet_wrap(~Variabel, scales = "free_y") +
theme_classic() +
labs(title = "Literasi & Numerasi per Akreditasi di Sulawesi")## Warning in x:y: numerical expression has 2 elements: only the first used
### 5. Korelasi Literasi–Numerasi di Sulawesi
cor_mat_sul <- df1 %>%
select(starts_with("Lit_"), starts_with("Num_")) %>%
cor(use = "pairwise.complete.obs")
corrplot::corrplot(cor_mat_sul, method = "color",
addCoef.col = "black", number.cex = 0.6, tl.cex = 0.7)
6. Perbandingan Nasional vs Sulawesi
# Rata-rata nasional
avg_nasional <- df %>%
summarise(across(starts_with("Lit_"), mean, na.rm = TRUE),
across(starts_with("Num_"), mean, na.rm = TRUE)) %>%
mutate(Kelompok = "Nasional")
# Rata-rata Sulawesi
avg_sumsel <- df1 %>%
summarise(across(starts_with("Lit_"), mean, na.rm = TRUE),
across(starts_with("Num_"), mean, na.rm = TRUE)) %>%
mutate(Kelompok = "Sulawesi")
# Gabungkan
avg_compare <- bind_rows(avg_nasional, avg_sumsel) %>%
pivot_longer(cols = -Kelompok, names_to = "Variabel", values_to = "Rata2")
avg_compare## # A tibble: 8 × 3
## Kelompok Variabel Rata2
## <chr> <chr> <dbl>
## 1 Nasional Lit_2023 65.1
## 2 Nasional Lit_2024 67.9
## 3 Nasional Num_2023 62.1
## 4 Nasional Num_2024 65.9
## 5 Sulawesi Lit_2023 58.3
## 6 Sulawesi Lit_2024 61.3
## 7 Sulawesi Num_2023 55.9
## 8 Sulawesi Num_2024 59.7ggplot(avg_compare, aes(x = Variabel, y = Rata2, fill = Kelompok)) +
geom_col(position = "dodge") +
theme_classic() +
labs(title = "Perbandingan Rata-rata Literasi & Numerasi: Nasional vs Sulawesi",
x = "Variabel", y = "Rata-rata")
# Rata-rata tiap provinsi
prov_avg <- df %>%
group_by(provinsi) %>%
summarise(across(starts_with("Lit_"), mean, na.rm = TRUE),
across(starts_with("Num_"), mean, na.rm = TRUE))
# Filter Sulawesi saja
prov_sumsel_avg <- prov_avg %>%
filter(provinsi %in% c("Prov. Sulawesi Selatan", "Prov. Sulawesi Tenggara",
"Prov. Sulawesi Tengah", "Prov. Sulawesi Barat",
"Prov. Sulawesi Utara", "Gorontalo"))
# Gabungkan Nasional + Provinsi Sulawesi
compare_detail <- bind_rows(
avg_nasional %>% mutate(provinsi = "Nasional"),
prov_sumsel_avg
) %>%
pivot_longer(cols = starts_with("Lit_"):starts_with("Num_"),
names_to = "Variabel", values_to = "Rata2")## Warning in x:y: numerical expression has 2 elements: only the first used# Plot
ggplot(compare_detail, aes(x = Variabel, y = Rata2, fill = provinsi)) +
geom_col(position = "dodge") +
theme_classic() +
labs(title = "Perbandingan Nasional vs Sulawesi",
x = "Variabel", y = "Rata-rata") +
theme(axis.text.x = element_text(angle = 45, hjust = 1))
hist(df1$Lit_2023, probability = TRUE, col = "lightblue", main = "Histogram")
lines(density(df1$Lit_2023), col = "red", lwd = 2)
hist(df1$Lit_2023, probability = TRUE, col = "lightblue", main = "Histogram")
lines(density(df1$Lit_2024), col = "red", lwd = 2)
hist(df1$Num_2023, probability = TRUE, col = "lightblue", main = "Histogram")
lines(density(df1$Num_2023), col = "red", lwd = 2)
hist(df1$Num_2024, probability = TRUE, col = "lightblue", main = "Histogram")
lines(density(df1$Num_2024), col = "red", lwd = 2)
7. Distribusi prediktor berdasarkan akreditasi
library(dplyr)
library(tidyr)
library(ggplot2)
# --- rapikan nama kolom & tipe faktor ---
df_plot <- df1 %>%
rename(Peringkat_Akreditasi = `Peringkat Akreditasi`) %>%
mutate(Peringkat_Akreditasi = factor(Peringkat_Akreditasi, levels = c("A","B","C")))
# --- pivot ke long lalu plot density per fitur ---
num_cols <- c("Lit_2023","Lit_2024","Num_2023","Num_2024")
p_dist <- df_plot %>%
pivot_longer(cols = all_of(num_cols),
names_to = "Fitur", values_to = "Nilai") %>%
ggplot(aes(x = Nilai, fill = Peringkat_Akreditasi, color = Peringkat_Akreditasi)) +
geom_density(alpha = 0.35) +
facet_wrap(~ Fitur, scales = "free", ncol = 2) +
labs(title = "Distribusi prediktor berdasarkan akreditasi",
x = "Nilai", y = "Kepadatan", fill = "Peringkat", color = "Peringkat") +
theme_classic() +
theme(legend.position = "top")
p_dist
8. PairPlot Numerasi & Literasi (scatter matrix + histogram/density + korelasi)
library(ggplot2)
library(GGally)
library(dplyr)
df_pair <- df1 %>%
rename(Peringkat_Akreditasi = `Peringkat Akreditasi`) %>%
mutate(Peringkat_Akreditasi = factor(Peringkat_Akreditasi, levels = c("A","B","C"))) %>%
select(Peringkat_Akreditasi, Lit_2023, Num_2023, Lit_2024, Num_2024)
# Pair plot:
# - diagonal: density per kelompok
# - bawah: scatter berwarna per akreditasi
# - atas: koefisien korelasi (Pearson) secara keseluruhan
p_pair <- ggpairs(
df_pair,
columns = 2:5,
mapping = aes(color = Peringkat_Akreditasi, fill = Peringkat_Akreditasi),
upper = list(continuous = wrap("cor", size = 3, method = "pearson")),
lower = list(continuous = wrap("points", alpha = 0.6, size = 1.2)),
diag = list(continuous = wrap("densityDiag", alpha = 0.4))
) +
theme_classic() +
theme(legend.position = "top")
p_pair## Warning: Removed 8 rows containing missing values
## Removed 8 rows containing missing values
## Removed 8 rows containing missing values
## Removed 8 rows containing missing values
## Removed 8 rows containing missing values
## Removed 8 rows containing missing values
### 9. Chi-square test atau Cramér’s V
library(rcompanion)##
## Attaching package: 'rcompanion'## The following object is masked from 'package:psych':
##
## phi## The following object is masked from 'package:yardstick':
##
## accuracycramerV(table(df1$provinsi, df1$`Peringkat Akreditasi`))## Cramer V
## 0.125510. Uji perbedaan rata-rata (ANOVA / Kruskal-Wallis)
kruskal.test(Lit_2023 ~ `Peringkat Akreditasi`, data = df1)##
## Kruskal-Wallis rank sum test
##
## data: Lit_2023 by Peringkat Akreditasi
## Kruskal-Wallis chi-squared = 157.03, df = 3, p-value < 2.2e-1611. Feature importance / variable selection
library(ranger)
rf_mod <- ranger(`Peringkat Akreditasi` ~ ., data = df1, importance = "impurity")
rf_mod$variable.importance## provinsi Lit_2023 Num_2023 Lit_2024 Num_2024
## 31.75621 89.43165 82.03553 100.30071 84.5254212. Heatmap Rata-rata provinsi
library(dplyr)
library(ggplot2)
library(tidyr)
# 1. Hitung rata-rata per provinsi (misal pakai Lit_2023 dan Num_2023)
prov_summary <- df1 %>%
group_by(provinsi) %>%
summarise(
literasi = mean(Lit_2023, na.rm = TRUE),
numerasi = mean(Num_2023, na.rm = TRUE)
) %>%
pivot_longer(cols = c(literasi, numerasi),
names_to = "dimensi",
values_to = "rata_rata")
# 2. Urutkan provinsi biar rapi
prov_summary$provinsi <- factor(prov_summary$provinsi,
levels = prov_summary %>%
group_by(provinsi) %>%
summarise(total = mean(rata_rata)) %>%
arrange(desc(total)) %>%
pull(provinsi))
# 3. Buat heatmap
ggplot(prov_summary, aes(x = dimensi, y = provinsi, fill = rata_rata)) +
geom_tile(color = "white") +
geom_text(aes(label = round(rata_rata, 1)), color = "black", size = 4) +
scale_fill_gradient(low = "#f1f8ff", high = "#084594") +
labs(
title = "Heatmap Rata-rata Literasi dan Numerasi (2023)",
subtitle = "Perbandingan antar Provinsi di Sulawesi",
x = "Dimensi",
y = "Provinsi",
fill = "Rata-rata"
) +
theme_minimal(base_size = 14) +
theme(
axis.text.x = element_text(angle = 0, hjust = 0.5, face = "bold"),
axis.text.y = element_text(face = "bold"),
panel.grid = element_blank()
)
Pemodelan Klasifikasi
1. Menyiapkan Pembagian Data
K-fold Cross Validation
library(stringr)
library(rsample)
# atau
library(tidymodels) # ini otomatis load rsample juga
set.seed(2045)
folds <- vfold_cv(df1, v = 10, strata = "Peringkat Akreditasi", repeats = 5 )
folds## # 10-fold cross-validation repeated 5 times using stratification
## # A tibble: 50 × 3
## splits id id2
## <list> <chr> <chr>
## 1 <split [544/62]> Repeat1 Fold01
## 2 <split [545/61]> Repeat1 Fold02
## 3 <split [545/61]> Repeat1 Fold03
## 4 <split [545/61]> Repeat1 Fold04
## 5 <split [545/61]> Repeat1 Fold05
## 6 <split [545/61]> Repeat1 Fold06
## 7 <split [545/61]> Repeat1 Fold07
## 8 <split [546/60]> Repeat1 Fold08
## 9 <split [547/59]> Repeat1 Fold09
## 10 <split [547/59]> Repeat1 Fold10
## # ℹ 40 more rowsdf1 %>%
mutate(Row=seq(nrow(df1))) %>%
select(`Peringkat Akreditasi`,Row) %>%
left_join(tidy(folds),by="Row")%>%
count(`Peringkat Akreditasi`,Fold,Data) %>%
group_by(`Peringkat Akreditasi`,Fold) %>%
mutate(percent=n*100/sum(n)) %>%
arrange(Fold,Data)## # A tibble: 79 × 5
## # Groups: Peringkat Akreditasi, Fold [40]
## `Peringkat Akreditasi` Fold Data n percent
## <fct> <chr> <chr> <int> <dbl>
## 1 A Fold01 Analysis 1029 89.9
## 2 B Fold01 Analysis 1146 89.9
## 3 C Fold01 Analysis 510 89.5
## 4 Tidak Terakreditasi Fold01 Analysis 37 92.5
## 5 A Fold01 Assessment 116 10.1
## 6 B Fold01 Assessment 129 10.1
## 7 C Fold01 Assessment 60 10.5
## 8 Tidak Terakreditasi Fold01 Assessment 3 7.5
## 9 A Fold02 Analysis 1031 90.0
## 10 B Fold02 Analysis 1147 90.0
## # ℹ 69 more rows2. Mendefinisikan Regresi Logistik Multinomial
regresi_mult <- multinom_reg()%>%
set_engine("nnet") %>%
set_mode("classification")regresi_mult ## Multinomial Regression Model Specification (classification)
##
## Computational engine: nnet3. Mendefinisikan Regresi Logistik Ordinal
library(dplyr)
library(VGAM) ## Loading required package: stats4## Loading required package: splines##
## Attaching package: 'VGAM'## The following objects are masked from 'package:psych':
##
## fisherz, logistic, logit## The following object is masked from 'package:workflows':
##
## update_formula# 1) Rapikan nama kolom & set urutan level (misal C < B < A)
dat <- df1 %>%
rename(Peringkat_Akreditasi = `Peringkat Akreditasi`) %>%
mutate(
Peringkat_Akreditasi = ordered(Peringkat_Akreditasi, levels = c("C","B","A"))
) %>%
# pilih prediktor numerik yang relevan (sesuaikan dengan datasetmu)
select(Peringkat_Akreditasi, Lit_2023, Num_2023, Lit_2024, Num_2024) %>%
tidyr::drop_na() # 2) Fit ordinal logistic (proportional odds)
regresi_ord <- vglm(
Peringkat_Akreditasi ~ Lit_2023 + Num_2023 + Lit_2024 + Num_2024,
data = dat,
family = cumulative(link = "logit", parallel = TRUE)
)## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190635451505017, 0.190635451505017, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44588645832214, -1.44588645832214, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44588645832214, -1.44588645832214, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190635451505017, 0.190635451505017, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.190635451505017, 0.190635451505017, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4801426276152, -0.716585989367055, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4801426276152, -0.716585989367055, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.185405877200986, 0.328145213894851, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.185405877200986, 0.328145213894851, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.89529681792559, -1.00841650662847, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89529681792559, -1.00841650662847, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89529681792559, -1.00841650662847, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.130641708396366, 0.267289857286701, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.130641708396366, 0.267289857286701, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95878754136669, -1.04378211931951, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95878754136669, -1.04378211931951, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95878754136669, -1.04378211931951, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.12359832331329, 0.26042089095266, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.12359832331329, 0.26042089095266, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.9602314798747, -1.04435130989635, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9602314798747, -1.04435130989635, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9602314798747, -1.04435130989635, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123441998317021, 0.260311278744625, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123441998317021, 0.260311278744625, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")4. Interpretasi Model
Regresi Logistik Multinomial
fit_regresi_mult <- regresi_mult %>%
fit(Peringkat_Akreditasi~.,data=dat)fit_regresi_mult %>%
repair_call(data = dat) %>%
# exponentiate = TRUE koefisien dalam bentuk odds-ratio
tidy(conf.int = TRUE, conf.level = 0.95, exponentiate = TRUE) %>%
mutate(across(where(is.numeric),~round(.x,4)))## # A tibble: 10 × 8
## y.level term estimate std.error statistic p.value conf.low conf.high
## <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 B (Intercept) 0.672 0.377 -1.06 0.291 0.321 1.41
## 2 B Lit_2023 1.00 0.0087 0.554 0.579 0.988 1.02
## 3 B Num_2023 0.996 0.0102 -0.357 0.721 0.977 1.02
## 4 B Lit_2024 1.01 0.0082 1.60 0.111 0.997 1.03
## 5 B Num_2024 1.01 0.0092 1.05 0.294 0.992 1.03
## 6 A (Intercept) 0.0073 0.555 -8.86 0 0.0025 0.0218
## 7 A Lit_2023 1.02 0.0109 2.26 0.0239 1.00 1.05
## 8 A Num_2023 1.01 0.0124 0.758 0.448 0.985 1.03
## 9 A Lit_2024 1.04 0.0107 3.55 0.0004 1.02 1.06
## 10 A Num_2024 1.02 0.0115 1.82 0.0688 0.998 1.04levels(dat$Peringkat_Akreditasi)## [1] "C" "B" "A"Regresi Logistik Ordinal
library(parameters)##
## Attaching package: 'parameters'## The following object is masked from 'package:tune':
##
## parameters## The following object is masked from 'package:infer':
##
## p_value## The following object is masked from 'package:dials':
##
## parameterslibrary(broom)tidy_parameters <- function(model, conf.int = TRUE, conf.level = 0.95, exponentiate = FALSE, ...) {
parameters::model_parameters(model, ci = if (conf.int) conf.level else 0, exponentiate = exponentiate, ...)
}tidy_parameters(regresi_ord,conf.int = TRUE,conf.level = 0.95,exponentiate = TRUE) %>%
mutate(across(where(is.numeric),~round(.x,4)))## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123437651772133, 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123437651772133, 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = -1.96027165036534, `2` = -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.123437651772133, `2` = 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = c(`1` = 0.123437651772133, `2` = 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.123437651772133, `2` = 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.541415510861369, `2` = 1.45731288514303, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.632141640156998, `2` = 0.81112134348752, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = c(`1` = 0.632141640156998, `2` = 0.81112134348752, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.632141640156998, `2` = 0.81112134348752, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123437651772133, 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123437651772133, 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = -1.96027165036534, `2` = -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.123437651772133, `2` = 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = c(`1` = 0.123437651772133, `2` = 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.123437651772133, `2` = 0.260306856645267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.541415510861369, `2` = 1.45731288514303, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.632141640156998, `2` = 0.81112134348752, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = c(`1` = 0.632141640156998, `2` = 0.81112134348752, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c(`1` = 0.632141640156998, `2` = 0.81112134348752, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96027165036534, -1.04437427608378, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## # Fixed Effects
##
## Parameter | Coefficient | SE | 95% CI | z | p
## -------------------------------------------------------------------------
## (Intercept):1 | 5.60 | 1.62 | [ 3.17, 9.89] | 5.95 | < .001
## (Intercept):2 | 68.36 | 23.02 | [35.33, 132.28] | 12.55 | < .001
## Lit_2023 | 0.99 | 6.50e-03 | [ 0.97, 1.00] | -2.00 | 0.046
## Num_2023 | 0.99 | 7.40e-03 | [ 0.97, 1.00] | -1.63 | 0.103
## Lit_2024 | 0.97 | 6.30e-03 | [ 0.96, 0.99] | -3.99 | < .001
## Num_2024 | 0.99 | 6.90e-03 | [ 0.98, 1.00] | -1.38 | 0.1685. Evaluasi Model
K-fold Cross Validation
Regresi Logistik Multinomial
rec <- recipe(`Peringkat Akreditasi` ~ ., data = df1) %>%
step_zv(all_predictors()) %>% # buang prediktor varians nol (termasuk faktor 1 level)
step_dummy(all_nominal_predictors()) %>%# ubah faktor/character jadi dummy
#step_smote(PeringkatAkreditasi) %>% # (opsional) untuk mengatasi kelas tidak seimbang
step_normalize(all_numeric_predictors())library(conflicted)
conflict_prefer("accuracy", "yardstick")## [conflicted] Will prefer yardstick::accuracy over any other package.regresi_mult_cv <-
workflow() %>%
add_recipe(rec) %>%
add_model(regresi_mult) %>%
fit_resamples(
resamples = folds,
metrics = metric_set(accuracy, bal_accuracy, f_meas), # tambah metrik yang relevan
control = control_resamples(save_pred = TRUE)
)## → A | warning: While computing multiclass `recall()`, some levels had no true events (i.e.
## `true_positive + false_negative = 0`).
## Recall is undefined in this case, and those levels will be removed from the
## averaged result.
## Note that the following number of predicted events actually occurred for each
## problematic event level:
## 'Tidak Terakreditasi': 1
## There were issues with some computations A: x2 → B | warning: While computing multiclass `precision()`, some levels had no predicted events
## (i.e. `true_positive + false_positive = 0`).
## Precision is undefined in this case, and those levels will be removed from the
## averaged result.
## Note that the following number of true events actually occurred for each
## problematic event level:
## 'Tidak Terakreditasi': 1
## There were issues with some computations A: x2There were issues with some computations A: x2 B: x1 → C | warning: While computing multiclass `recall()`, some levels had no true events (i.e.
## `true_positive + false_negative = 0`).
## Recall is undefined in this case, and those levels will be removed from the
## averaged result.
## Note that the following number of predicted events actually occurred for each
## problematic event level:
## 'Tidak Terakreditasi': 0
## There were issues with some computations A: x2 B: x1 → D | warning: While computing multiclass `precision()`, some levels had no predicted events
## (i.e. `true_positive + false_positive = 0`).
## Precision is undefined in this case, and those levels will be removed from the
## averaged result.
## Note that the following number of true events actually occurred for each
## problematic event level:
## 'Tidak Terakreditasi': 0
## There were issues with some computations A: x2 B: x1There were issues with some computations A: x2 B: x1 C: x2 D: x1There were issues with some computations A: x2 B: x1 C: x4 D: x2 → E | warning: While computing multiclass `precision()`, some levels had no predicted events
## (i.e. `true_positive + false_positive = 0`).
## Precision is undefined in this case, and those levels will be removed from the
## averaged result.
## Note that the following number of true events actually occurred for each
## problematic event level:
## 'Tidak Terakreditasi': 2
## There were issues with some computations A: x2 B: x1 C: x4 D: x2There were issues with some computations A: x2 B: x1 C: x4 D: x2 E: x1There were issues with some computations A: x2 B: x2 C: x4 D: x2 E: x1 → F | warning: While computing multiclass `recall()`, some levels had no true events (i.e.
## `true_positive + false_negative = 0`).
## Recall is undefined in this case, and those levels will be removed from the
## averaged result.
## Note that the following number of predicted events actually occurred for each
## problematic event level:
## 'Tidak Terakreditasi': 2
## There were issues with some computations A: x2 B: x2 C: x4 D: x2 E: x1There were issues with some computations A: x2 B: x2 C: x4 D: x2 E: x…There were issues with some computations A: x2 B: x3 C: x4 D: x2 E: x… → G | warning: While computing multiclass `recall()`, some levels had no true events (i.e.
## `true_positive + false_negative = 0`).
## Recall is undefined in this case, and those levels will be removed from the
## averaged result.
## Note that the following number of predicted events actually occurred for each
## problematic event level:
## 'Tidak Terakreditasi': 3
## There were issues with some computations A: x2 B: x3 C: x4 D: x2 E: x…There were issues with some computations A: x2 B: x3 C: x4 D: x2 E: x…There were issues with some computations A: x2 B: x4 C: x4 D: x2 E: x…There were issues with some computations A: x4 B: x4 C: x4 D: x2 E: x…There were issues with some computations A: x4 B: x5 C: x4 D: x2 E: x…There were issues with some computations A: x4 B: x5 C: x6 D: x3 E: x…There were issues with some computations A: x4 B: x6 C: x6 D: x3 E: x…There were issues with some computations A: x4 B: x6 C: x8 D: x4 E: x…There were issues with some computations A: x4 B: x7 C: x8 D: x4 E: x…There were issues with some computations A: x4 B: x8 C: x8 D: x4 E: x…There were issues with some computations A: x6 B: x8 C: x8 D: x4 E: x…There were issues with some computations A: x8 B: x8 C: x8 D: x4 E: x…There were issues with some computations A: x8 B: x9 C: x8 D: x4 E: x…There were issues with some computations A: x10 B: x9 C: x8 D: x4 E: …There were issues with some computations A: x12 B: x9 C: x8 D: x4 E: …There were issues with some computations A: x12 B: x10 C: x8 D: x4 E:…There were issues with some computations A: x12 B: x10 C: x8 D: x4 E:…There were issues with some computations A: x12 B: x10 C: x8 D: x4 E:…There were issues with some computations A: x12 B: x10 C: x10 D: x5 E…There were issues with some computations A: x12 B: x10 C: x12 D: x6 E…There were issues with some computations A: x12 B: x10 C: x12 D: x6 E…There were issues with some computations A: x12 B: x10 C: x14 D: x7 E…There were issues with some computations A: x14 B: x10 C: x14 D: x7 E…There were issues with some computations A: x14 B: x11 C: x14 D: x7 E…There were issues with some computations A: x14 B: x11 C: x16 D: x8 E…There were issues with some computations A: x14 B: x11 C: x18 D: x9 E… → H | warning: While computing multiclass `precision()`, some levels had no predicted events
## (i.e. `true_positive + false_positive = 0`).
## Precision is undefined in this case, and those levels will be removed from the
## averaged result.
## Note that the following number of true events actually occurred for each
## problematic event level:
## 'C': 11, 'Tidak Terakreditasi': 0
## There were issues with some computations A: x14 B: x11 C: x18 D: x9 E…There were issues with some computations A: x14 B: x11 C: x20 D: x9 E…There were issues with some computations A: x14 B: x12 C: x20 D: x9 E… → I | warning: While computing multiclass `precision()`, some levels had no predicted events
## (i.e. `true_positive + false_positive = 0`).
## Precision is undefined in this case, and those levels will be removed from the
## averaged result.
## Note that the following number of true events actually occurred for each
## problematic event level:
## 'Tidak Terakreditasi': 3
## There were issues with some computations A: x14 B: x12 C: x20 D: x9 E…There were issues with some computations A: x14 B: x12 C: x20 D: x9 E…There were issues with some computations A: x14 B: x12 C: x20 D: x9 E…collect_metrics(regresi_mult_cv)## # A tibble: 3 × 6
## .metric .estimator mean n std_err .config
## <chr> <chr> <dbl> <int> <dbl> <chr>
## 1 accuracy multiclass 0.571 50 0.00746 pre0_mod0_post0
## 2 bal_accuracy macro 0.623 30 0.0107 pre0_mod0_post0
## 3 f_meas macro 0.490 50 0.0115 pre0_mod0_post0cm_cv_regresi_mult <-
conf_mat_resampled(x = regresi_mult_cv,tidy = FALSE)autoplot(cm_cv_regresi_mult,type = "heatmap")+
scale_fill_viridis_c(direction = -1,option = "inferno",alpha = 0.6)## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
collect_metrics(regresi_mult_cv,summarize = FALSE)## # A tibble: 150 × 6
## id id2 .metric .estimator .estimate .config
## <chr> <chr> <chr> <chr> <dbl> <chr>
## 1 Repeat1 Fold01 accuracy multiclass 0.581 pre0_mod0_post0
## 2 Repeat1 Fold01 bal_accuracy macro NA pre0_mod0_post0
## 3 Repeat1 Fold01 f_meas macro 0.487 pre0_mod0_post0
## 4 Repeat1 Fold02 accuracy multiclass 0.475 pre0_mod0_post0
## 5 Repeat1 Fold02 bal_accuracy macro 0.549 pre0_mod0_post0
## 6 Repeat1 Fold02 f_meas macro 0.301 pre0_mod0_post0
## 7 Repeat1 Fold03 accuracy multiclass 0.508 pre0_mod0_post0
## 8 Repeat1 Fold03 bal_accuracy macro 0.557 pre0_mod0_post0
## 9 Repeat1 Fold03 f_meas macro 0.387 pre0_mod0_post0
## 10 Repeat1 Fold04 accuracy multiclass 0.623 pre0_mod0_post0
## # ℹ 140 more rowscollect_metrics(regresi_mult_cv,summarize = TRUE)## # A tibble: 3 × 6
## .metric .estimator mean n std_err .config
## <chr> <chr> <dbl> <int> <dbl> <chr>
## 1 accuracy multiclass 0.571 50 0.00746 pre0_mod0_post0
## 2 bal_accuracy macro 0.623 30 0.0107 pre0_mod0_post0
## 3 f_meas macro 0.490 50 0.0115 pre0_mod0_post0Regresi Logistik Ordinal
pred_regresi_ord_dummy <- predict(regresi_ord,newdata=df1 %>% slice_sample(n=10),type="response")## Warning in logit(theta = structure(c(-2.63424394320517, -2.24931495971225, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")pred_regresi_ord_dummy## C B A
## 1 0.06696679 0.3999425 0.5330908
## 2 0.09540857 0.4673517 0.4372397
## 3 0.09579053 0.4680565 0.4361530
## 4 0.02700344 0.2259864 0.7470101
## 5 0.02707935 0.2264562 0.7464645
## 6 0.08536354 0.4471106 0.4675259
## 7 0.29460941 0.5413664 0.1640242
## 8 0.09777941 0.4716546 0.4305660
## 9 0.07776837 0.4293875 0.4928441
## 10 0.13653044 0.5221178 0.3413518pred_regresi_ord_dummy %>%
as.data.frame() %>%
apply(MARGIN=1,FUN=function(x) names(x[which.max(x)])) %>%
factor(levels = c("A","B","C")) ## 1 2 3 4 5 6 7 8 9 10
## A B B A A A B B A B
## Levels: A B C# Paket yang dipakai
library(dplyr)
library(tidyr)
library(VGAM) # vglm()
library(purrr)
library(yardstick) # metrik
# --- Fungsi train-test khusus ordinal (VGAM) ---
train_test_ord <- function(split) {
# Ambil data train & test dari split
train_dt <- rsample::analysis(split)
test_dt <- rsample::assessment(split)
# Rapikan nama target + pilih fitur numerik yang dipakai
train_dt <- train_dt %>%
rename(Peringkat_Akreditasi = `Peringkat Akreditasi`) %>%
mutate(Peringkat_Akreditasi = ordered(Peringkat_Akreditasi, levels = c("C","B","A"))) %>%
select(Peringkat_Akreditasi, Lit_2023, Num_2023, Lit_2024, Num_2024) %>%
drop_na()
test_dt <- test_dt %>%
rename(Peringkat_Akreditasi = `Peringkat Akreditasi`) %>%
# samakan level target dengan data train (penting agar tidak error contrasts)
mutate(Peringkat_Akreditasi = factor(Peringkat_Akreditasi,
levels = levels(train_dt$Peringkat_Akreditasi),
ordered = TRUE)) %>%
select(Peringkat_Akreditasi, Lit_2023, Num_2023, Lit_2024, Num_2024) %>%
drop_na()
# Cek minimal 2 level pada TRAIN; jika tidak, kembalikan NA untuk split ini
if (dplyr::n_distinct(train_dt$Peringkat_Akreditasi) < 2L) {
return(tibble(estimate = factor(NA, levels = levels(train_dt$Peringkat_Akreditasi)),
truth = train_dt$Peringkat_Akreditasi[0]))
}
# Fit model ordinal proportional odds
mod <- vglm(
Peringkat_Akreditasi ~ Lit_2023 + Num_2023 + Lit_2024 + Num_2024,
family = cumulative(link = "logit", parallel = TRUE),
data = train_dt
)
# Prediksi probabilitas kelas pada test
prob <- predict(mod, newdata = test_dt, type = "response") # matrix: kolom = C,B,A
# Ambil kelas probabilitas maksimum
pred_class <- colnames(prob)[max.col(prob, ties.method = "first")]
pred_class <- factor(pred_class, levels = levels(train_dt$Peringkat_Akreditasi), ordered = TRUE)
tibble(
estimate = pred_class,
truth = test_dt$Peringkat_Akreditasi
)
}# --- Jalankan CV di semua split ---
# asumsikan 'folds' sudah dibuat dari data yang sama (strata = `Peringkat Akreditasi` yang sudah di-rename)
regresi_ord_cv <- map(folds$splits, train_test_ord)## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190298507462687, 0.190298507462687, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44807172081613, -1.44807172081613, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44807172081613, -1.44807172081613, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190298507462687, 0.190298507462687, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.190298507462687, 0.190298507462687, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49088508570667, -0.751053736240275, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49088508570667, -0.751053736240275, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.183788918063176, 0.320591740336994, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.183788918063176, 0.320591740336994, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.89762946962479, -1.03381950844458, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89762946962479, -1.03381950844458, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89762946962479, -1.03381950844458, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.130377006939564, 0.262344283151267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.130377006939564, 0.262344283151267, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96084293630473, -1.07062096221575, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96084293630473, -1.07062096221575, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96084293630473, -1.07062096221575, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123375851474119, 0.255285012266656, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123375851474119, 0.255285012266656, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96230617679536, -1.07128518786938, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96230617679536, -1.07128518786938, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96230617679536, -1.07128518786938, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123217682988754, 0.255158753816404, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123217682988754, 0.255158753816404, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96234640264981, -1.07130679056472, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96234640264981, -1.07130679056472, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.26336768276686, -1.54048999471243, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.47514251432708, -0.690261219825437, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.47514251432708, -0.690261219825437, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.186162235180469, 0.333974966116837, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.186162235180469, 0.333974966116837, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91348783668218, -0.997085654135108, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91348783668218, -0.997085654135108, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91348783668218, -0.997085654135108, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.128589518663354, 0.269514802244654, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.128589518663354, 0.269514802244654, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98305347849917, -1.0342252653891, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98305347849917, -1.0342252653891, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98305347849917, -1.0342252653891, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.120993711515001, 0.262265768736902, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.120993711515001, 0.262265768736902, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98481400236081, -1.03483074396801, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98481400236081, -1.03483074396801, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98481400236081, -1.03483074396801, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.12080659724976, 0.262148636130938, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.12080659724976, 0.262148636130938, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98489620478465, -1.03487265524258, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98489620478465, -1.03487265524258, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.0520691270501, -1.93855718763361, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49471972692824, -0.707916924771256, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49471972692824, -0.707916924771256, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.183214378783213, 0.330059286942279, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.183214378783213, 0.330059286942279, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94109777998498, -1.0197230001882, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94109777998498, -1.0197230001882, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94109777998498, -1.0197230001882, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.12552730344146, 0.265081360250641, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.12552730344146, 0.265081360250641, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.01601797144168, -1.06131842771311, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.01601797144168, -1.06131842771311, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.01601797144168, -1.06131842771311, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.117531369306815, 0.257057582076563, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.117531369306815, 0.257057582076563, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.01821362753604, -1.06226667940905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.01821362753604, -1.06226667940905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.01821362753604, -1.06226667940905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.117303831974882, 0.256876527656571, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.117303831974882, 0.256876527656571, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.01827471047864, -1.06229685793474, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.01827471047864, -1.06229685793474, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.38694304193002, -3.14287904833692, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.41619721364509, -0.683742276775511, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.41619721364509, -0.683742276775511, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.195258432824015, 0.335426577649677, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.195258432824015, 0.335426577649677, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.80612412654166, -0.964672597312178, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.80612412654166, -0.964672597312178, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.80612412654166, -0.964672597312178, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.141107212868985, 0.275943639077183, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.141107212868985, 0.275943639077183, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.8617422902428, -0.995147261853236, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8617422902428, -0.995147261853236, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8617422902428, -0.995147261853236, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.13450010306126, 0.269896596730488, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.13450010306126, 0.269896596730488, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.86293374986229, -0.995597916860417, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.86293374986229, -0.995597916860417, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.86293374986229, -0.995597916860417, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.134361465844967, 0.269807803278163, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.134361465844967, 0.269807803278163, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.86297761032416, -0.995625826978981, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.86297761032416, -0.995625826978981, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.54198717237471, -0.944453081531663, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.5157072104232, -0.706120383820984, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.5157072104232, -0.706120383820984, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.180094524536098, 0.330456659567102, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.180094524536098, 0.330456659567102, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93667334606342, -1.00299403290601, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93667334606342, -1.00299403290601, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93667334606342, -1.00299403290601, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.126013779650491, 0.268353166164773, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.126013779650491, 0.268353166164773, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00318098150214, -1.03885198231379, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00318098150214, -1.03885198231379, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00318098150214, -1.03885198231379, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.118869343716609, 0.26137156543422, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.118869343716609, 0.26137156543422, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00445028885587, -1.03935810503856, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00445028885587, -1.03935810503856, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00445028885587, -1.03935810503856, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.118736461499502, 0.261273866969122, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.118736461499502, 0.261273866969122, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00446414751875, -1.03936825831757, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00446414751875, -1.03936825831757, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.89280800307279, -2.22899641505297, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4979245348535, -0.721997752603205, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4979245348535, -0.721997752603205, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.182735276120483, 0.326953215978409, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.182735276120483, 0.326953215978409, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92805975670147, -1.01999506884185, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92805975670147, -1.01999506884185, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92805975670147, -1.01999506884185, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.126965491270587, 0.265028361064423, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.126965491270587, 0.265028361064423, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.99555647816334, -1.05732483687715, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.99555647816334, -1.05732483687715, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.99555647816334, -1.05732483687715, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.119670253304595, 0.257821013663542, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.119670253304595, 0.257821013663542, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.99729115817606, -1.0579796947282, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.99729115817606, -1.0579796947282, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.99729115817606, -1.0579796947282, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.119487626541547, 0.257695726920935, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.119487626541547, 0.257695726920935, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.9973492501156, -1.05799964703667, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9973492501156, -1.05799964703667, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.563204525870238, -2.6406504989628, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189239332096475, 0.189239332096475, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45496038181132, -1.45496038181132, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45496038181132, -1.45496038181132, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189239332096475, 0.189239332096475, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189239332096475, 0.189239332096475, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4787411363935, -0.7224816494204, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4787411363935, -0.7224816494204, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.18561763850515, 0.326846741073925, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.18561763850515, 0.326846741073925, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.89974470783361, -1.01772778488648, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89974470783361, -1.01772778488648, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89974470783361, -1.01772778488648, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.130137371125154, 0.265470236736059, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.130137371125154, 0.265470236736059, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96590423065208, -1.05401087546456, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96590423065208, -1.05401087546456, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96590423065208, -1.05401087546456, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.12282949361295, 0.258455646745723, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.12282949361295, 0.258455646745723, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96759464246588, -1.0546315428102, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96759464246588, -1.0546315428102, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96759464246588, -1.0546315428102, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.122647480661713, 0.258336709757651, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.122647480661713, 0.258336709757651, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96764303397388, -1.05465698463323, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96764303397388, -1.05465698463323, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.0867468946414968, -1.47184880246361, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.192592592592593, 0.192592592592593, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.43325134420766, -1.43325134420766, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.43325134420766, -1.43325134420766, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.192592592592593, 0.192592592592593, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.192592592592593, 0.192592592592593, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.47529687988691, -1.11344327924149, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.47529687988691, -1.11344327924149, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.186138849026984, 0.247229512319117, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.186138849026984, 0.247229512319117, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.88881937759684, -1.47703750670192, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88881937759684, -1.47703750670192, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88881937759684, -1.47703750670192, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.131379141863259, 0.185875303465945, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.131379141863259, 0.185875303465945, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95376826006169, -1.52647550388349, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95376826006169, -1.52647550388349, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95376826006169, -1.52647550388349, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.124143048775089, 0.178509947003643, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.124143048775089, 0.178509947003643, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95544959927209, -1.52742024048765, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95544959927209, -1.52742024048765, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95544959927209, -1.52742024048765, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123960349651418, 0.178371448986688, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123960349651418, 0.178371448986688, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95549411607491, -1.52742317628596, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95549411607491, -1.52742317628596, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.01407487281289, 0.0607572839384602, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.192592592592593, 0.192592592592593, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.43325134420766, -1.43325134420766, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.43325134420766, -1.43325134420766, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.192592592592593, 0.192592592592593, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.192592592592593, 0.192592592592593, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49771213216263, -0.75010323854995, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49771213216263, -0.75010323854995, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.182766999133349, 0.320798806077541, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.182766999133349, 0.320798806077541, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.9039593500113, -1.03669798809917, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9039593500113, -1.03669798809917, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9039593500113, -1.03669798809917, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.129661010011738, 0.261787621647966, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.129661010011738, 0.261787621647966, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96434603685773, -1.07139586823231, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96434603685773, -1.07139586823231, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96434603685773, -1.07139586823231, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.12299747585619, 0.255137719277529, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.12299747585619, 0.255137719277529, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96569129529292, -1.07196863866346, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96569129529292, -1.07196863866346, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96569129529292, -1.07196863866346, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.122852437624145, 0.255028883840918, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.122852437624145, 0.255028883840918, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96573823354813, -1.07199301209325, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96573823354813, -1.07199301209325, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.3452945490158, -1.82379280375198, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.740034378201293, -1.18247316538733, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-0.740034378201293, -1.18247316538733, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.322996626241137, 0.234607805935388, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.322996626241137, 0.234607805935388, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.01572766339188, -1.5282941682535, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.01572766339188, -1.5282941682535, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.01572766339188, -1.5282941682535, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.265860434914489, 0.178243406435635, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.265860434914489, 0.178243406435635, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.04430050008858, -1.56857105655765, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04430050008858, -1.56857105655765, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04430050008858, -1.56857105655765, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.260321062257551, 0.172420194342279, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.260321062257551, 0.172420194342279, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.04451471737425, -1.56903414825208, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04451471737425, -1.56903414825208, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04451471737425, -1.56903414825208, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.260279815978749, 0.172354125131075, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.260279815978749, 0.172354125131075, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.04452434542908, -1.56903899720825, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04452434542908, -1.56903899720825, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.89549529159582, -2.94450653974905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45845010087825, -0.71950938049608, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45845010087825, -0.71950938049608, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.18870449271067, 0.327501029839596, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.18870449271067, 0.327501029839596, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.87343724566814, -1.0238200654404, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.87343724566814, -1.0238200654404, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.87343724566814, -1.0238200654404, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.133144505302877, 0.264283966313023, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.133144505302877, 0.264283966313023, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93412737109791, -1.05792532272439, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93412737109791, -1.05792532272439, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93412737109791, -1.05792532272439, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.126294445926397, 0.257706127804583, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.126294445926397, 0.257706127804583, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93548848403289, -1.05852722799266, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93548848403289, -1.05852722799266, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93548848403289, -1.05852722799266, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.126144331444207, 0.257591003924013, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.126144331444207, 0.257591003924013, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93553255653467, -1.05855232207677, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93553255653467, -1.05855232207677, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.01515601632212, -0.416514390844422, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4814936687998, -0.687033091009299, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4814936687998, -0.687033091009299, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.185201915444962, 0.334693401593152, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.185201915444962, 0.334693401593152, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.90240020523449, -0.969203966159133, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.90240020523449, -0.969203966159133, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.90240020523449, -0.969203966159133, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.129837059608824, 0.275039197070078, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.129837059608824, 0.275039197070078, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.97009856437745, -1.0055295495216, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.97009856437745, -1.0055295495216, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.97009856437745, -1.0055295495216, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.12237830043235, 0.26785563596873, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.12237830043235, 0.26785563596873, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.9720585682109, -1.00627881715335, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9720585682109, -1.00627881715335, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9720585682109, -1.00627881715335, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.122167948148157, 0.267708723407631, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.122167948148157, 0.267708723407631, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.97214393495177, -1.00631684004602, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.97214393495177, -1.00631684004602, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.47463069334317, -3.07150513819281, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49902051505894, -0.682298349666849, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49902051505894, -0.682298349666849, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.182571655954269, 0.335748527960848, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.182571655954269, 0.335748527960848, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93165381094824, -0.97708910518461, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93165381094824, -0.97708910518461, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93165381094824, -0.97708910518461, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.126567641238341, 0.273469750495695, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.126567641238341, 0.273469750495695, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00176211531917, -1.01555026687982, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00176211531917, -1.01555026687982, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00176211531917, -1.01555026687982, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.119018035325224, 0.265895060366819, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.119018035325224, 0.265895060366819, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00336628078846, -1.01621153873117, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00336628078846, -1.01621153873117, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00336628078846, -1.01621153873117, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.118849936946932, 0.265766003472588, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.118849936946932, 0.265766003472588, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.0033931531799, -1.01622855794681, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.0033931531799, -1.01622855794681, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.944500915207088, -2.69926690325564, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.50763075315585, -0.734301795792074, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.50763075315585, -0.734301795792074, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.181290180868998, 0.324251438727437, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.181290180868998, 0.324251438727437, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92423445705063, -1.03600881051105, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92423445705063, -1.03600881051105, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92423445705063, -1.03600881051105, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.127390112991121, 0.261920830431901, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.127390112991121, 0.261920830431901, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98840233420546, -1.07208338478156, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98840233420546, -1.07208338478156, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98840233420546, -1.07208338478156, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.120425990333675, 0.255007083936024, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.120425990333675, 0.255007083936024, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98979700155157, -1.07273487524084, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98979700155157, -1.07273487524084, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98979700155157, -1.07273487524084, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.12027834037455, 0.254883334530734, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.12027834037455, 0.254883334530734, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98982292897553, -1.07275632825427, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98982292897553, -1.07275632825427, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.0361759370698872, -2.225018345016, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45378375049374, -0.705338960277517, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45378375049374, -0.705338960277517, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189419926072998, 0.33062957637686, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189419926072998, 0.33062957637686, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.87417751632217, -0.99909210110166, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.87417751632217, -0.99909210110166, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.87417751632217, -0.99909210110166, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.133059088651443, 0.269119962569307, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.133059088651443, 0.269119962569307, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93699232742609, -1.03314528096394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93699232742609, -1.03314528096394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93699232742609, -1.03314528096394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.125978653049883, 0.262474780396829, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.125978653049883, 0.262474780396829, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93803357766449, -1.03325631998294, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93803357766449, -1.03325631998294, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93803357766449, -1.03325631998294, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.125864047678683, 0.262453285833918, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.125864047678683, 0.262453285833918, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93805235470066, -1.03326862447692, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93805235470066, -1.03326862447692, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.36455617916391, -3.57495426631536, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.5136121486712, -0.766201262484902, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.5136121486712, -0.766201262484902, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.180404089738301, 0.317301421759281, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.180404089738301, 0.317301421759281, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.9220156340757, -1.05384135824507, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9220156340757, -1.05384135824507, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9220156340757, -1.05384135824507, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.127636965492238, 0.258488137123376, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.127636965492238, 0.258488137123376, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98079600078139, -1.08652580626922, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98079600078139, -1.08652580626922, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98079600078139, -1.08652580626922, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.121234009323175, 0.252273056091722, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.121234009323175, 0.252273056091722, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98179823697518, -1.08680875686383, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98179823697518, -1.08680875686383, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98179823697518, -1.08680875686383, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.121127275289562, 0.252219686477163, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.121127275289562, 0.252219686477163, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98182645143962, -1.08682138131094, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98182645143962, -1.08682138131094, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.54667474735261, -1.84056560959021, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.194444444444444, 0.194444444444444, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.42138568093116, -1.42138568093116, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.42138568093116, -1.42138568093116, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.194444444444444, 0.194444444444444, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.194444444444444, 0.194444444444444, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45056258204107, -0.691524142937691, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45056258204107, -0.691524142937691, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189914999192465, 0.333694105872538, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189914999192465, 0.333694105872538, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.85562730844987, -0.966322289983654, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.85562730844987, -0.966322289983654, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.85562730844987, -0.966322289983654, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.135213539348685, 0.275614154408483, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.135213539348685, 0.275614154408483, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92033704037998, -1.00199978464573, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92033704037998, -1.00199978464573, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92033704037998, -1.00199978464573, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.127823986653658, 0.268548421568099, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.127823986653658, 0.268548421568099, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.9220089877997, -1.00269219024409, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9220089877997, -1.00269219024409, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9220089877997, -1.00269219024409, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.127637705528791, 0.268412434019468, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.127637705528791, 0.268412434019468, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92205372970862, -1.00271523448139, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92205372970862, -1.00271523448139, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.15842862930207, -0.669175373336099, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189239332096475, 0.189239332096475, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45496038181132, -1.45496038181132, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45496038181132, -1.45496038181132, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189239332096475, 0.189239332096475, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189239332096475, 0.189239332096475, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.51775702594284, -0.768544064708337, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.51775702594284, -0.768544064708337, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.179792046233897, 0.316794138423952, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.179792046233897, 0.316794138423952, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95364876030613, -1.0841897000012, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95364876030613, -1.0841897000012, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95364876030613, -1.0841897000012, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.124156042752608, 0.252713973963021, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.124156042752608, 0.252713973963021, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.02538865429421, -1.12592651526033, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02538865429421, -1.12592651526033, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02538865429421, -1.12592651526033, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.116562941123382, 0.244913631297818, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.116562941123382, 0.244913631297818, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.02739567828246, -1.12691484488915, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02739567828246, -1.12691484488915, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02739567828246, -1.12691484488915, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.116356424774822, 0.244730904648064, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.116356424774822, 0.244730904648064, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.02744746371751, -1.12694504216891, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02744746371751, -1.12694504216891, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.29797931192472, -2.12762838902838, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.707727493195264, -1.10699832024638, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-0.707727493195264, -1.10699832024638, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.330101175429898, 0.248430917867685, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.330101175429898, 0.248430917867685, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.993167710422058, -1.45475224637703, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-0.993167710422058, -1.45475224637703, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-0.993167710422058, -1.45475224637703, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.270286849771462, 0.18927126792528, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.270286849771462, 0.18927126792528, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.0270238995098, -1.49826498761045, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.0270238995098, -1.49826498761045, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.0270238995098, -1.49826498761045, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.263661490003229, 0.18268443734384, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.263661490003229, 0.18268443734384, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.02767035492646, -1.49868281932592, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.02767035492646, -1.49868281932592, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.02767035492646, -1.49868281932592, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.263536003669013, 0.182622058813392, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.263536003669013, 0.182622058813392, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.02771009908293, -1.49866126896, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.02771009908293, -1.49866126896, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96206438155352, -0.584007687234082, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4301866038835, -1.15986311853202, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4301866038835, -1.15986311853202, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.193069610851937, 0.238692158122976, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.193069610851937, 0.238692158122976, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.8209673944763, -1.52188209688116, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8209673944763, -1.52188209688116, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8209673944763, -1.52188209688116, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.139317833782474, 0.179184538256086, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.139317833782474, 0.179184538256086, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.8775544376427, -1.56718215102123, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8775544376427, -1.56718215102123, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8775544376427, -1.56718215102123, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.132670028494215, 0.172618469495089, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.132670028494215, 0.172618469495089, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.87872998072621, -1.56787009922946, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.87872998072621, -1.56787009922946, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.87872998072621, -1.56787009922946, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.13253481868998, 0.172520237942357, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.13253481868998, 0.172520237942357, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.87876494183253, -1.5678680696131, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.87876494183253, -1.5678680696131, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.0145342303842, -2.96308243680662, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.48499516592625, -0.691241404900077, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.48499516592625, -0.691241404900077, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.184674114260289, 0.333756973467815, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.184674114260289, 0.333756973467815, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.896801376024, -0.976204291383381, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.896801376024, -0.976204291383381, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.896801376024, -0.976204291383381, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.130470923974907, 0.27364558411384, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.130470923974907, 0.27364558411384, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.9605209675695, -1.0101388200276, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9605209675695, -1.0101388200276, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9605209675695, -1.0101388200276, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123410677984247, 0.266952684337054, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123410677984247, 0.266952684337054, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96233802672428, -1.01076951352919, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96233802672428, -1.01076951352919, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96233802672428, -1.01076951352919, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123214242120249, 0.266829282730634, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123214242120249, 0.266829282730634, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96242536555352, -1.01080577979264, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96242536555352, -1.01080577979264, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.42753990969964, -2.38151039333999, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189239332096475, 0.189239332096475, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45496038181132, -1.45496038181132, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45496038181132, -1.45496038181132, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189239332096475, 0.189239332096475, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189239332096475, 0.189239332096475, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45705710738788, -0.695410434927343, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45705710738788, -0.695410434927343, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.188917845680632, 0.332830577776914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.188917845680632, 0.332830577776914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.86981095413424, -0.983944702866018, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.86981095413424, -0.983944702866018, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.86981095413424, -0.983944702866018, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.133563598230226, 0.272109769986769, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.133563598230226, 0.272109769986769, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.9350567538177, -1.02076127981521, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9350567538177, -1.02076127981521, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9350567538177, -1.02076127981521, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.126191929584819, 0.264879138982264, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.126191929584819, 0.264879138982264, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93659895808566, -1.02146135251736, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93659895808566, -1.02146135251736, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93659895808566, -1.02146135251736, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.126021972546793, 0.264742844539198, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.126021972546793, 0.264742844539198, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93664493514895, -1.02148813520068, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93664493514895, -1.02148813520068, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.35632698733145, -1.44372875428642, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.54446117083504, -0.755866032248682, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.54446117083504, -0.755866032248682, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.175887687388064, 0.319544467464448, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.175887687388064, 0.319544467464448, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98264835709635, -1.06466533282926, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98264835709635, -1.06466533282926, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98264835709635, -1.06466533282926, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.121036804507249, 0.256418913447039, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.121036804507249, 0.256418913447039, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.05104966042135, -1.10338500998694, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.05104966042135, -1.10338500998694, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.05104966042135, -1.10338500998694, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.113946361894604, 0.249106182934339, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.113946361894604, 0.249106182934339, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.05240951430841, -1.10385370834198, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.05240951430841, -1.10385370834198, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.05240951430841, -1.10385370834198, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.113809139585817, 0.249018522142456, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.113809139585817, 0.249018522142456, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.05241910725526, -1.10386546149623, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.05241910725526, -1.10386546149623, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.03264798615268, -1.0384285260879, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.54241611452961, -0.751691586292004, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.54241611452961, -0.751691586292004, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.176184317282824, 0.32045282441174, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.176184317282824, 0.32045282441174, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00440949587366, -1.07530371798792, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00440949587366, -1.07530371798792, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00440949587366, -1.07530371798792, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.11874073006662, 0.254395772784744, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.11874073006662, 0.254395772784744, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.08327049894231, -1.11943499600758, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.08327049894231, -1.11943499600758, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.08327049894231, -1.11943499600758, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.110733505223801, 0.246116101029144, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.110733505223801, 0.246116101029144, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.0853128215467, -1.12025395703791, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.0853128215467, -1.12025395703791, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.0853128215467, -1.12025395703791, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.110532554284713, 0.245964180166697, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.110532554284713, 0.245964180166697, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.08534425958078, -1.12027593397417, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.08534425958078, -1.12027593397417, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.79098423985424, -2.28666258649759, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.47052303085574, -0.731345590791106, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.47052303085574, -0.731345590791106, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.186863128871517, 0.324899516263751, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.186863128871517, 0.324899516263751, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.86937681475482, -1.01162995202288, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.86937681475482, -1.01162995202288, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.86937681475482, -1.01162995202288, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.133613846726527, 0.266660987704466, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.133613846726527, 0.266660987704466, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92760865392112, -1.0446849283701, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92760865392112, -1.0446849283701, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92760865392112, -1.0446849283701, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.127015502288291, 0.26024704587235, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.127015502288291, 0.26024704587235, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92882721772631, -1.04515682021636, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92882721772631, -1.04515682021636, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92882721772631, -1.04515682021636, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.126880446209035, 0.260156208230868, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.126880446209035, 0.260156208230868, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92887199253148, -1.04518019916663, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92887199253148, -1.04518019916663, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.729354004181296, -1.75019933333252, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.72595445647383, -1.13061828978813, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-0.72595445647383, -1.13061828978813, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.326083121142424, 0.244047015764881, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.326083121142424, 0.244047015764881, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.01065434773497, -1.47325816300834, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.01065434773497, -1.47325816300834, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.01065434773497, -1.47325816300834, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.266851813383099, 0.186447894291338, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.266851813383099, 0.186447894291338, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.04372562226025, -1.51572494301769, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04372562226025, -1.51572494301769, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04372562226025, -1.51572494301769, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.260431772538108, 0.180091906147418, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.260431772538108, 0.180091906147418, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.04442556056163, -1.51628143072812, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04442556056163, -1.51628143072812, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04442556056163, -1.51628143072812, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.260296982084191, 0.180009750461368, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.260296982084191, 0.180009750461368, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.04446272768786, -1.51627005550245, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04446272768786, -1.51627005550245, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93302961192515, -2.12378315726766, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.42786001133889, -1.1223532346265, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.42786001133889, -1.1223532346265, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.193432338257847, 0.245575043630798, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.193432338257847, 0.245575043630798, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.82932374647005, -1.50088878778, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.82932374647005, -1.50088878778, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.82932374647005, -1.50088878778, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.138318853919771, 0.182293001676257, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.138318853919771, 0.182293001676257, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.8888653987798, -1.54774496093296, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8888653987798, -1.54774496093296, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8888653987798, -1.54774496093296, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.131373890076486, 0.175412204535542, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.131373890076486, 0.175412204535542, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.88996889876281, -1.54830996046743, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88996889876281, -1.54830996046743, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88996889876281, -1.54830996046743, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.131248015622312, 0.175330496428545, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.131248015622312, 0.175330496428545, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.89000381289281, -1.54831509046141, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89000381289281, -1.54831509046141, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.979958670826869, 0.0240357838553272, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.42453918850784, -0.714375511389133, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.42453918850784, -0.714375511389133, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.19395096816334, 0.328632733984724, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.19395096816334, 0.328632733984724, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.80093635566205, -0.987643049532557, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.80093635566205, -0.987643049532557, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.80093635566205, -0.987643049532557, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.141737121163375, 0.271377870788016, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.141737121163375, 0.271377870788016, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.8529300630972, -1.01689310765004, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8529300630972, -1.01689310765004, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8529300630972, -1.01689310765004, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.135529240941669, 0.265633027141146, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.135529240941669, 0.265633027141146, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.85384160588879, -1.01730696911495, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.85384160588879, -1.01730696911495, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.85384160588879, -1.01730696911495, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.135422479093648, 0.26555230213807, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.135422479093648, 0.26555230213807, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.85385936852505, -1.01731567899437, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.85385936852505, -1.01731567899437, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.82285821516872, -2.48066992949744, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190740740740741, 0.190740740740741, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44520420686595, -1.44520420686595, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44520420686595, -1.44520420686595, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190740740740741, 0.190740740740741, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.190740740740741, 0.190740740740741, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49885124254562, -0.736429901734843, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49885124254562, -0.736429901734843, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.182596919413987, 0.323785318745082, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.182596919413987, 0.323785318745082, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92053830818577, -1.02768382435155, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92053830818577, -1.02768382435155, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92053830818577, -1.02768382435155, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.127801549990032, 0.263533389466956, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.127801549990032, 0.263533389466956, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98599289802101, -1.06422377591822, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98599289802101, -1.06422377591822, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98599289802101, -1.06422377591822, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.120681439919102, 0.256503113387178, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.120681439919102, 0.256503113387178, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98733506462756, -1.06466427482286, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98733506462756, -1.06466427482286, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98733506462756, -1.06466427482286, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.120539085143638, 0.256419115175326, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.120539085143638, 0.256419115175326, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98736056450265, -1.06467733514511, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98736056450265, -1.06467733514511, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.85237194425646, 0.112602648713704, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49003452047255, -0.700763405270183, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49003452047255, -0.700763405270183, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.183916546142088, 0.331642992793119, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.183916546142088, 0.331642992793119, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92751155636783, -1.0037089575674, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92751155636783, -1.0037089575674, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92751155636783, -1.0037089575674, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.127026269103925, 0.268212821288006, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.127026269103925, 0.268212821288006, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.99825317937845, -1.04219351122654, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.99825317937845, -1.04219351122654, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.99825317937845, -1.04219351122654, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.119386449014817, 0.260726976241964, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.119386449014817, 0.260726976241964, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00018340083506, -1.04291642362994, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00018340083506, -1.04291642362994, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00018340083506, -1.04291642362994, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.119183667455643, 0.260587660122394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.119183667455643, 0.260587660122394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00023887129476, -1.04294495006505, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00023887129476, -1.04294495006505, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.45253715897349, -2.56358903585353, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190298507462687, 0.190298507462687, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44807172081613, -1.44807172081613, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44807172081613, -1.44807172081613, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190298507462687, 0.190298507462687, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.190298507462687, 0.190298507462687, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49936900449408, -0.69602524172314, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49936900449408, -0.69602524172314, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.182519653406662, 0.332694071266441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.182519653406662, 0.332694071266441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91645289841847, -0.978513290190302, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91645289841847, -0.978513290190302, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91645289841847, -0.978513290190302, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.128257636611302, 0.273186878964531, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.128257636611302, 0.273186878964531, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98151244065599, -1.01365815891217, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98151244065599, -1.01365815891217, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98151244065599, -1.01365815891217, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.121157703162287, 0.266264553706802, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.121157703162287, 0.266264553706802, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.98303753059806, -1.01416951262679, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98303753059806, -1.01416951262679, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.98303753059806, -1.01416951262679, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.120995407652048, 0.266164663627838, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.120995407652048, 0.266164663627838, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.9830952725552, -1.01419769729171, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.9830952725552, -1.01419769729171, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.43870932994792, -2.52144206368919, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49334657488216, -0.70760019921834, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49334657488216, -0.70760019921834, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.183419956081963, 0.330129325114519, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.183419956081963, 0.330129325114519, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94626490136475, -1.02012341255918, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94626490136475, -1.02012341255918, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94626490136475, -1.02012341255918, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.124961204127659, 0.265003361960137, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.124961204127659, 0.265003361960137, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.02429612790717, -1.06328662383279, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02429612790717, -1.06328662383279, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02429612790717, -1.06328662383279, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.116675492282704, 0.256681877753522, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.116675492282704, 0.256681877753522, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.02670336220805, -1.06426146852261, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02670336220805, -1.06426146852261, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02670336220805, -1.06426146852261, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.116427625965389, 0.25649592512423, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.116427625965389, 0.25649592512423, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.0267775518965, -1.06429546391249, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.0267775518965, -1.06429546391249, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94847066140713, -2.67078435184867, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.715968548064402, -1.13334346331026, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-0.715968548064402, -1.13334346331026, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.32828135310884, 0.243544604512714, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.32828135310884, 0.243544604512714, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.00991338934494, -1.5082178402322, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.00991338934494, -1.5082178402322, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.00991338934494, -1.5082178402322, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.266996800947864, 0.181203059330575, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.266996800947864, 0.181203059330575, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.04389822284189, -1.55407398070423, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04389822284189, -1.55407398070423, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04389822284189, -1.55407398070423, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.260398529821422, 0.17449863743955, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.260398529821422, 0.17449863743955, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.04451991457412, -1.55476135314137, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04451991457412, -1.55476135314137, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04451991457412, -1.55476135314137, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.260278815341104, 0.174399644374214, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.260278815341104, 0.174399644374214, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.04453986499512, -1.55475718414519, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.04453986499512, -1.55475718414519, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94223608740422, -0.980492510210648, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.52117815051807, -0.715271542610911, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.52117815051807, -0.715271542610911, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.17928809626766, 0.328435070059681, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.17928809626766, 0.328435070059681, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94002684411881, -1.01239061808057, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94002684411881, -1.01239061808057, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94002684411881, -1.01239061808057, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.125644907437401, 0.26651226365155, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.125644907437401, 0.26651226365155, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00721367432875, -1.04891569144057, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00721367432875, -1.04891569144057, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00721367432875, -1.04891569144057, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.118447610565621, 0.259433372177166, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.118447610565621, 0.259433372177166, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00883460070994, -1.04963934431304, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00883460070994, -1.04963934431304, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00883460070994, -1.04963934431304, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.118278461691148, 0.259294362622717, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.118278461691148, 0.259294362622717, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.00886048188954, -1.0496614763431, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.00886048188954, -1.0496614763431, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.07226875670755, -1.86845593777015, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4429132551194, -1.4429132551194, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191094619666048, 0.191094619666048, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44953371489445, -0.692867522030525, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44953371489445, -0.692867522030525, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190073338118975, 0.33339548256956, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.190073338118975, 0.33339548256956, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.85244284852917, -0.968266714061626, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.85244284852917, -0.968266714061626, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.85244284852917, -0.968266714061626, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.135586333656865, 0.27522611763505, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.135586333656865, 0.27522611763505, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91393117690767, -1.00307302818678, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91393117690767, -1.00307302818678, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91393117690767, -1.00307302818678, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.128539848684493, 0.268337656535359, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.128539848684493, 0.268337656535359, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91521169178891, -1.00362789544596, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91521169178891, -1.00362789544596, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91521169178891, -1.00362789544596, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.128396477008996, 0.268228732030822, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.128396477008996, 0.268228732030822, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91526357279458, -1.00365327308029, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91526357279458, -1.00365327308029, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.28327155148409, -2.2629826631494, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.4443637759014, -0.69698487820327, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.4443637759014, -0.69698487820327, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190870502299572, 0.332481057810132, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.190870502299572, 0.332481057810132, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.84902707729486, -0.977574263638568, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.84902707729486, -0.977574263638568, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.84902707729486, -0.977574263638568, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.135987169751541, 0.273373367845722, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.135987169751541, 0.273373367845722, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91027082493918, -1.0113306509744, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91027082493918, -1.0113306509744, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91027082493918, -1.0113306509744, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.128950429431893, 0.266719520981513, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.128950429431893, 0.266719520981513, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91157630844972, -1.01186597235668, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91157630844972, -1.01186597235668, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91157630844972, -1.01186597235668, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.128803865646981, 0.2666148357844, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.128803865646981, 0.2666148357844, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91160380723738, -1.0118801976472, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91160380723738, -1.0118801976472, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.03822212632195, 0.0431060104831926, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49692553498097, -1.18825952981713, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49692553498097, -1.18825952981713, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.182884517142479, 0.233570361981907, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.182884517142479, 0.233570361981907, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91465777827591, -1.56808105479167, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91465777827591, -1.56808105479167, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91465777827591, -1.56808105479167, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.128458478685993, 0.172490124638464, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.128458478685993, 0.172490124638464, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.97781327433251, -1.61655494123857, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.97781327433251, -1.61655494123857, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.97781327433251, -1.61655494123857, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.121552137206269, 0.165680534051037, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.121552137206269, 0.165680534051037, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.97881960399558, -1.61691076487406, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.97881960399558, -1.61691076487406, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.97881960399558, -1.61691076487406, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.121444725043595, 0.165631354224773, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.121444725043595, 0.165631354224773, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.97883221911364, -1.61690716623034, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.97883221911364, -1.61690716623034, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.0909678070091, -2.95941662773693, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.49471366850165, -0.762730353467625, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.49471366850165, -0.762730353467625, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.183215285409531, 0.318053770669931, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.183215285409531, 0.318053770669931, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.88968660119259, -1.0510475829173, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88968660119259, -1.0510475829173, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88968660119259, -1.0510475829173, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.131280207099376, 0.259023986889444, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.131280207099376, 0.259023986889444, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94359170054055, -1.08201603997043, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94359170054055, -1.08201603997043, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94359170054055, -1.08201603997043, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.125253800851694, 0.253124689441052, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.125253800851694, 0.253124689441052, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94452259341197, -1.08240493184028, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94452259341197, -1.08240493184028, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94452259341197, -1.08240493184028, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.125151842883047, 0.253051175488152, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.125151842883047, 0.253051175488152, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94453752093808, -1.08241744213041, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94453752093808, -1.08241744213041, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.32736403517644, -0.0523110568312974, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.47244569523873, -0.696600840973524, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.47244569523873, -0.696600840973524, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.186571164924071, 0.332566295518537, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.186571164924071, 0.332566295518537, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.89223937549681, -0.989842057342836, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89223937549681, -0.989842057342836, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89223937549681, -0.989842057342836, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.130989348061814, 0.270943275411532, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.130989348061814, 0.270943275411532, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95517731368771, -1.02399978239504, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95517731368771, -1.02399978239504, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95517731368771, -1.02399978239504, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123989921309216, 0.264249023996846, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123989921309216, 0.264249023996846, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95680933848882, -1.02463881080184, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95680933848882, -1.02463881080184, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95680933848882, -1.02463881080184, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.12381276536923, 0.264124801868436, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.12381276536923, 0.264124801868436, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95688103999427, -1.02467581851204, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95688103999427, -1.02467581851204, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.545720373364832, 0.387822586621019, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190388170055453, 0.190388170055453, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44748992214681, -1.44748992214681, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44748992214681, -1.44748992214681, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190388170055453, 0.190388170055453, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.190388170055453, 0.190388170055453, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.46250898859205, -0.726777950780387, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.46250898859205, -0.726777950780387, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.188083881863465, 0.325902181788853, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.188083881863465, 0.325902181788853, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.88538144329235, -1.0282060024413, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88538144329235, -1.0282060024413, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88538144329235, -1.0282060024413, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.131771971773572, 0.263432055808436, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.131771971773572, 0.263432055808436, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95158057496005, -1.06552678702092, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95158057496005, -1.06552678702092, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95158057496005, -1.06552678702092, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.124381114828398, 0.256254695948741, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.124381114828398, 0.256254695948741, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95324286619151, -1.06619310515044, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95324286619151, -1.06619310515044, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95324286619151, -1.06619310515044, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.124200186948047, 0.256127724184407, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.124200186948047, 0.256127724184407, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95328170213208, -1.06621566548783, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95328170213208, -1.06621566548783, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.730714450315537, -3.03985235638402, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45717548064751, -0.726860693580781, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45717548064751, -0.726860693580781, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.188899708263351, 0.32588400428906, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.188899708263351, 0.32588400428906, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.8722182447984, -1.02993699829795, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8722182447984, -1.02993699829795, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.8722182447984, -1.02993699829795, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.133285261710784, 0.26309631854294, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.133285261710784, 0.26309631854294, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93570758804554, -1.06554031118865, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93570758804554, -1.06554031118865, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93570758804554, -1.06554031118865, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.126120181162357, 0.256252118410091, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.126120181162357, 0.256252118410091, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93737177986323, -1.06625125353646, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93737177986323, -1.06625125353646, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93737177986323, -1.06625125353646, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.125936878218106, 0.256116645543913, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.125936878218106, 0.256116645543913, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.93742729478607, -1.06628177058877, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.93742729478607, -1.06628177058877, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.43769628650471, -1.8812695511643, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190298507462687, 0.190298507462687, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44807172081613, -1.44807172081613, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44807172081613, -1.44807172081613, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190298507462687, 0.190298507462687, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.190298507462687, 0.190298507462687, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.46917451275207, -0.712606210266621, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.46917451275207, -0.712606210266621, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.18706811638842, 0.329023218952843, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.18706811638842, 0.329023218952843, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.89880692783614, -1.0186028641272, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89880692783614, -1.0186028641272, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.89880692783614, -1.0186028641272, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.1302435661808, 0.265299634991922, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.1302435661808, 0.265299634991922, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96290205407544, -1.05487573516415, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96290205407544, -1.05487573516415, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96290205407544, -1.05487573516415, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123153321787826, 0.258289925543521, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123153321787826, 0.258289925543521, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96398795918348, -1.05529672952815, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96398795918348, -1.05529672952815, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96398795918348, -1.05529672952815, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.12303610658608, 0.258209281233684, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.12303610658608, 0.258209281233684, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.96401646230749, -1.05531850154342, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.96401646230749, -1.05531850154342, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-3.07700836866363, -1.91159961405557, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.58683666963416, -0.757152261128179, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.58683666963416, -0.757152261128179, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.16982942092796, 0.319264860195437, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.16982942092796, 0.319264860195437, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.01390784162678, -1.05278621024346, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.01390784162678, -1.05278621024346, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.01390784162678, -1.05278621024346, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.117750403908569, 0.258690431004272, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.117750403908569, 0.258690431004272, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.08329866541286, -1.090267189592, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.08329866541286, -1.090267189592, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.08329866541286, -1.090267189592, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.110730731656901, 0.251567968189724, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.110730731656901, 0.251567968189724, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.0845291901928, -1.09063042939466, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.0845291901928, -1.09063042939466, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.0845291901928, -1.09063042939466, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.110609620603087, 0.251499583017387, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.110609620603087, 0.251499583017387, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.08452117408374, -1.09062476034627, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.08452117408374, -1.09062476034627, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.84703181138292, -2.68964743168169, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45266943006476, -1.45266943006476, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189591078066914, 0.189591078066914, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.52275111045429, -0.704265819866495, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.52275111045429, -0.704265819866495, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.179056761596133, 0.330867120161235, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.179056761596133, 0.330867120161235, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95903358293718, -0.995286591077718, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95903358293718, -0.995286591077718, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95903358293718, -0.995286591077718, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.123571674121095, 0.269869142449329, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.123571674121095, 0.269869142449329, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.02716901927073, -1.03110586801456, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02716901927073, -1.03110586801456, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02716901927073, -1.03110586801456, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.116379731338608, 0.262869764763706, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.116379731338608, 0.262869764763706, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.02864713139511, -1.0314000169659, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02864713139511, -1.0314000169659, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02864713139511, -1.0314000169659, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.116227815124086, 0.262812771717332, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.116227815124086, 0.262812771717332, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.02869985055836, -1.03142848257175, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-2.02869985055836, -1.03142848257175, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.4346599706331, -3.65562985377153, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.43571017165878, -0.700875364900269, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.43571017165878, -0.700875364900269, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.192210532214829, 0.331618176746308, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.192210532214829, 0.331618176746308, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.83070309340033, -0.985818222492182, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.83070309340033, -0.985818222492182, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.83070309340033, -0.985818222492182, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.138154536045575, 0.271738847844046, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.138154536045575, 0.271738847844046, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.88543473425172, -1.01599024741245, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88543473425172, -1.01599024741245, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88543473425172, -1.01599024741245, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.131765874974778, 0.265809187267217, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.131765874974778, 0.265809187267217, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.88662072817539, -1.01647957565564, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88662072817539, -1.01647957565564, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88662072817539, -1.01647957565564, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.131630252211277, 0.265713703522686, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.131630252211277, 0.265713703522686, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.88667117081461, -1.0164994030529, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88667117081461, -1.0164994030529, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-0.956052887263503, -1.35712204420765, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.45037321780441, -1.45037321780441, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.189944134078212, 0.189944134078212, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.1503711597513, -0.281184904434842, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.1503711597513, -0.281184904434842, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.240421295736556, 0.430163304922843, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.240421295736556, 0.430163304922843, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.52643630934724, -0.499671923287561, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.52643630934724, -0.499671923287561, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.52643630934724, -0.499671923287561, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.178515694725356, 0.377617771140432, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.178515694725356, 0.377617771140432, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.576443173875, -0.508433392760472, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.576443173875, -0.508433392760472, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.576443173875, -0.508433392760472, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.17129980532829, 0.375560846583776, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.17129980532829, 0.375560846583776, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.57723453122266, -0.506955872011081, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.57723453122266, -0.506955872011081, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.57723453122266, -0.506955872011081, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.171187496480163, 0.375907410867035, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.171187496480163, 0.375907410867035, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.57722477521878, -0.506829941777035, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.57722477521878, -0.506829941777035, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-2.03571268684781, -1.11178231769498, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.192949907235622, 0.192949907235622, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.43095513194731, -1.43095513194731, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.43095513194731, -1.43095513194731, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.192949907235622, 0.192949907235622, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.192949907235622, 0.192949907235622, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.47317633139352, -0.690267667004372, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.47317633139352, -0.690267667004372, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.186460307244624, 0.33397353203569, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.186460307244624, 0.33397353203569, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.88598479083849, -0.984849242819149, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88598479083849, -0.984849242819149, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.88598479083849, -0.984849242819149, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.131702959250147, 0.271930648273073, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.131702959250147, 0.271930648273073, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94902035940885, -1.01965042876416, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94902035940885, -1.01965042876416, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.94902035940885, -1.01965042876416, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.124660217314846, 0.265095498365384, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.124660217314846, 0.265095498365384, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95075848753165, -1.02047303195638, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95075848753165, -1.02047303195638, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95075848753165, -1.02047303195638, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.124470676393527, 0.264935269884707, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.124470676393527, 0.264935269884707, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.95081740444761, -1.02050547892306, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.95081740444761, -1.02050547892306, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.94180104576527, -3.32984022891354, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44061704285905, -1.44061704285905, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191449814126394, 0.191449814126394, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.460131183302, -0.72123001850927, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.460131183302, -0.72123001850927, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.188447261889808, 0.327122181998493, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.188447261889808, 0.327122181998493, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.86238368574138, -1.00790308152512, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.86238368574138, -1.00790308152512, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.86238368574138, -1.00790308152512, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.134425455825408, 0.26739042154722, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.134425455825408, 0.26739042154722, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92388289142801, -1.04209096584818, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92388289142801, -1.04209096584818, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92388289142801, -1.04209096584818, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.127429198803613, 0.260746742186599, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.127429198803613, 0.260746742186599, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92524941471193, -1.04259313627801, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92524941471193, -1.04259313627801, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92524941471193, -1.04259313627801, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.127277331059305, 0.260649956510273, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.127277331059305, 0.260649956510273, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.92528455356873, -1.04261453041293, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.92528455356873, -1.04261453041293, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44794838002335, -4.38186432995251, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190740740740741, 0.190740740740741, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44520420686595, -1.44520420686595, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44520420686595, -1.44520420686595, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.190740740740741, 0.190740740740741, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.190740740740741, 0.190740740740741, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.43618190426201, -0.71227287758025, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.43618190426201, -0.71227287758025, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.192137298983027, 0.329096811983673, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.192137298983027, 0.329096811983673, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.83894805665249, -0.988418047869726, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.83894805665249, -0.988418047869726, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.83894805665249, -0.988418047869726, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.137175751566459, 0.271224656031764, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.137175751566459, 0.271224656031764, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.90263336172456, -1.02497307862618, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.90263336172456, -1.02497307862618, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.90263336172456, -1.02497307862618, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.129810720002421, 0.264059837730495, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.129810720002421, 0.264059837730495, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.90413234538231, -1.02565088037788, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.90413234538231, -1.02565088037788, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.90413234538231, -1.02565088037788, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.1296414889022, 0.263928140064146, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.1296414889022, 0.263928140064146, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.90416731382917, -1.02566780543001, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.90416731382917, -1.02566780543001, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.62399086928484, -0.847745420332664, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = "P[Y<=j]", bvalue = NULL, inverse = FALSE, deriv = 0, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = c("P[Y<=1]", "P[Y<=2]"), bvalue = NULL, inverse = FALSE, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191881918819188, 0.191881918819188, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.43782801123507, -1.43782801123507, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.43782801123507, -1.43782801123507, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191881918819188, 0.191881918819188, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191881918819188, 0.191881918819188, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.44256948560204, -0.683735098352388, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.44256948560204, -0.683735098352388, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.191147764329958, 0.335428177833983, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.191147764329958, 0.335428177833983, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.84864100438848, -0.956930750486949, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.84864100438848, -0.956930750486949, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.84864100438848, -0.956930750486949, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.136032537631419, 0.277493130397307, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.136032537631419, 0.277493130397307, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91126128898342, -0.99116451359938, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91126128898342, -0.99116451359938, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91126128898342, -0.99116451359938, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.128839219195502, 0.270682125782283, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.128839219195502, 0.270682125782283, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91270046385656, -0.991652697181873, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91270046385656, -0.991652697181873, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91270046385656, -0.991652697181873, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.128677772942618, 0.270585762633817, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(0.128677772942618, 0.270585762633817, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(-1.91275263170895, -0.991680446371896, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")
## Warning in logit(theta = structure(c(-1.91275263170895, -0.991680446371896, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")## Warning in logit(theta = structure(c(0.0768961595064572, -2.99139745888364, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")# Gabungkan semua hasil prediksi dari tiap split
pred_all <- bind_rows(regresi_ord_cv)
# Hitung metrik (akurasi, balanced accuracy, F1 macro)
metrics_tbl <- yardstick::metric_set(accuracy, bal_accuracy, f_meas)
metrics_tbl(pred_all, truth = truth, estimate = estimate)## # A tibble: 3 × 3
## .metric .estimator .estimate
## <chr> <chr> <dbl>
## 1 accuracy multiclass 0.577
## 2 bal_accuracy macro 0.643
## 3 f_meas macro 0.521regresi_ord_cv## [[1]]
## # A tibble: 62 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 B C
## 3 B B
## 4 B B
## 5 B B
## 6 B A
## 7 B C
## 8 A A
## 9 B C
## 10 A A
## # ℹ 52 more rows
##
## [[2]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 A B
## 2 B B
## 3 B B
## 4 A A
## 5 A B
## 6 C C
## 7 A A
## 8 B A
## 9 B A
## 10 B C
## # ℹ 50 more rows
##
## [[3]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 A A
## 3 B C
## 4 A A
## 5 B B
## 6 B B
## 7 B C
## 8 B C
## 9 B B
## 10 A C
## # ℹ 50 more rows
##
## [[4]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 B B
## 3 C C
## 4 A B
## 5 B B
## 6 C C
## 7 B C
## 8 C C
## 9 B B
## 10 A A
## # ℹ 50 more rows
##
## [[5]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 B A
## 2 B A
## 3 C C
## 4 A A
## 5 B B
## 6 B B
## 7 B C
## 8 C B
## 9 A B
## 10 B B
## # ℹ 51 more rows
##
## [[6]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A C
## 3 B B
## 4 B B
## 5 B B
## 6 B C
## 7 A A
## 8 B B
## 9 B C
## 10 B A
## # ℹ 51 more rows
##
## [[7]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 C B
## 2 B B
## 3 B A
## 4 A B
## 5 B A
## 6 A A
## 7 A A
## 8 A B
## 9 A A
## 10 A C
## # ℹ 49 more rows
##
## [[8]]
## # A tibble: 58 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 C B
## 3 B B
## 4 A A
## 5 C C
## 6 C A
## 7 A A
## 8 B A
## 9 A A
## 10 B C
## # ℹ 48 more rows
##
## [[9]]
## # A tibble: 58 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 B B
## 3 B A
## 4 A A
## 5 B B
## 6 B B
## 7 B C
## 8 B B
## 9 B B
## 10 A A
## # ℹ 48 more rows
##
## [[10]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 B A
## 2 A A
## 3 A C
## 4 B B
## 5 C C
## 6 A A
## 7 B B
## 8 B C
## 9 B B
## 10 B C
## # ℹ 49 more rows
##
## [[11]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 B C
## 3 A A
## 4 C C
## 5 B C
## 6 A B
## 7 A B
## 8 A A
## 9 B A
## 10 B A
## # ℹ 50 more rows
##
## [[12]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 A A
## 3 B A
## 4 B C
## 5 A A
## 6 B A
## 7 B B
## 8 A A
## 9 B A
## 10 C C
## # ℹ 51 more rows
##
## [[13]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A C
## 3 B A
## 4 A A
## 5 B B
## 6 B C
## 7 A A
## 8 A A
## 9 A B
## 10 A B
## # ℹ 50 more rows
##
## [[14]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 C B
## 2 B B
## 3 B C
## 4 B A
## 5 C C
## 6 A A
## 7 B C
## 8 B B
## 9 B A
## 10 C B
## # ℹ 51 more rows
##
## [[15]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 A C
## 3 C B
## 4 B A
## 5 B B
## 6 B B
## 7 B B
## 8 B C
## 9 B C
## 10 A B
## # ℹ 50 more rows
##
## [[16]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 B B
## 3 A B
## 4 B B
## 5 A A
## 6 B C
## 7 A B
## 8 C C
## 9 B B
## 10 A A
## # ℹ 51 more rows
##
## [[17]]
## # A tibble: 58 × 2
## estimate truth
## <ord> <ord>
## 1 B A
## 2 B B
## 3 B B
## 4 B B
## 5 B A
## 6 B B
## 7 B C
## 8 B B
## 9 A B
## 10 C C
## # ℹ 48 more rows
##
## [[18]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 B B
## 3 A A
## 4 B B
## 5 A A
## 6 C A
## 7 A B
## 8 A A
## 9 A A
## 10 B C
## # ℹ 49 more rows
##
## [[19]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 B A
## 2 B B
## 3 B B
## 4 B B
## 5 C C
## 6 A A
## 7 A A
## 8 B B
## 9 A C
## 10 B B
## # ℹ 49 more rows
##
## [[20]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A B
## 3 B B
## 4 B B
## 5 B B
## 6 C C
## 7 B B
## 8 B B
## 9 C C
## 10 C B
## # ℹ 49 more rows
##
## [[21]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A A
## 3 B C
## 4 B C
## 5 A A
## 6 B A
## 7 A A
## 8 B B
## 9 B C
## 10 A B
## # ℹ 50 more rows
##
## [[22]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 B B
## 3 B A
## 4 B B
## 5 B B
## 6 B A
## 7 A A
## 8 B C
## 9 B B
## 10 A A
## # ℹ 49 more rows
##
## [[23]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 A B
## 2 B B
## 3 A C
## 4 B B
## 5 C C
## 6 A A
## 7 C C
## 8 A A
## 9 B B
## 10 A B
## # ℹ 50 more rows
##
## [[24]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 B C
## 3 B B
## 4 B B
## 5 B C
## 6 B C
## 7 B C
## 8 B B
## 9 A A
## 10 B A
## # ℹ 50 more rows
##
## [[25]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 B B
## 3 A A
## 4 A A
## 5 B A
## 6 A B
## 7 A A
## 8 B C
## 9 C C
## 10 C C
## # ℹ 50 more rows
##
## [[26]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 B A
## 2 B B
## 3 B B
## 4 A B
## 5 B B
## 6 A C
## 7 B B
## 8 B B
## 9 A C
## 10 A B
## # ℹ 51 more rows
##
## [[27]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 C B
## 3 A A
## 4 A A
## 5 A A
## 6 C C
## 7 B B
## 8 B C
## 9 B A
## 10 B C
## # ℹ 51 more rows
##
## [[28]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A C
## 3 B B
## 4 B C
## 5 B B
## 6 B A
## 7 B B
## 8 A A
## 9 B B
## 10 A A
## # ℹ 50 more rows
##
## [[29]]
## # A tibble: 58 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 C B
## 3 B B
## 4 A A
## 5 B B
## 6 A A
## 7 A A
## 8 B A
## 9 A A
## 10 C C
## # ℹ 48 more rows
##
## [[30]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 A B
## 3 B B
## 4 B A
## 5 C C
## 6 B B
## 7 B A
## 8 A A
## 9 B A
## 10 C C
## # ℹ 49 more rows
##
## [[31]]
## # A tibble: 62 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A B
## 3 C C
## 4 B C
## 5 A A
## 6 B B
## 7 A A
## 8 A B
## 9 C C
## 10 B B
## # ℹ 52 more rows
##
## [[32]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A C
## 3 B B
## 4 B B
## 5 A A
## 6 B A
## 7 B B
## 8 C C
## 9 B B
## 10 A B
## # ℹ 50 more rows
##
## [[33]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B A
## 2 B B
## 3 B A
## 4 B C
## 5 B A
## 6 B B
## 7 B B
## 8 B C
## 9 C B
## 10 B C
## # ℹ 50 more rows
##
## [[34]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 B B
## 3 B B
## 4 A A
## 5 B B
## 6 C C
## 7 A B
## 8 B A
## 9 A A
## 10 A A
## # ℹ 49 more rows
##
## [[35]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 B A
## 2 B A
## 3 A A
## 4 B B
## 5 B B
## 6 A B
## 7 B B
## 8 B C
## 9 B B
## 10 B A
## # ℹ 49 more rows
##
## [[36]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 C B
## 3 B A
## 4 A A
## 5 B B
## 6 A A
## 7 B B
## 8 B B
## 9 B C
## 10 A C
## # ℹ 51 more rows
##
## [[37]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A B
## 3 B B
## 4 B B
## 5 C C
## 6 B A
## 7 B B
## 8 B B
## 9 B A
## 10 B C
## # ℹ 50 more rows
##
## [[38]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 C B
## 3 A C
## 4 B B
## 5 B B
## 6 B C
## 7 C C
## 8 B C
## 9 A A
## 10 A A
## # ℹ 50 more rows
##
## [[39]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B C
## 2 C C
## 3 A A
## 4 B C
## 5 B C
## 6 A A
## 7 A B
## 8 A B
## 9 B B
## 10 A A
## # ℹ 50 more rows
##
## [[40]]
## # A tibble: 57 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A A
## 3 A A
## 4 B A
## 5 B C
## 6 A A
## 7 B B
## 8 B C
## 9 A C
## 10 B B
## # ℹ 47 more rows
##
## [[41]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 B B
## 3 B B
## 4 A C
## 5 A A
## 6 B A
## 7 B B
## 8 B C
## 9 B A
## 10 B B
## # ℹ 51 more rows
##
## [[42]]
## # A tibble: 62 × 2
## estimate truth
## <ord> <ord>
## 1 A B
## 2 B B
## 3 B A
## 4 B B
## 5 A A
## 6 B C
## 7 A B
## 8 A A
## 9 B C
## 10 B C
## # ℹ 52 more rows
##
## [[43]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A C
## 3 B B
## 4 B A
## 5 B A
## 6 C C
## 7 B C
## 8 C C
## 9 C C
## 10 A A
## # ℹ 50 more rows
##
## [[44]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 A A
## 2 A C
## 3 B C
## 4 C C
## 5 B B
## 6 B B
## 7 A A
## 8 A A
## 9 C B
## 10 B B
## # ℹ 50 more rows
##
## [[45]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 B B
## 3 A B
## 4 C C
## 5 B C
## 6 A A
## 7 B B
## 8 A A
## 9 B C
## 10 B B
## # ℹ 51 more rows
##
## [[46]]
## # A tibble: 61 × 2
## estimate truth
## <ord> <ord>
## 1 B A
## 2 B B
## 3 B B
## 4 B B
## 5 A A
## 6 B B
## 7 A A
## 8 B C
## 9 A C
## 10 C C
## # ℹ 51 more rows
##
## [[47]]
## # A tibble: 59 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 A A
## 3 A A
## 4 B B
## 5 B B
## 6 C C
## 7 A B
## 8 A A
## 9 A B
## 10 C A
## # ℹ 49 more rows
##
## [[48]]
## # A tibble: 60 × 2
## estimate truth
## <ord> <ord>
## 1 B A
## 2 A B
## 3 B B
## 4 C C
## 5 B B
## 6 A A
## 7 B B
## 8 B B
## 9 B C
## 10 B C
## # ℹ 50 more rows
##
## [[49]]
## # A tibble: 58 × 2
## estimate truth
## <ord> <ord>
## 1 B B
## 2 B B
## 3 A A
## 4 B B
## 5 B B
## 6 B C
## 7 B A
## 8 A A
## 9 A A
## 10 C C
## # ℹ 48 more rows
##
## [[50]]
## # A tibble: 56 × 2
## estimate truth
## <ord> <ord>
## 1 C B
## 2 A A
## 3 B A
## 4 C B
## 5 A A
## 6 B A
## 7 C C
## 8 B C
## 9 B A
## 10 B C
## # ℹ 46 more rowscm_regresi_ord_cv <- map(regresi_ord_cv,
function(x){
cm <- conf_mat(x,truth = truth,estimate = estimate)
autoplot(cm,type = "heatmap")+
scale_fill_viridis_c(direction = -1,option = "inferno",alpha = 0.6)
}
)## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.cm_all <- conf_mat(pred_all, truth = truth, estimate = estimate)
autoplot(cm_all, type = "heatmap") +
scale_fill_viridis_c(direction = -1, option = "inferno", alpha = 0.6)## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
cm_list <- map(regresi_ord_cv, ~conf_mat(.x, truth = truth, estimate = estimate))
plot_list <- map(cm_list, ~autoplot(.x, type = "heatmap") +
scale_fill_viridis_c(direction = -1, option = "inferno", alpha = 0.6))## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.
## Scale for fill is already present.
## Adding another scale for fill, which will replace the existing scale.plot_list[[1]] # contoh tampilkan fold pertama
cm_regresi_ord_cv## [[1]]
##
## [[2]]
##
## [[3]]
##
## [[4]]
##
## [[5]]
##
## [[6]]
##
## [[7]]
##
## [[8]]
##
## [[9]]
##
## [[10]]
##
## [[11]]
##
## [[12]]
##
## [[13]]
##
## [[14]]
##
## [[15]]
##
## [[16]]
##
## [[17]]
##
## [[18]]
##
## [[19]]
##
## [[20]]
##
## [[21]]
##
## [[22]]
##
## [[23]]
##
## [[24]]
##
## [[25]]
##
## [[26]]
##
## [[27]]
##
## [[28]]
##
## [[29]]
##
## [[30]]
##
## [[31]]
##
## [[32]]
##
## [[33]]
##
## [[34]]
##
## [[35]]
##
## [[36]]
##
## [[37]]
##
## [[38]]
##
## [[39]]
##
## [[40]]
##
## [[41]]
##
## [[42]]
##
## [[43]]
##
## [[44]]
##
## [[45]]
##
## [[46]]
##
## [[47]]
##
## [[48]]
##
## [[49]]
##
## [[50]]
library(stringr)
perf_regresi_ord_cv <- map(regresi_ord_cv,
function(x){
accuracy(x,truth = truth,estimate = estimate)
}
) %>%
list_rbind() %>%
mutate(id=str_c("fold",seq(nrow(folds)))) %>%
relocate(id)
perf_regresi_ord_cv## # A tibble: 50 × 4
## id .metric .estimator .estimate
## <chr> <chr> <chr> <dbl>
## 1 fold1 accuracy multiclass 0.613
## 2 fold2 accuracy multiclass 0.467
## 3 fold3 accuracy multiclass 0.567
## 4 fold4 accuracy multiclass 0.667
## 5 fold5 accuracy multiclass 0.475
## 6 fold6 accuracy multiclass 0.639
## 7 fold7 accuracy multiclass 0.542
## 8 fold8 accuracy multiclass 0.621
## 9 fold9 accuracy multiclass 0.586
## 10 fold10 accuracy multiclass 0.644
## # ℹ 40 more rowsperf_regresi_ord_cv %>%
group_by(.metric,.estimator) %>%
summarize(mean=mean(.estimate),n=n(),std_err=sd(.estimate)/sqrt(n))## `summarise()` has grouped output by '.metric'. You can override using the
## `.groups` argument.## # A tibble: 1 × 5
## # Groups: .metric [1]
## .metric .estimator mean n std_err
## <chr> <chr> <dbl> <int> <dbl>
## 1 accuracy multiclass 0.577 50 0.007636. Prediksi Data Baru
set.seed(1234)
data_baru <- df1 %>%
slice_sample(n = 2,by = `Peringkat Akreditasi`) %>%
select(-`Peringkat Akreditasi`)
data_baru## # A tibble: 8 × 5
## provinsi Lit_2023 Num_2023 Lit_2024 Num_2024
## <fct> <dbl> <dbl> <dbl> <dbl>
## 1 Prov. Sulawesi Tenggara 14.6 17.1 20 48
## 2 Prov. Sulawesi Tengah 62.2 44.4 68.9 51.2
## 3 Prov. Sulawesi Barat 40 46.7 44.4 46.7
## 4 Prov. Sulawesi Selatan 40 44.4 37.8 53.3
## 5 Prov. Sulawesi Tenggara 42.9 57.1 20 20
## 6 Prov. Sulawesi Selatan 50 83.3 33.3 33.3
## 7 Prov. Sulawesi Tenggara 71.1 68.2 62.2 55.6
## 8 Prov. Sulawesi Utara 9.09 45.4 15.4 30.8Regresi Logistik Multinomial
regresi_mult_opt <- regresi_mult %>%
fit(Peringkat_Akreditasi~.,data=dat)pred_data_baru <- regresi_mult_opt %>%
predict(new_data = data_baru)
pred_data_baru## # A tibble: 8 × 1
## .pred_class
## <ord>
## 1 B
## 2 B
## 3 B
## 4 B
## 5 B
## 6 B
## 7 B
## 8 CRegresi Logistik Ordinal
regresi_ord_opt <- regresi_ordpred_data_baru2 <-regresi_ord_opt %>%
predict(newdata=data_baru,type="response") %>%
as.data.frame() %>%
apply(MARGIN=1,FUN=function(x) names(x[which.max(x)])) %>%
factor(levels = c("A","B","C","D")) %>%
as_tibble() %>%
rename(.pred_class=value) ## Warning in logit(theta = structure(c(0.344366629058998, -1.90887902535002, : 'logit' is deprecated.
## Use 'logitlink' instead.
## See help("Deprecated")pred_data_baru2## # A tibble: 8 × 1
## .pred_class
## <fct>
## 1 C
## 2 B
## 3 B
## 4 B
## 5 B
## 6 B
## 7 B
## 8 C