| title: “final proje” |
| author: “ABDIMUNCIM ISSE ISMAIL 2010504587” |
| date: “2024-01-21” |
| output: |
| prettydoc::html_pretty: |
| theme: tactile |
| toc: yes |
##spaceship titanic
Welcome to the year 2912, where your data science skills are needed to solve a cosmic mystery. We’ve received a transmission from four lightyears away and things aren’t looking good.
The Spaceship Titanic was an interstellar passenger liner launched a month ago. With almost 13,000 passengers on board, the vessel set out on its maiden voyage transporting emigrants from our solar system to three newly habitable exoplanets orbiting nearby stars.
While rounding Alpha Centauri en route to its first destination—the torrid 55 Cancri E—the unwary Spaceship Titanic collided with a spacetime anomaly hidden within a dust cloud. Sadly, it met a similar fate as its namesake from 1000 years before. Though the ship stayed intact, almost half of the passengers were transported to an alternate dimension!
library(readr)
train <- read_csv("train.csv")
## Rows: 8693 Columns: 14
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (5): PassengerId, HomePlanet, Cabin, Destination, Name
## dbl (6): Age, RoomService, FoodCourt, ShoppingMall, Spa, VRDeck
## lgl (3): CryoSleep, VIP, Transported
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
Bu satır, “train.csv” adlı bir CSV dosyasını okur ve içerdiği verileri “train” adlı bir veri çerçevesine yükler
test <- read_csv("test.csv")
## Rows: 4277 Columns: 13
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (5): PassengerId, HomePlanet, Cabin, Destination, Name
## dbl (6): Age, RoomService, FoodCourt, ShoppingMall, Spa, VRDeck
## lgl (2): CryoSleep, VIP
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
Bu satır, “train.csv” adlı bir CSV dosyasını okur ve içerdiği verileri “train” adlı bir veri çerçevesine yükler
library(tidyverse)
## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr 1.1.4 ✔ purrr 1.0.2
## ✔ forcats 1.0.0 ✔ stringr 1.5.1
## ✔ ggplot2 3.4.4 ✔ tibble 3.2.1
## ✔ lubridate 1.9.3 ✔ tidyr 1.3.0
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag() masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
tidyverse R paketi, veri manipülasyonu ve analizi için bir dizi kullanışlı fonksiyon içeren bir koleksiyondur. Bu paket, veri bilimi ve analizi alanında sıkça kullanılan bazı önemli paketleri içerir ve bu paketler arasında tutarlı bir dil ve çalışma mantığı sağlar.
library(explore)
Eğer library(explore) komutunu kullanıyorsanız, bu kod, “explore” adlı bir R paketini yüklemek ve bu paketin fonksiyonlarını kullanılabilir hale getirmek için kullanılır. R’deki library fonksiyonu, belirtilen paketi yükler ve paketin içindeki fonksiyonları kullanılabilir kılar
train %>% describe_all()
## # A tibble: 14 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet chr 201 2.3 4 NA NA NA
## 3 CryoSleep lgl 217 2.5 3 0 0.36 1
## 4 Cabin chr 199 2.3 6561 NA NA NA
## 5 Destination chr 182 2.1 4 NA NA NA
## 6 Age dbl 179 2.1 81 0 28.8 79
## 7 VIP lgl 203 2.3 3 0 0.02 1
## 8 RoomService dbl 181 2.1 1274 0 225. 14327
## 9 FoodCourt dbl 183 2.1 1508 0 458. 29813
## 10 ShoppingMall dbl 208 2.4 1116 0 174. 23492
## 11 Spa dbl 183 2.1 1328 0 311. 22408
## 12 VRDeck dbl 188 2.2 1307 0 305. 24133
## 13 Name chr 200 2.3 8474 NA NA NA
## 14 Transported lgl 0 0 2 0 0.5 1
describe_all fonksiyonunu kullanarak veri çerçevesindeki tüm değişkenlerin özet istatistiklerini elde etmeye yönelik bir kod olabilir.
train[c('ailenum', 'ailesira')] <- str_split_fixed(train$PassengerId, "_", 2)
“train” adlı bir veri çerçevesinde bulunan “PassengerId” değişkenini kullanarak “ailenum” ve “ailesira” adlı yeni değişkenleri oluşturmayı amaçlar
test[c('ailenum', 'ailesira')] <- str_split_fixed(test$PassengerId, "_", 2)
“test” adlı bir veri çerçevesinde bulunan “PassengerId” değişkenini kullanarak “ailenum” ve “ailesira” adlı yeni değişkenleri oluşturmayı amaçlar
train[c('deck', 'num', 'side')] <- str_split_fixed(train$Cabin, '/', 3)
“train” adlı bir veri çerçevesinde bulunan “Cabin” değişkenini kullanarak yeni “deck”, “num” ve “side” adlı üç yeni değişkeni oluşturmayı amaçlar.
test[c('deck', 'num', 'side')] <- str_split_fixed(test$Cabin, '/', 3)
“train” adlı bir veri çerçevesinde bulunan “Cabin” değişkenini kullanarak yeni “deck”, “num” ve “side” adlı üç yeni değişkeni oluşturmayı amaçlar.
train[train == ''] <- NA
test[test == ''] <- NA
“train” ve “test” adlı iki veri çerçevesindeki boş değerleri (’’ olarak temsil edilen karakter dizisi boşlukları) NA (eksik veri) değerleri ile değiştirir. Bu işlem, veri çerçevelerindeki boş değerleri düzenlemek ve eksik veri durumunu belirtmek amacıyla kullanılır.
train %>% describe_all()
## # A tibble: 19 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet chr 201 2.3 4 NA NA NA
## 3 CryoSleep lgl 217 2.5 3 0 0.36 1
## 4 Cabin chr 199 2.3 6561 NA NA NA
## 5 Destination chr 182 2.1 4 NA NA NA
## 6 Age dbl 179 2.1 81 0 28.8 79
## 7 VIP lgl 203 2.3 3 0 0.02 1
## 8 RoomService dbl 181 2.1 1274 0 225. 14327
## 9 FoodCourt dbl 183 2.1 1508 0 458. 29813
## 10 ShoppingMall dbl 208 2.4 1116 0 174. 23492
## 11 Spa dbl 183 2.1 1328 0 311. 22408
## 12 VRDeck dbl 188 2.2 1307 0 305. 24133
## 13 Name chr 200 2.3 8474 NA NA NA
## 14 Transported lgl 0 0 2 0 0.5 1
## 15 ailenum chr 0 0 6217 NA NA NA
## 16 ailesira chr 0 0 8 NA NA NA
## 17 deck chr 199 2.3 9 NA NA NA
## 18 num chr 199 2.3 1818 NA NA NA
## 19 side chr 199 2.3 3 NA NA NA
train <- train %>% select(-Cabin)
“train” veri çerçevesindeki “Cabin” sütunu çıkarılarak yeni bir güncellenmiş veri çerçevesi oluşturulur. Bu tür işlemler, gereksiz veya kullanılmayan sütunları çıkarmak veya veriyi belirli bir şekilde düzenlemek için yaygın olarak kullanılır
test <- test %>% select(-Cabin)
“train” veri çerçevesindeki “Cabin” sütunu çıkarılarak yeni bir güncellenmiş veri çerçevesi oluşturulur. Bu tür işlemler, gereksiz veya kullanılmayan sütunları çıkarmak veya veriyi belirli bir şekilde düzenlemek için yaygın olarak kullanılır
unique(train$HomePlanet)
## [1] "Europa" "Earth" "Mars" NA
“train” veri çerçevesindeki “HomePlanet” sütunundaki benzersiz (unique) değerleri döndürür. Yani, bu kod, “HomePlanet” sütunundaki farklı kategorileri bulmanıza yardımcı olur.
levels(train$HomePlanet)
## NULL
“HomePlanet” sütununun faktör olduğu varsayımıyla çalışır ve bu sütundaki benzersiz seviyeleri döndürür
train$HomePlanet <- addNA(train$HomePlanet)
“train” veri çerçevesindeki “HomePlanet” sütunundaki tüm değerleri bir eşdeğer değeri olan NA (eksik değer) ile değiştirir. Bu, eksik veya bilinmeyen değerleri belirtmek için kullanılır
test$HomePlanet <- addNA(test$HomePlanet)
“train” veri çerçevesindeki “HomePlanet” sütunundaki tüm değerleri bir eşdeğer değeri olan NA (eksik değer) ile değiştirir. Bu, eksik veya bilinmeyen değerleri belirtmek için kullanılır
levels(train$HomePlanet)
## [1] "Earth" "Europa" "Mars" NA
“HomePlanet” sütununun faktör olduğu varsayımıyla çalışır ve bu sütundaki benzersiz seviyeleri döndürür
levels(train$HomePlanet)[is.na(levels(train$HomePlanet))] <- "NA"
“train” veri çerçevesindeki “HomePlanet” sütunundaki faktör seviyelerinden herhangi biri NA (eksik değer) ise, bu seviyeleri “NA” karakter dizisi ile değiştirir. Yani, NA değerlerine özel bir kategori atanmış olur.
levels(test$HomePlanet)[is.na(levels(test$HomePlanet))] <- "NA"
“test” veri çerçevesindeki “HomePlanet” sütunundaki faktör seviyelerinden herhangi biri NA (eksik değer) ise, bu seviyeleri “NA” karakter dizisi ile değiştirir. Yani, NA değerlerine özel bir kategori atanmış olur.
levels(train$HomePlanet)
## [1] "Earth" "Europa" "Mars" "NA"
“HomePlanet” sütununun faktör olduğu varsayımıyla çalışır ve bu sütundaki benzersiz seviyeleri döndürür
train %>% describe_all()
## # A tibble: 18 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep lgl 217 2.5 3 0 0.36 1
## 4 Destination chr 182 2.1 4 NA NA NA
## 5 Age dbl 179 2.1 81 0 28.8 79
## 6 VIP lgl 203 2.3 3 0 0.02 1
## 7 RoomService dbl 181 2.1 1274 0 225. 14327
## 8 FoodCourt dbl 183 2.1 1508 0 458. 29813
## 9 ShoppingMall dbl 208 2.4 1116 0 174. 23492
## 10 Spa dbl 183 2.1 1328 0 311. 22408
## 11 VRDeck dbl 188 2.2 1307 0 305. 24133
## 12 Name chr 200 2.3 8474 NA NA NA
## 13 Transported lgl 0 0 2 0 0.5 1
## 14 ailenum chr 0 0 6217 NA NA NA
## 15 ailesira chr 0 0 8 NA NA NA
## 16 deck chr 199 2.3 9 NA NA NA
## 17 num chr 199 2.3 1818 NA NA NA
## 18 side chr 199 2.3 3 NA NA NA
train <- train %>%
group_by(HomePlanet) %>%
mutate_at(vars(Age), ~replace_na(., mean(., na.rm = TRUE)))
“train” veri çerçevesindeki “HomePlanet” sütununa göre gruplama yapar (group_by) ve her grup içindeki “Age” sütunundaki eksik değerleri (NA) grup ortalaması ile doldurur (mutate_at, replace_na).
test <- test %>%
group_by(HomePlanet) %>%
mutate_at(vars(Age), ~replace_na(., mean(., na.rm = TRUE)))
“test” veri çerçevesindeki “HomePlanet” sütununa göre gruplama yapar (group_by) ve her grup içindeki “Age” sütunundaki eksik değerleri (NA) grup ortalaması ile doldurur (mutate_at, replace_na).
train %>% describe_all()
## # A tibble: 18 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep lgl 217 2.5 3 0 0.36 1
## 4 Destination chr 182 2.1 4 NA NA NA
## 5 Age dbl 0 0 84 0 28.8 79
## 6 VIP lgl 203 2.3 3 0 0.02 1
## 7 RoomService dbl 181 2.1 1274 0 225. 14327
## 8 FoodCourt dbl 183 2.1 1508 0 458. 29813
## 9 ShoppingMall dbl 208 2.4 1116 0 174. 23492
## 10 Spa dbl 183 2.1 1328 0 311. 22408
## 11 VRDeck dbl 188 2.2 1307 0 305. 24133
## 12 Name chr 200 2.3 8474 NA NA NA
## 13 Transported lgl 0 0 2 0 0.5 1
## 14 ailenum chr 0 0 6217 NA NA NA
## 15 ailesira chr 0 0 8 NA NA NA
## 16 deck chr 199 2.3 9 NA NA NA
## 17 num chr 199 2.3 1818 NA NA NA
## 18 side chr 199 2.3 3 NA NA NA
train$CryoSleep <- addNA(train$CryoSleep)
“train” veri çerçevesindeki “CryoSleep” sütunundaki tüm değerleri bir eşdeğer değeri olan NA (eksik değer) ile değiştirir. Bu, eksik veya bilinmeyen değerleri belirtmek için kullanılır. addNA() fonksiyonu, bir vektördeki tüm benzersiz değerlere NA değerini ekler.
test$CryoSleep <- addNA(test$CryoSleep)
“test” veri çerçevesindeki “CryoSleep” sütunundaki tüm değerleri bir eşdeğer değeri olan NA (eksik değer) ile değiştirir. Bu, eksik veya bilinmeyen değerleri belirtmek için kullanılır. addNA() fonksiyonu, bir vektördeki tüm benzersiz değerlere NA değerini ekler.
levels(train$CryoSleep)[is.na(levels(train$CryoSleep))] <- "NA"
levels(test$CryoSleep)[is.na(levels(test$CryoSleep))] <- "NA"
train %>% describe_all()
## # A tibble: 18 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep fct 0 0 3 NA NA NA
## 4 Destination chr 182 2.1 4 NA NA NA
## 5 Age dbl 0 0 84 0 28.8 79
## 6 VIP lgl 203 2.3 3 0 0.02 1
## 7 RoomService dbl 181 2.1 1274 0 225. 14327
## 8 FoodCourt dbl 183 2.1 1508 0 458. 29813
## 9 ShoppingMall dbl 208 2.4 1116 0 174. 23492
## 10 Spa dbl 183 2.1 1328 0 311. 22408
## 11 VRDeck dbl 188 2.2 1307 0 305. 24133
## 12 Name chr 200 2.3 8474 NA NA NA
## 13 Transported lgl 0 0 2 0 0.5 1
## 14 ailenum chr 0 0 6217 NA NA NA
## 15 ailesira chr 0 0 8 NA NA NA
## 16 deck chr 199 2.3 9 NA NA NA
## 17 num chr 199 2.3 1818 NA NA NA
## 18 side chr 199 2.3 3 NA NA NA
unique(train$Destination)
## [1] "TRAPPIST-1e" "PSO J318.5-22" "55 Cancri e" NA
train$Destination <- addNA(train$Destination)
test$Destination <- addNA(test$Destination)
levels(train$Destination)[is.na(levels(train$Destination))] <- "NA"
levels(test$Destination)[is.na(levels(test$Destination))] <- "NA"
train$side <- addNA(train$side)
test$side <- addNA(test$side)
levels(train$side)[is.na(levels(train$side))] <- "NA"
levels(test$side)[is.na(levels(test$side))] <- "NA"
train %>% describe_all()
## # A tibble: 18 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep fct 0 0 3 NA NA NA
## 4 Destination fct 0 0 4 NA NA NA
## 5 Age dbl 0 0 84 0 28.8 79
## 6 VIP lgl 203 2.3 3 0 0.02 1
## 7 RoomService dbl 181 2.1 1274 0 225. 14327
## 8 FoodCourt dbl 183 2.1 1508 0 458. 29813
## 9 ShoppingMall dbl 208 2.4 1116 0 174. 23492
## 10 Spa dbl 183 2.1 1328 0 311. 22408
## 11 VRDeck dbl 188 2.2 1307 0 305. 24133
## 12 Name chr 200 2.3 8474 NA NA NA
## 13 Transported lgl 0 0 2 0 0.5 1
## 14 ailenum chr 0 0 6217 NA NA NA
## 15 ailesira chr 0 0 8 NA NA NA
## 16 deck chr 199 2.3 9 NA NA NA
## 17 num chr 199 2.3 1818 NA NA NA
## 18 side fct 0 0 3 NA NA NA
train$VIP <- addNA(train$VIP)
test$VIP <- addNA(test$VIP)
levels(train$VIP)[is.na(levels(train$VIP))] <- "NA"
levels(test$VIP)[is.na(levels(test$VIP))] <- "NA"
train <- train %>%
group_by(Destination) %>%
mutate_at(vars(RoomService), ~replace_na(., mean(., na.rm = TRUE)))
test <- test %>%
group_by(Destination) %>%
mutate_at(vars(RoomService), ~replace_na(., mean(., na.rm = TRUE)))
train %>% describe_all()
## # A tibble: 18 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep fct 0 0 3 NA NA NA
## 4 Destination fct 0 0 4 NA NA NA
## 5 Age dbl 0 0 84 0 28.8 79
## 6 VIP fct 0 0 3 NA NA NA
## 7 RoomService dbl 0 0 1277 0 225. 14327
## 8 FoodCourt dbl 183 2.1 1508 0 458. 29813
## 9 ShoppingMall dbl 208 2.4 1116 0 174. 23492
## 10 Spa dbl 183 2.1 1328 0 311. 22408
## 11 VRDeck dbl 188 2.2 1307 0 305. 24133
## 12 Name chr 200 2.3 8474 NA NA NA
## 13 Transported lgl 0 0 2 0 0.5 1
## 14 ailenum chr 0 0 6217 NA NA NA
## 15 ailesira chr 0 0 8 NA NA NA
## 16 deck chr 199 2.3 9 NA NA NA
## 17 num chr 199 2.3 1818 NA NA NA
## 18 side fct 0 0 3 NA NA NA
hist(train$ShoppingMall)
hist(train$FoodCourt)
train <- train %>% mutate(FoodCourt = coalesce(FoodCourt, 0))
train” veri çerçevesindeki “FoodCourt” sütunundaki eksik değerleri (NA) 0 ile değiştirir. Bu işlem, eksik değerleri belirli bir değerle doldurmak amacıyla kullanılır.
test <- test %>% mutate(FoodCourt = coalesce(FoodCourt, 0))
test veri çerçevesindeki “FoodCourt” sütunundaki eksik değerleri (NA) 0 ile değiştirir. Bu işlem, eksik değerleri belirli bir değerle doldurmak amacıyla kullanılır.
train %>% describe_all()
## # A tibble: 18 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep fct 0 0 3 NA NA NA
## 4 Destination fct 0 0 4 NA NA NA
## 5 Age dbl 0 0 84 0 28.8 79
## 6 VIP fct 0 0 3 NA NA NA
## 7 RoomService dbl 0 0 1277 0 225. 14327
## 8 FoodCourt dbl 0 0 1507 0 448. 29813
## 9 ShoppingMall dbl 208 2.4 1116 0 174. 23492
## 10 Spa dbl 183 2.1 1328 0 311. 22408
## 11 VRDeck dbl 188 2.2 1307 0 305. 24133
## 12 Name chr 200 2.3 8474 NA NA NA
## 13 Transported lgl 0 0 2 0 0.5 1
## 14 ailenum chr 0 0 6217 NA NA NA
## 15 ailesira chr 0 0 8 NA NA NA
## 16 deck chr 199 2.3 9 NA NA NA
## 17 num chr 199 2.3 1818 NA NA NA
## 18 side fct 0 0 3 NA NA NA
train <- train %>% mutate(ShoppingMall = coalesce(ShoppingMall, 0),
Spa = coalesce(Spa, 0),
VRDeck = coalesce(VRDeck, 0))
“train” veri çerçevesindeki “ShoppingMall”, “Spa” ve “VRDeck” sütunlarındaki eksik değerleri (NA) sırasıyla 0 ile değiştirir. Bu işlem, belirli sütunlardaki eksik değerleri belirli bir değerle doldurmak amacıyla kullanılır.
test <- test %>% mutate(ShoppingMall = coalesce(ShoppingMall, 0),
Spa = coalesce(Spa, 0),
VRDeck = coalesce(VRDeck, 0))
“test” veri çerçevesindeki “ShoppingMall”, “Spa” ve “VRDeck” sütunlarındaki eksik değerleri (NA) sırasıyla 0 ile değiştirir. Bu işlem, belirli sütunlardaki eksik değerleri belirli bir değerle doldurmak amacıyla kullanılır.
train %>% describe_all()
## # A tibble: 18 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep fct 0 0 3 NA NA NA
## 4 Destination fct 0 0 4 NA NA NA
## 5 Age dbl 0 0 84 0 28.8 79
## 6 VIP fct 0 0 3 NA NA NA
## 7 RoomService dbl 0 0 1277 0 225. 14327
## 8 FoodCourt dbl 0 0 1507 0 448. 29813
## 9 ShoppingMall dbl 0 0 1115 0 170. 23492
## 10 Spa dbl 0 0 1327 0 305. 22408
## 11 VRDeck dbl 0 0 1306 0 298. 24133
## 12 Name chr 200 2.3 8474 NA NA NA
## 13 Transported lgl 0 0 2 0 0.5 1
## 14 ailenum chr 0 0 6217 NA NA NA
## 15 ailesira chr 0 0 8 NA NA NA
## 16 deck chr 199 2.3 9 NA NA NA
## 17 num chr 199 2.3 1818 NA NA NA
## 18 side fct 0 0 3 NA NA NA
train <- train %>% select(-Name)
“train” veri çerçevesinden “Name” sütununu çıkararak güncelleme yapar. Bu işlem, dplyr paketinin %>% (pipe) operatörü ve select fonksiyonunu kullanır.
test <- test %>% select(-Name)
“test” veri çerçevesinden “Name” sütununu çıkararak güncelleme yapar. Bu işlem, dplyr paketinin %>% (pipe) operatörü ve select fonksiyonunu kullanır.
train %>% describe_all()
## # A tibble: 17 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep fct 0 0 3 NA NA NA
## 4 Destination fct 0 0 4 NA NA NA
## 5 Age dbl 0 0 84 0 28.8 79
## 6 VIP fct 0 0 3 NA NA NA
## 7 RoomService dbl 0 0 1277 0 225. 14327
## 8 FoodCourt dbl 0 0 1507 0 448. 29813
## 9 ShoppingMall dbl 0 0 1115 0 170. 23492
## 10 Spa dbl 0 0 1327 0 305. 22408
## 11 VRDeck dbl 0 0 1306 0 298. 24133
## 12 Transported lgl 0 0 2 0 0.5 1
## 13 ailenum chr 0 0 6217 NA NA NA
## 14 ailesira chr 0 0 8 NA NA NA
## 15 deck chr 199 2.3 9 NA NA NA
## 16 num chr 199 2.3 1818 NA NA NA
## 17 side fct 0 0 3 NA NA NA
test$deck <- addNA(test$deck)
“test” veri çerçevesindeki “deck” sütunundaki tüm değerleri bir eşdeğer değeri olan NA (eksik değer) ile değiştirir. addNA() fonksiyonu, bir vektördeki tüm benzersiz değerlere NA değerini ekler.
levels(train$deck)[is.na(levels(train$deck))] <- "NA"
“train” veri çerçevesindeki “deck” sütunundaki faktör seviyelerinden herhangi biri NA (eksik değer) ise, bu seviyeleri “NA” karakter dizisi ile değiştirir. Yani, NA değerlerine özel bir kategori atanmış olur.
levels(test$deck)[is.na(levels(test$deck))] <- "NA"
“test” veri çerçevesindeki “deck” sütunundaki faktör seviyelerinden herhangi biri NA (eksik değer) ise, bu seviyeleri “NA” karakter dizisi ile değiştirir. Yani, NA değerlerine özel bir kategori atanmış olur.
train %>% describe_all()
## # A tibble: 17 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep fct 0 0 3 NA NA NA
## 4 Destination fct 0 0 4 NA NA NA
## 5 Age dbl 0 0 84 0 28.8 79
## 6 VIP fct 0 0 3 NA NA NA
## 7 RoomService dbl 0 0 1277 0 225. 14327
## 8 FoodCourt dbl 0 0 1507 0 448. 29813
## 9 ShoppingMall dbl 0 0 1115 0 170. 23492
## 10 Spa dbl 0 0 1327 0 305. 22408
## 11 VRDeck dbl 0 0 1306 0 298. 24133
## 12 Transported lgl 0 0 2 0 0.5 1
## 13 ailenum chr 0 0 6217 NA NA NA
## 14 ailesira chr 0 0 8 NA NA NA
## 15 deck chr 199 2.3 9 NA NA NA
## 16 num chr 199 2.3 1818 NA NA NA
## 17 side fct 0 0 3 NA NA NA
test %>% describe_all()
## # A tibble: 16 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 4277 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep fct 0 0 3 NA NA NA
## 4 Destination fct 0 0 4 NA NA NA
## 5 Age dbl 0 0 83 0 28.7 79
## 6 VIP fct 0 0 3 NA NA NA
## 7 RoomService dbl 0 0 846 0 219. 11567
## 8 FoodCourt dbl 0 0 902 0 429. 25273
## 9 ShoppingMall dbl 0 0 715 0 173. 8292
## 10 Spa dbl 0 0 833 0 296. 19844
## 11 VRDeck dbl 0 0 796 0 305. 22272
## 12 ailenum chr 0 0 3063 NA NA NA
## 13 ailesira chr 0 0 8 NA NA NA
## 14 deck fct 0 0 9 NA NA NA
## 15 num chr 100 2.3 1506 NA NA NA
## 16 side fct 0 0 3 NA NA NA
train$aile <- ifelse(duplicated(train$ailenum) | duplicated(train$ailenum,
fromLast = TRUE), 1, 0)
“train” veri çerçevesindeki “deck” sütunundaki faktör seviyelerinden herhangi biri NA (eksik değer) ise, bu seviyeleri “NA” karakter dizisi ile değiştirir. Yani, NA değerlerine özel bir kategori atanmış olur.
test$aile <- ifelse(duplicated(test$ailenum) | duplicated(test$ailenum,
fromLast = TRUE), 1, 0)
“test” veri çerçevesindeki “deck” sütunundaki faktör seviyelerinden herhangi biri NA (eksik değer) ise, bu seviyeleri “NA” karakter dizisi ile değiştirir. Yani, NA değerlerine özel bir kategori atanmış olur.
head(train[, c("PassengerId", "ailenum", "ailesira", "aile")], 20)
## # A tibble: 20 × 4
## PassengerId ailenum ailesira aile
## <chr> <chr> <chr> <dbl>
## 1 0001_01 0001 01 0
## 2 0002_01 0002 01 0
## 3 0003_01 0003 01 1
## 4 0003_02 0003 02 1
## 5 0004_01 0004 01 0
## 6 0005_01 0005 01 0
## 7 0006_01 0006 01 1
## 8 0006_02 0006 02 1
## 9 0007_01 0007 01 0
## 10 0008_01 0008 01 1
## 11 0008_02 0008 02 1
## 12 0008_03 0008 03 1
## 13 0009_01 0009 01 0
## 14 0010_01 0010 01 0
## 15 0011_01 0011 01 0
## 16 0012_01 0012 01 0
## 17 0014_01 0014 01 0
## 18 0015_01 0015 01 0
## 19 0016_01 0016 01 0
## 20 0017_01 0017 01 1
test <- test %>% select(-c(ailenum, ailesira, num))
“test” veri çerçevesinden “ailenum”, “ailesira” ve “num” sütunlarını çıkararak güncelleme yapar. Bu işlem, dplyr paketinin %>% (pipe) operatörü ve select fonksiyonunu kullanır.
train %>% describe_all()
## # A tibble: 18 × 8
## variable type na na_pct unique min mean max
## <chr> <chr> <int> <dbl> <int> <dbl> <dbl> <dbl>
## 1 PassengerId chr 0 0 8693 NA NA NA
## 2 HomePlanet fct 0 0 4 NA NA NA
## 3 CryoSleep fct 0 0 3 NA NA NA
## 4 Destination fct 0 0 4 NA NA NA
## 5 Age dbl 0 0 84 0 28.8 79
## 6 VIP fct 0 0 3 NA NA NA
## 7 RoomService dbl 0 0 1277 0 225. 14327
## 8 FoodCourt dbl 0 0 1507 0 448. 29813
## 9 ShoppingMall dbl 0 0 1115 0 170. 23492
## 10 Spa dbl 0 0 1327 0 305. 22408
## 11 VRDeck dbl 0 0 1306 0 298. 24133
## 12 Transported lgl 0 0 2 0 0.5 1
## 13 ailenum chr 0 0 6217 NA NA NA
## 14 ailesira chr 0 0 8 NA NA NA
## 15 deck chr 199 2.3 9 NA NA NA
## 16 num chr 199 2.3 1818 NA NA NA
## 17 side fct 0 0 3 NA NA NA
## 18 aile dbl 0 0 2 0 0.45 1
base::is.data.frame(data)
## [1] FALSE
train_set <- train[2:15]
“train” veri çerçevesinden sadece 2. sütundan 15. sütuna kadar olan sütunları içeren bir yeni veri çerçevesi olan “train_set”i oluşturur.
test_set <- test[2:14]
“test” veri çerçevesinden sadece 2. sütundan 15. sütuna kadar olan sütunları içeren bir yeni veri çerçevesi olan “train_set”i oluşturur.
##Naive Bayes
library(e1071)
nb_modelim<- naiveBayes(Transported~ ., data= train_set )
preds<-predict(nb_modelim, newdata= test_set[-13], type = "raw") %>% data.frame()
“e1071” paketini kullanarak bir Naive Bayes sınıflandırma modeli oluşturur. Oluşturulan modeli kullanarak “test_set” veri çerçevesindeki gözlemleri tahmin eder.
y_pred = ifelse(preds$TRUE. > 0.5, 1, 0)
“preds” veri çerçevesindeki “TRUE.” sütunundaki olasılık değerlerini 0.5’ten büyükse 1, küçükse 0 olarak sınıflandırarak “y_pred” adlı yeni bir vektör oluşturur
(510+1016)/(510+1016+78+569)
## [1] 0.7022549
nb_son = naiveBayes(Transported ~ ., data = train_set)
Oluşturulan bu model, daha sonra test veri seti üzerinde tahminler yapmak veya modelin performansını değerlendirmek amacıyla kullanılabilir.
preds <- predict(nb_son, newdata = test_set, type = "raw") %>%
data.frame()
daha önce oluşturulan nb_son Naive Bayes modelini kullanarak “test_set” veri çerçevesindeki gözlemleri tahmin eder ve tahmin edilen olasılık değerlerini içeren bir veri çerçevesi olan “preds”i oluşturu
y_pred = ifelse(preds$TRUE. > 0.5, TRUE, FALSE)
“preds” veri çerçevesindeki “TRUE.” sütunundaki olasılık değerlerini 0.5’ten büyükse TRUE, küçükse FALSE olarak sınıflandırarak “y_pred” adlı yeni bir vektör oluşturur.
Transported <- as.character(y_pred)
PassengerId <- test$PassengerId
daha önce oluşturulan “y_pred” vektöründeki sınıflandırılmış sonuçları karakter dizisine (as.character) dönüştürür ve bu değerleri “Transported” adlı yeni bir vektöre atar. Aynı zamanda, “test” veri çerçevesindeki “PassengerId” sütununu “PassengerId” adlı başka bir vektöre atar.
Transported <-as.vector(Transported)
“Transported” adlı vektörü as.vector fonksiyonu kullanarak bir vektör olarak günceller. as.vector fonksiyonu, belirli bir veri yapısını vektöre dönüştürmek için kullanılır.
sample_submission <- cbind(PassengerId, Transported)
“PassengerId” ve “Transported” vektörlerini birleştirerek yeni bir veri çerçevesi olan “sample_submission”ı oluşturur. cbind fonksiyonu, sütunları birleştirmek için kullanılır ve bu durumda “PassengerId” ve “Transported” sütunları “sample_submission” veri çerçevesini oluşturur.
sample_submission <- as.data.frame(sample_submission)
“sample_submission” adlı nesnenin tipini veri çerçevesine dönüştürür. Yani, “sample_submission” nesnesinin içeriği aynı kalmakla birlikte, artık bir veri çerçevesi olarak ele alınacaktır.
sample_submission$Transported <- str_to_title(sample_submission$Transported)
Bu tür bir dönüşüm genellikle metin verilerinin düzenlenmesi veya görsel sunumu için kullanılır. Özellikle kategorik değişkenlerdeki etiketlerin standart bir formatta olması, analiz ve raporlama süreçlerini kolaylaştırabilir
write.csv(sample_submission, "sub_nb.csv", row.names = FALSE,
quote = FALSE)
sample_submission” veri çerçevesini bir CSV dosyasına (“sub_nb.csv”) yazma işlemini gerçekleştirir
library(e1071)
fit_svm <- svm(Transported ~ ., data = train_set,
type = "C-classification",
kernel = "linear")
“e1071” paketini kullanarak bir destek vektör makinesi (SVM) sınıflandırma modeli oluşturur. svm fonksiyonu, belirtilen sınıflandırma değişkeni ile diğer bağımsız değişkenler arasındaki ilişkiyi öğrenen bir SVM modeli oluşturur.
y_pred = ifelse(preds$.== TRUE, 1, 0)
“preds” veri çerçevesindeki her bir gözlem için “TRUE.” sütunundaki değeri kontrol eder ve bu değer “TRUE” ise 1, değilse 0 olarak sınıflandırır.
(574+661)/(574+661+127+203)
## [1] 0.7891374
svm_son = svm(Transported ~ ., data = train_set,
type = "C-classification",
kernel = "linear")
“train_set” veri çerçevesindeki “Transported” sınıflandırma değişkenini diğer tüm değişkenlere bağlı olarak kullanarak bir destek vektör makinesi (SVM) sınıflandırma modeli olan “svm_son”u oluşturur. Oluşturulan bu model, “C-classification” tipinde bir sınıflandırma modelidir ve doğrusal bir çekirdek (kernel) kullanır (kernel = “linear”).
y_pred = preds$.
“preds” veri çerçevesindeki “TRUE.” sütunundaki tahmin edilen değerleri “y_pred” adlı bir vektöre atar. Ancak, dikkat edilmesi gereken bir konu var: “TRUE.” sütunu muhtemelen mantıksal (logical) değerleri içerir (TRUE veya FALSE)
Transported <- as.character(y_pred)
PassengerId <- test$PassengerId
daha önce oluşturulan “y_pred” vektöründeki sınıflandırılmış sonuçları karakter dizisine (as.character) dönüştürür ve bu değerleri “Transported” adlı yeni bir vektöre atar. Aynı zamanda, “test” veri çerçevesindeki “PassengerId” sütununu “PassengerId” adlı başka bir vektöre atar.
Transported <-as.vector(Transported)
“Transported” adlı vektörü as.vector fonksiyonu kullanarak bir vektör olarak günceller. as.vector fonksiyonu, belirli bir veri yapısını vektöre dönüştürmek için kullanılır
sample_submission <- cbind(PassengerId, Transported)
“PassengerId” ve “Transported” vektörlerini birleştirerek yeni bir veri çerçevesi olan “sample_submission”ı oluşturur. cbind fonksiyonu, sütunları birleştirmek için kullanılır ve bu durumda “PassengerId” ve “Transported” sütunları “sample_submission” veri çerçevesini oluşturur.
sample_submission <- as.data.frame(sample_submission)
“sample_submission” adlı nesnenin tipini veri çerçevesine dönüştürür. Yani, “sample_submission” nesnesinin içeriği aynı kalmakla birlikte, artık bir veri çerçevesi olarak ele alınacaktır
library(stringr)
stringr kütüphanesi, R programlama dilinde metin işleme ve manipülasyon işlemleri için kullanılan bir kütüphanedir.
write.csv(sample_submission, "sub_svm.csv", row.names = FALSE,
quote = FALSE)
library(rpart)
library(rpart.plot)
library(randomForest)
## randomForest 4.7-1.1
## Type rfNews() to see new features/changes/bug fixes.
##
## Attaching package: 'randomForest'
## The following object is masked from 'package:dplyr':
##
## combine
## The following object is masked from 'package:ggplot2':
##
## margin
üç farklı R kütüphanesini yükler:
rpart: Karar ağacı modelleri oluşturmak için kullanılan “rpart” paketini yükler. rpart.plot: “rpart” paketindeki karar ağacı modellerini görselleştirmek için kullanılan “rpart.plot” paketini yükler. randomForest: R’deki rastgele orman modelleri oluşturmak ve yönetmek için kullanılan “randomForest” paketini yükler. Bu kütüphaneler, makine öğrenimi ve istatistiksel analizle ilgili birçok işlevselliği içerir. Örneğin, “rpart” ile karar ağacı modelleri oluşturabilir ve “rpart.plot” ile bu modelleri görselleştirebilirsiniz. “randomForest” paketi ise rastgele orman modelleri oluşturmak için kullanılır ve genellikle sınıflandırma ve regresyon problemlerinde kullanılır.
library(caret)
## Zorunlu paket yükleniyor: lattice
##
## Attaching package: 'caret'
## The following object is masked from 'package:purrr':
##
## lift
caret kütüphanesi, sınıflandırma, regresyon, kümeleme ve diğer makine öğrenimi görevlerini kolaylaştıran ve standartlaştıran bir R kütüphanesidir. Bu kütüphane, model eğitimi, hiperparametre ayarı, performans değerlendirmesi ve diğer birçok işlemi gerçekleştirmek için kullanılır.
fit_tree <- rpart::rpart(Transported ~ ., data = train_set)
summary(fit_tree)
## Call:
## rpart::rpart(formula = Transported ~ ., data = train_set)
## n= 8693
##
## CP nsplit rel error xerror xstd
## 1 0.62521454 0 1.0000000 1.000254 0.0001741426
## 2 0.08751388 1 0.3747855 1.184750 0.0167475694
## 3 0.04828533 2 0.2872716 1.275394 0.0183074680
## 4 0.02910718 3 0.2389862 1.258982 0.0185621258
## 5 0.02455280 4 0.2098791 1.271194 0.0187608931
## 6 0.01310940 5 0.1853263 1.305570 0.0193755534
## 7 0.01000000 6 0.1722169 1.306817 0.0194079183
##
## Variable importance
## ailenum CryoSleep RoomService Spa VRDeck ShoppingMall
## 54 12 9 8 8 6
## ailesira FoodCourt Age
## 2 1 1
##
## Node number 1: 8693 observations, complexity param=0.6252145
## mean=0.5036236, MSE=0.2499869
## left son=2 (3780 obs) right son=3 (4913 obs)
## Primary splits:
## ailenum splits as LRLRRRRRRLRLLLRRLLRLLLLRRLLLLRLRRLLLRRLLLRLRLRLLLLRRRLLRRRLRRRRLRRRLRLLLRRRRLRRRRLLRLLRRRLRRRLRLRLRLLLRRRRLLRRRLLLRLRRLRLLLRRLLRLRRRRLRLRRLLLLRLLRLLRLLLLLRLRLLLRRLLLRLLRRRLLLRRLRLRRLRRRRLRLRRRRRRLLRLLLRLLRLRRLLLLLRRLRLLRRRLLLRLRRLRRLRLLRLRRLRLLLRLRRRRLLRLLLLRLLRRLLRRLLLLLLRLLRRRRRRRRLRRRRLRLLLLLRRRRRRRLLRLRRLLRLLRRLRLRLLRLLLLRRRRLLLRRRRRRRLLRRLRLRRRLLRLLLRRRLLLLRRRLRRRRLRLLRLRRRRRRLLRLLRRLRRRRLLLLLLLRRLRRRLLRLLRRRRRRRRLRRLLRLLRRLRRRLRRRRRLRLRLLRLRLLRLLLLLLRLRLRLLRRLRRRRRLRRRRRLRLRRLLLLRRRLLLLLRLRLLRRRLRLLRLRRLLRLRLLLRRLRLLLRLLRLRLRLRRRLRRRLLLRRRRRLRRRRRRLLLLLLLRRRLRRLLRLRLLRLLLLRLLLLRRLRLRRRLLLRLRRRLLLLLRRLRRLRRRRRLRRRLLLRLRRLLLRRLRRLLLRRLLRLLRRRLRLRLLLRLLRLRLLRRLRRLRLRLLRRRLLLLRRLLLRLRRLRRLLLRRRLLLRRRLLLRRRLLRLLLLLLRLLRLRRRLRLRLLLLRRRRLRRLRLRLRLRRRRRRLLRRLLLRRRRRRRRLRLLLRRRRLRLRLLLLRLLRRLRLLLLRLLRRRRLLLLRRRRLLRRRRLRRRRLLRLLRLLLRLLLRLLLLLRRLLLRLRRLLLRLRLRLRRRLRRLLRRLRRLRLLRRLLLRLLLLRRLLLRRLRRLRRLLLLLRRLLRLRRLRLRRLLRLRLRLRLLLRLLLLLRLLLLLRRRRRLLRLLLLLLRRRRLRRLRLRLLRLRLLLRLRLLRRLLRLLLRLLRLLLRLRRRRRLRRRLLLRRLRLRLRLRLRLLLLLLLLRRRLLLRLRLRLRRRRLRRRRRLLRLRLRRLLRLRRRRRLRLLRRLLLRLRLLRLLRRLRLLRLLLLRRLLLLLLLLLLRLLLLLRLLLRRRRLLLRLLLLLRRLLLRLRLRRRLRLRRLLLRRLLRRLLLLLRRRLRLRRRLRRLLRRLLLLLRRLLRLLRRLLLLRRLRLRLRRLLRRLLRRLLRLLLLLRRRRLRLRRLLLRRLRLLLLLRRLLLRLLLRRLLRLLLLLLLLRRLLRLLLRRRLLRLLLLLLLLLLRLRRRLLLRRRLRLLRRRLRLLRRLRRLRLLRLRLLLRRRLLLRRLRRRLLRLLRRLRRRLRRLLRLRLRLLLRRRRLRLLRLLRLRRRLRLLRLLRRRLLLLLLLLRRLLLRLRLLLRLLLLRLLLRRRRRRLLLRLRLLLLLRRRRLRLRLRRRRLLLLLLLLLRLLRRRLRLLRLLLLLRLRRRRLRLLLLLLLLRRRLRLLLLRRRRRLLRLRLRRRLRLLRLLRLLLLRLLRLLLLLRLRRLRLLLLRRLLLLRLRRLLRRLLRLLLLRRLRRRRRLLLLLRRLRLLLLRLLLRLLLLLRLLRRRRRRRLLLRRLRRRLLLRLLRRLRLLLRRLLRLLLRRRLLLLLLLLRLLRLLLLLLRLRLLLRLLRLLRLRRLRLRRLLRRRRRRLRRRLRLLLRLLRLLRLRRRRRLLLRRRRRRLLLLLLRRLLLLRRRRLLRLRLRRLLRLLLRLLRLRLRRLLLLLLRLLLLLRRLLLRLRLRRLLLLLRRLRLLRLLRLRLLLLLLLRRLLRRRRRRLLRLLRRRLLLRRRRLRLRRLLLLRRRRLLLRLRLLLRRLLLLLLLRLLRRRRLLLLRRRLLRRLRLLLRLLRRRLRLRRRRRRLRLRLLLRLLRRLRLLLRRRRRLRRLRRRRLRLLRLLLRLLLRLLLLRLRRLLLRLLLLLRRRLRRRLLLLRRLLLLRRLLRRLLLLLLLLRRLLRRLLRRLLLRLLLRLRLRRRRLRLLLLRLLLLLRRRLLRRLLLLLLLLLLRLRLLLLLLRRRLRLRRRRLLRRLRLRLRRLRLRRRRLRRLLRLLLLLRRRRRLLRRLRRLLLRRRRLLRLLLLRRRRLRRRLLLRRLLRRLRLLLLLLLRLRLLLLRRLLLLLLRRLRRRLLLLRLLLLLLLRRRLLLLLRRRRLLRLRRRLRRRRRRLRLRLRRRLLLRLLRLLLRLRRRRLLLRLRRRLRLRLLRRLRLLRRLLRLLRRLLRLLRLRRRRRLRLRLRRLLRLRRLLRRLLLRRLLLRRRLLRRRRLLLRRLRLLRLLRRRRLRLLLRRRLRRRLLLRRRLLRRLLRRLRLRRLLLRRRRRRRLRRRLLRRLLRRRLLRLRLRRRLRRLRLRRLLRRLLRLRLRRLLLRRRRLLRRRLRRRRRRLRRLRRLRRLRLLRLRLRLRRRLRLLLLRLRRRRRLRLRLRRRLRRLLRRLLRLLRRRLRRLLRRRRRRRLRRRRLRRLRLRRRLRLLRLRRRRRRRLRLRLRRLRRRRRLLLLLRLRRRRRLRLLLLRLRLRLLLLRLLRRLLLLLRRLLLRLLLRLRRRRRLRLRRRRRLRLLRRRRRLRLRRLLRRRRLRRLLRRRRLRRLLRRLLRRLLLLLLLLLRLLRLLLRRRRRLLRLRRRRRLRLLRLLLRLRLRLRRLRRRRRLLLLLLRLLLLRRLRRRLRLRLLLRLRLRRLLRLLLRRRLRLRRRLLLLLLLRRRRRLLRLLRLRLLRLRRLRRRLRLRRRLRRLRLLLLRLLLRRRRLRLLLRRRRLLRRLRLLLRRLRRLLLRRRLLRRRRLRLLRLRRRLLLRRLLRLRLLLRRLRRLRRLRRLRLRLLRLLLRRRRLRRLRRLRRLRLRRRRLLRRRRRRRLLRLRRLLRRLRRLRLRRRLRRRLRLRLRLRLRLRLRRRRLRRRLLRRLRRRRLRRRLLLLRLRRLLLRRRRLRLLRRLRLRLRLLLRRLRRLLRRRRRRRLRRRRLRLLLRRLLLRRLLLRLRRLLLRRRRLLLRLRLLRRRLRRLLLLRRLLRRRRLLLRRLRRRLRRLLLLRRLRRLLLLRRRLRLLLRRRLLLRRRLRRRLRLLLLRLLRRRRLLRRRLRRRRLLLRLRRLLRRRRRLLRRLRRLLLLLRRLLRRLLRLLRRRRRRLRRRRLLRLLRLRLLLRRRRLRRLRRLRRRRLLLLLLRRLLLRRRRRLRRRRLRLRRRRLLLRRRLRRRRLLRLLLRRRLRRRLRRLLRLRRLRLLRRRRRRLRLLLLRRLLRRRLLLLRLRLRLRRLRRLRRLLRRLLLLLLLLRRLRRRRRLRRRRRRLLRRRLRRLRLLRRRRLRRLLLRRRRRLLLRRRLLLLRRRRLRLRLRLRRLRRRLLRRLRRLLLLRLRLRLRRRLLRRRLRRLRLRRRLRLRLLLLLRLRRLLLRRRRRRRRLRRRLRLLRRRRRLLLRRRRRRRRRLLRRLLRRRRRLLLRRLLRRRRRRLLLLLRRRRRLLLRLRLRRRRLRLLRLLLRLRRRLRRLRLRRRRLRRRLRRRRRRLLRRRRLLRRLRLLLRRRLRLRRRLLRRRRRRRRRRLRRRLRRRRRRLRLRRRLRLRLRLRLLRLRLLRRRRLRRLLRRLLLLRLLRRRLRRLRLLLLLLLRRLLRLRLRRLLLLRRLLRLLRLLRRRRRLLLLLLLRLLLRRLLRRLRRLRLLRLRRRLLLRRRRLRLRLLRRRRRLLRLRLRRLLLRRRRLRLRRRLRLRRLRLRRLLRLRLRRLLRRRRLRRLLRLRLLLRLRRLRRLRRRRRRRRRRLRLLRLLRRRLLRRRLLRLLLLRRRLLRLLRRRRLLLRLLRRRRRRRRRRRRRLRRRRRRRRLLRRRLLRLLRRLRRRLLRLLLLLRLLRRLRLRRRRLRLLLRRLRLLRLRLRLRLRLRLLLRRRRRRRRLRRLRRRRRRLLLLRRLRLRRRLLRLLRRRLRRRRRLLRRRLRLRRRLRLRLLRRRRRRLLLRLRRRRLLRRLRLRLLLRRLLRRLRRRLRRLLRLLLLRRRLRRLRRLRLRRLRRRRRRRRLLRRRRLRRRLLLRRRRRLLRLRRLLRLRRRLRRRRRRRLRRLLLLRLRLRLLRRLLRLLRLLRRRRRRLRRLRRRRLRLRLLRLRRLRRRRLLLLRRRRRRLLRRRLLRRRLRLLRRRRRLLLRLLLRRRLLRRLLRLRRLLRRRRRLRLLLLLRRRRRLLLLLRLLRRLRRLRRLLRRLRRRRLLRRRRLLRRLRLRRRLRRLLRRRRLRRRRLRRRLRLLLLRLRRRRRRLRLRRRLLLRLRRLRLRRRRRRLRRLLRRLRRLRRLRRLLLRRRLLRLRLRRRRLLLLLRRRLRRLLRLLLRRRRRLRRRRLLRLRLRLLRLLRRLLRLRRRRLLLRRRLLLRRRLLRRLLRLLRLLLLRRRRRLRLLRLRRLLRLLLRLRRRLRLLLRLLRLRLLRRRRLRRRRRRLRRRLLLRRRRRRRRRLRLLRLRRLLLRRRLRRRLLLRRRRLRLRRRRRLRRLRLRRRRLRRLRLLLRRRRRLLLRRRRRLRRLRLRRRRRLLRRRRLRRRRLLRRLRRRRLLRLLRRLRLRLRRRLRRRRLLRLRLRRLRLLLRRLRLLRRRRLRRRLRLRLLLRRRRLRRRLLRRRLRRRLLRRRRLRRRRLRLLRRLLRLRRLRLRRLRLRRRRRRLRRRRLRLRRLRLLLLLLLLRLLRRRLRLRLLRRLRLRLLLLLRLLRRRLRLRRRLRLLRRRRLRRRRLLRLLLRRLLLRLRRLRLLLRRLRLLLLLRRLLLRLRLRLRLRLRRLRRRLRLRRRLLLRLLRLLLRLRLLLRLLLLLRRLRLRRRRLLRLRRLRRLRLRLRLRLRRRRLRRLLLRLRLLRRLRRRRRRLRLLLLRLLLLRLRRLLRRLRLLRRRLRRLRLRLLRRRLRLRRRLLLRRRLLRRRLLLLLRLRLLRLRLLLLLLLLLLRRLLLLRRRRLRRRLLLLRLRRLLLRRLLLLLRRRLLRLRLLRLLRRLRRLLLLRRLRRLLLLLLLLRRRRLLLRRRRRRLRRLRRLLRRRRLLRRRLLRRLRLRLLLLLLRLRLLLRRRRRRRLRRLLLLLRRRLLRLRRLLLLLRRLLRRRRRRRLRRRRLLRLRRRRRRLRLLRLLRRLLLLRRRRRRRRLRRRLRRRRRLRLLLRLLLRRLLLRRLRLLRRRLLRLLLLRLRRLLRLRLRRLRLRRLRLLRLRRLLRRLLRRRLRLLRRLLRRRLLRLRLRRLLRLLLLLLRLLRLLLRLLLRRLRLLLRRLLRLLRLLLRRRLRLLRLLLLRLRRRLLRRLRRLLLLRRLRLRRRRRRLRLRLLRLRRLRLLRLRLLLLRRLRLLLRRRRLLRLLLRRLLLRRRRLRLRRRRLLRLRRLRLRRRRLLRRRRRLLRLLRLRRLLLRRLRLLRLRRLRLLLLRRLLRLRRLLRRRLLLLRRRLLLRRLRLRRRRLLLRLLLRLRLLRRLLLRLLRLRRLLRRRRRRLLRLLLRLLLLLLRLLRRLLRLRLRLLRLLRRRLLRRRLRLLRRLRLRRRLLRRRRLLLLLLRLLRLRLRLLLRLRLRRRRRRLRRRRRLLLLLRRRLLRRLRLRRRLRLLLRLRLRRLLLLLRLRLRRLLRLRLLRRLRRLRLRRRLRRRLLLRLLLLLRRLLLLRRRRRRLLLLRLRRRLRLLRLRLRLLRLLLRRRRLRLRLLRLRLRLRLLLLLRLLLRLRRLRRRLRRRLLRLRLLRLRLRLRLLLLRLLRLLLLRLLRRRRRLLRLLLRRRLRLLLLRLLLRRRRLLLRRLRLRLLRRRRRRLLLLLLRLLLLRRRLLRLLLRRRRLLRRRLRLLLLRRLRLRLRLLRRLLRLRRLLLRLLLRRLLLRRLLLLLLLRLRRLLLLLLLLRRLLRRRRLLRLRRLLLRRRRLRRLRRLLRLRLRLRLLLLLRLRLRRLRLRLRRRRRLLLRLRRLRLRRLRLLRLRRRRRLRRRRRLRLRRLRLLLLRLRRRRLRRLLRLRLLLLRRRRRLRRRLLRRLRRLLLRLRLLRRLRRLLLLLLLLLRRRLLLRLLLRRRLLRRLLLRLLLRRRRRLLLLLRLRLRRRRRLRLRLLLLLLRLLRRLLRLRLRLLLRRRLLLRLLRLLLRLRRLLLLRRLLLRRLLLLLRRLLLLRLRRRRRRLRRLLLRRLLLRRRLRLRLLRRLLRRLLRRRRRLRRRLRRRRRLRLLLRRRRLRLLLRRRLRRRRRLRLRLRRRRRRRLLRR, improve=0.6252145, (0 missing)
## CryoSleep splits as LRL, improve=0.2117218, (0 missing)
## RoomService < 0.5 to the right, improve=0.1204234, (0 missing)
## Spa < 0.5 to the right, improve=0.1183706, (0 missing)
## VRDeck < 0.5 to the right, improve=0.1103404, (0 missing)
## Surrogate splits:
## CryoSleep splits as LRR, agree=0.650, adj=0.196, (0 split)
## RoomService < 0.5 to the right, agree=0.649, adj=0.192, (0 split)
## Spa < 0.5 to the right, agree=0.634, adj=0.158, (0 split)
## VRDeck < 0.5 to the right, agree=0.628, adj=0.146, (0 split)
## ShoppingMall < 0.5 to the right, agree=0.624, adj=0.134, (0 split)
##
## Node number 2: 3780 observations, complexity param=0.0245528
## mean=0.05291005, MSE=0.05011058
## left son=4 (3173 obs) right son=5 (607 obs)
## Primary splits:
## ailenum splits as L-L------L-LLL--RL-LLLL--LLLL-L--LLL--LLL-L-L-LLLL---LL---L----L---L-LLR----L----LL-LL---L---L-L-L-LLL----LL---LLL-L--L-LLR--LL-L----L-L--LLLL-RL-LL-LLLLL-L-LLL--LLL-LL---LLL--L-L--L----L-L------LL-LLL-LL-L--LLLLL--L-LL---LLL-L--L--L-LL-L--L-LLL-L----LL-LLLL-LL--LL--LLLLLL-LL--------L----L-LLLLL-------LR-L--LL-LL--L-L-LL-LLLL----LLR-------LL--L-L---LL-LLL---LLLL---L----L-LL-L------LL-LL--L----LLLLLLL--L---LL-LL--------L--LL-LL--L---L-----L-L-LL-L-LL-LLLLLL-L-L-LL--R-----L-----L-L--LLLL---LLLLL-R-LL---L-LL-L--RL-L-LLL--L-LLR-LL-L-L-L---L---LLL-----L------LLLLLLL---L--LL-L-LL-LLLL-LLLL--L-L---LLL-L---LLLLL--L--L-----L---LLL-L--LLL--L--LLL--LL-LL---R-L-LLL-LL-L-LL--L--L-L-LL---LRLL--LLL-L--L--LLL---LLL---LLL---LL-LLLLLL-LL-L---L-L-LRLL----L--L-L-L-L------RL--RLL--------L-LLL----L-L-LRLL-LL--L-LLLL-RL----LLLL----LL----L----LL-LL-LLL-LLL-LLLLL--LLL-L--LLL-L-L-L---L--LR--L--R-LL--LLL-LLLL--RLL--L--L--LLLLL--LL-L--L-L--RL-L-L-L-LLL-LLLLL-LLLLL-----LL-LRLLLL----L--R-L-LL-L-LLL-L-LL--LL-LLL-LL-RLL-L-----L---LLL--R-L-L-L-L-LLLLLLLL---LLL-L-L-L----L-----LL-L-L--LL-L-----L-RL--LLL-L-LL-LL--L-LL-LLRL--LRLLLLLLLL-RLRLL-LLL----LLR-LLLLL--LLL-L-L---L-L--LLL--RL--LLLLL---L-L---L--LL--LLLLL--LL-LL--LLLL--L-L-L--LL--LL--LL-LLLLL----L-L--LRL--L-LLLLL--LLL-LLL--LL-LLLLLLLL--LL-LLL---LL-LLLLLLLLLL-L---RLL---L-LL---L-LL--L--L-LL-L-LLL---LLL--L---LL-LL--L---L--LL-R-L-LLL----L-LL-LL-L---L-LR-LL---LLLLLLLL--LLL-L-LLL-LLLL-LLL------LLL-L-LLLLL----L-L-L----LLLLLLLLL-LL---L-LL-LLLLL-L----L-LLLLLLRL---L-LLLL-----LL-L-L---L-LL-LL-LLLL-LL-LLLRL-L--L-LLLL--LLLL-L--LL--LL-LRLL--L-----LLLLL--L-LLRL-LLL-LLLLL-LL-------LLL--L---LLL-LL--L-LLL--LL-LLL---LLLLLLLL-LL-LLLLLL-L-LLL-LL-LR-L--L-L--LL------L---L-LLL-LL-LR-L-----LRL------LLLLLL--RLLL----LL-R-L--LL-LLL-LL-L-L--LLLLLL-LLLLL--LLL-L-L--LLLLL--L-LL-LL-L-LLLLLLL--LL------LL-RL---LLL----L-L--LLLL----RLL-L-LRL--LRLLLLL-LL----LLLR---LL--L-LLR-LL---L-L------L-L-LLL-LL--L-LLL-----L--L----L-LL-LLL-LLL-LRLL-L--LLL-LLLLL---L---LLLL--LLLR--LL--LLLLLLLL--LL--LL--LLL-LLL-L-L----L-LLLL-LLLLL---LL--LLLLLLLLLL-L-LLLLLL---L-L----LL--L-L-L--L-L----L--LL-LLLLL-----LL--L--LLL----LL-LRLL----L---LLL--LL--L-RLLLLLL-L-LLLL--LRLLLL--L---LRRL-LLLLLLL---LLLLL----LR-L---L------L-L-L---LLL-LL-LLL-L----LLL-L---R-L-LL--L-LL--RL-LL--LL-LR-L-----L-L-L--RL-L--LL--LLL--LLL---LL----LLL--L-LL-LL----L-LLL---L---LLL---LL--LL--L-L--LLL-------L---LL--LL---LL-L-L---L--L-L--LL--LL-L-L--LLL----LL---L------L--L--L--L-LL-L-L-L---L-LLLL-L-----L-L-L---L--LL--LL-LL---L--LR-------L----L--L-L---L-LL-L-------L-L-L--L-----LLLLL-L-----L-LLLL-L-L-LLLL-LL--LLLLL--LLL-LLL-L-----R-L-----L-LL-----R-L--RL----L--LL----L--LL--LL--LLLLLLLLL-LL-LRL-----LL-L-----L-LL-LLL-R-L-L--L-----LLLLRL-LLLL--R---L-L-LLL-L-L--LL-LLL---L-L---LLLLLLL-----LL-LL-L-LL-L--L---L-L---L--L-LLLL-LLL----L-LLL----LL--L-LLL--L--LLL---LL----L-LL-L---LLL--RL-L-LLL--L--L--L--L-L-LR-RLL----L--L--L--L-L----LL-------LL-L--LL--L--L-L---L---L-L-L-L-L-L-R----L---LL--L----L---LLLL-L--LLL----L-LL--L-L-L-LLL--L--LL-------L----L-LLL--LLL--LLL-L--LLL----LRL-L-LL---L--LLLL--LL----LLL--L---L--LLLL--L--LLLL---L-LLL---LLL---R---L-LLLL-LL----LL---L----RLL-L--LL-----LL--L--LLLLR--LL--LL-LL------L----LL-LL-L-LLL----L--L--L----LLLLLL--LLL-----L----L-R----LLL---L----LL-LLL---L---L--LL-L--L-RL------L-LLLL--LL---LLLL-L-L-L--L--L--LL--LLLLLLLL--L-----L------LL---L--R-LL----L--LLL-----LLL---LLLL----L-L-L-L--L---LL--L--LLLL-L-L-L---LL---L--L-L---L-L-LLLLL-L--RLL--------L---L-LL-----LRL---------LL--LL-----LLL--LL------LLLRL-----LLL-L-R----L-LL-LLL-L---L--L-L----L---L------LL----LL--L-LLL---L-L---LL----------L---L------L-L---L-L-L-L-LL-L-LL----L--LL--LLLL-LL---L--L-LLLLLLL--RL-L-L--LLRL--LL-LR-LL-----LLLLLLL-RRL--LL--L--L-LL-L---LLL----L-L-LL-----LL-L-L--RLL----L-L---L-L--R-L--LR-L-L--LL----L--LL-L-LLL-L--L--L----------R-LL-LL---RL---LL-LLLL---LL-LL----LLL-LL-------------L--------LL---LL-LL--L---LL-LLLLL-LL--L-L----L-LLL--L-LL-L-L-L-L-L-LLL--------L--L------LLLL--L-L---LL-LL---L-----LL---L-L---L-L-LL------LLL-L----LL--L-L-LRR--LL--L---L--LL-LLLL---L--L--L-L--L--------LL----L---LLL-----LL-L--LL-L---L-------L--LLLL-L-L-RL--LL-RL-LL------L--L----L-L-LL-L--L----LLLL------LL---LL---L-LL-----LLL-LLL---LL--RR-L--LL-----L-RLLLR-----LLLLL-LL--L--L--LL--L----LL----LL--L-L---L--LL----L----L---L-LLLL-L------L-R---LLL-L--L-L------L--RL--L--L--L--RLL---LL-L-R----LLLLL---L--RL-LRL-----L----LL-L-L-LL-LL--LL-L----LLL---LLL---LL--LL-LR-LLLL-----L-LL-L--LL-LLL-L---L-LLL-LL-L-LL----L------L---LLL---------L-LL-L--LLL---L---LLL----L-L-----L--L-L----R--L-LLL-----LLR-----L--R-L-----LL----L----LL--L----LR-LL--L-L-L---L----LL-L-L--L-LLL--L-RL----L---L-L-LLL----L---LL---L---LL----L----L-LR--LL-L--L-L--L-L------L----L-L--L-LLLLLLLL-LL---L-L-RL--L-R-LLLLL-LL---L-L---L-LL----L----LL-LLL--LLL-L--L-LLL--L-LLRLL--LLL-L-L-L-L-L--L---R-L---LLL-LL-LLL-L-RLL-LLRLL--L-L----LL-L--L--L-L-L-L-R----L--LLL-L-LL--L------L-LLLL-LLLL-L--LL--L-LL---L--L-L-LL---L-L---LLL---LL---LLLLL-L-LL-L-LLLLLLLLLL--LLLL----L---LLLL-L--LLL--LLLLL---LL-L-LL-LL--L--LLLL--L--LLLLLLLL----LLL------L--L--LL----LL---LL--L-L-LLLLLL-L-LLL-------L--LLLLL---LL-L--LLLLL--LL-------L----LL-L------L-LL-LL--LLLL--------L---L-----L-LLL-LLL--LLL--L-LL---LL-LLLL-L--LL-L-L--L-L--L-LL-L--LL--LL---L-LL--LL---LL-L-L--LL-LLRLLL-LL-LLL-LLL--L-LLL--LL-LL-LLL---L-LL-LRLL-L---LL--R--LLLL--L-L------L-R-RL-R--L-RL-L-LLLL--R-LLL----LL-LLL--LLL----L-L----LL-L--L-L----RL-----LL-LL-L--LLL--L-LL-L--L-LLLL--LL-L--LL---LLLL---LLL--L-L----LLL-LLL-L-LR--RLL-RL-L--LL------LL-LLL-LLLLLL-RL--LL-L-L-LL-LL---LL---L-LL--L-L---LL----LLLLLL-LL-L-L-LLL-L-L------L-----LLLLL---LL--L-L---L-LLL-L-L--LLLLL-L-L--LL-L-LL--L--L-R---L---LLL-LLRLL--LLLL------LLLL-L---L-LL-L-L-LL-LLL----L-L-LL-L-L-L-LLLLL-LLL-L--L---L---LR-L-LL-L-L-L-LLLL-LL-LLLL-LL-----LL-LLL---L-LLLL-LLL----LLL--L-L-LL------LLLLLL-LLLL---LL-LLL----LR---L-LLRL--L-L-L-LL--LL-R--LLL-LLL--LLR--LLLRLLL-L--LLLLLLLL--LL----RL-L--LLL----L--L--LL-L-L-L-LLLLL-L-L--L-L-L-----LLL-L--L-L--L-LL-L-----L-----L-L--L-LRLL-L----L--LL-L-LLLL-----L---LR--L--LLL-R-LL--L--LLLLLLLLL---LLL-LLL---LL--LLR-LLL-----LLLLL-L-L-----L-L-LLLLLL-LR--LL-L-L-LRL---LLL-LL-LLL-L--LLLL--LLL--LLLLL--LLLL-L------L--LLL--LLL---L-L-LL--LL--LL-----L---L-----L-LLL----L-LLL---L-----L-L-L-------LL--, improve=0.28168690, (0 missing)
## ailesira splits as LLRRRRRR, improve=0.11212740, (0 missing)
## Age < 12.5 to the right, improve=0.11123430, (0 missing)
## CryoSleep splits as LRL, improve=0.07443996, (0 missing)
## RoomService < 0.5 to the right, improve=0.03282292, (0 missing)
## Surrogate splits:
## ailesira splits as LLRRRRRR, agree=0.903, adj=0.397, (0 split)
## Age < 12.5 to the right, agree=0.869, adj=0.183, (0 split)
##
## Node number 3: 4913 observations, complexity param=0.08751388
## mean=0.8503969, MSE=0.127222
## left son=6 (1676 obs) right son=7 (3237 obs)
## Primary splits:
## ailenum splits as -R-RRRRRR-R---RL--R----RR----R-LL---RR---R-L-R----RRR--LRR-RRLL-LLR-L---LRRR-RRLR--R--RLR-LRL-R-R-R---RLRL--RRR---L-RR-R---LR--R-RRRR-R-RL----R--L--R-----R-R---RL---R--RRL---RR-R-RR-RRRR-L-RRRRRR--R---R--R-RR-----RL-R--RRR---R-RR-RR-R--R-LR-R---R-LRRR--R----R--RR--RR------R--LRLRRRRR-LRRL-R-----RRLRRRR--R-RR--L--RL-R-L--R----RRLR---RRRRRRR--RR-R-RRL--L---RRL----RRR-RRLR-L--L-RRLRRL--R--LR-RRLR-------RL-LRL--R--RRRLLRRR-RR--L--RR-RRR-RLRRR-L-R--R-L--R------R-R-L--RR-LRRLR-RRRRR-L-LR----RRR-----R-R--LRL-R--L-LR--L-R---RR-R---R--R-R-R-RRL-LLR---RRLRR-RRLRRR-------RRR-RR--R-R--R----R----LL-R-LRR---R-RLR-----LR-LL-RLRRL-LRR---R-RR---RR-RR---RR--R--RLR-R-L---L--R-R--LR-LR-R-R--RRR----LR---R-RR-RR---RRR---RRR---RRR--R------R--L-LRR-R-R----LLRR-RR-R-R-L-RRRRRR--RL---RRLLLRRL-R---RRRR-R-R----R--RR-R----L--RRRR----RRRR--LRRR-RRRR--R--R---R---R-----RR---R-RL---R-L-R-RLR-LR--RL-RR-L--LR---R----RL---LR-RR-LR-----RL--R-RL-R-RR--R-R-R-R---L-----R-----RRLRL--R------RRRR-LL-L-R--R-R---R-R--RR--L---L--R---L-RRRRR-RRR---RR-R-R-R-R-R--------RLR---R-R-R-RRLR-RRRRR--L-R-RR--L-RLRRL-R--RR---R-R--R--RL-L--R----RR----------R-----R---RRLL---R-----LR---R-L-RRR-R-LR---RR--RR-----LRL-R-RRR-RR--RR-----RR--L--RR----LR-R-R-RR--RR--RR--L-----RRLR-R-LR---RR-R-----RR---R---LR--R--------LL--R---RRR--R----------L-LRR---RRR-R--RRR-L--RR-LR-R--R-R---RLR---RL-RLR--R--RR-RRR-RR--L-R-R---RLRL-L--R--L-RRL-R--R--RRR--------RR---R-L---R----L---RRRRRR---R-R-----RRRR-R-L-RRRR---------R--RLR-R--R-----R-LRRR-R--------RRR-R----RRRRR--R-R-RRR-R--R--R----R--R-----R-LL-L----RR----R-RR--LL--R----LL-RLRRR-----RR-R----R---R-----R--LRLRRRR---RR-RRR---R--RR-R---RL--R---RRR--------R--R------R-R---R--L--R-RL-L-RR--RRRRRR-RLL-R---L--L--R-RRRRR---LRLRRR------RL----RLLL--R-R-RR--R---L--L-R-RR------R-----RR---R-L-RR-----RR-R--R--R-R-------RR--RRRLRR--R--RRL---RLLR-L-RR----RRRR---R-R---RR-------R--LRRR----RRL--LL-R---R--RRR-R-RRLRRR-L-R---R--RR-R---RRRRR-LR-RRRR-R--R---R---L----R-RL---R-----RRR-RLR----RR----RR--RR--------RR--RR--RR---R---R-R-LRLR-R----R-----RRL--LR----------L-R------LRR-R-RLRR--RR-R-R-RL-R-RRLR-RR--R-----LRRRR--RR-RR---RRRR--R----RRRR-RRR---RR--LR-R-------R-R----RR------RR-RRR----R-------RRR-----RRLR--R-RLR-RLRRRL-R-R-LRR---R--R---R-RRRR---R-RLR-R-R--RR-L--RL--R--RR--L--R-RRLRR-R-R-RR--R-RL--RR---RR---RRR--RLLL---RR-R--R--RRRR-R---RRL-LLL---LLR--LR--RL-L-RR---LRRLRRR-RRL--LR--RRR--R-L-RRL-RR-R-RR--RR--R-R-RR---LRRR--RRR-RRLRRR-LR-RL-RR-R--R-R-L-RRR-R----R-RRRRR-R-R-LLR-RR--RL--L--LLR-LR--RLRRRRL-RLRL-RL-R-LRR-R--R-RRLRRRR-R-R-RR-RRRRR-----R-RRRRR-R----R-L-R----R--RR-----RR---R---R-RRRRR-R-RLRRR-L--LRRRR-R-RR--RRLR-RL--RRLR-LL--RR--RR---------R--R---RLRRL--R-RRRRR-R--R---R-R-R-LL-RLRRR------R----RR-RRR-R-R---R-L-RR--R---LRR-L-RRR-------RRRRR--R--R-R--R-RR-RRR-R-RRL-RR-R----R---RRRR-R---RRRR--RR-L---LL-RR---RRR--RRLR-L--R-RRR---RR--R-R---RR-RR-RR-RR-R-R--R---RRRL-RR-RR-RR-R-RRRR--RRRLLRL--R-RR--LR-RR-R-RRR-RRR-R-R-L-R-R-R-RRRR-RRR--RL-RRRR-RLR----R-LR---RRRR-R--RR-R-R-R---RR-RR--LRRRLRR-RRRR-R---RL---RL---L-LR---RRRR---R-L--RRR-RL----RR--RRRR---RR-RRR-RR----RR-RR----LRR-R---RRR---RRR-RRR-L----R--RRRR--RRR-RRRR---R-RR--RRRRR--RR-RR-----LR--RR--R--RLRRRL-LRLR--L--L-R---RRRL-RL-RR-RRRR------RR---RRRRR-RLRR-L-RRRR---RRL-RRRR--R---RRR-RRR-RR--R-RR-R--RLRRRR-R----RR--RRR----R-R-R-RR-RR-RR--RR--------LR-RRRRR-RRRRRL--RRR-RR-R--RRRR-RR---RLLRL---LRR----RRRR-R-R-L-RR-RRL--RR-RR----R-R-L-RLR--RRL-LR-R-LRR-R-R-----R-RL---RRRRRRRR-RRR-R--RLLRR---RRRLRRRLR--RR--RLRRR---RL--RRRRRR-----RRRLR---R-L-LLRR-R--R---R-RRR-RR-R-RRRR-RRR-RRRRRR--RRRR--RR-R---RRR-R-RRR--RRRRRRLLRR-RRR-RLRRRR-R-RRR-R-L-R-R--R-R--RRRR-RR--RR----R--RLR-RR-R-------RR--L-R-RL----RR--R--R--RRRRR-------R---RR--RR-RR-R--R-RLL---RRRR-R-R--RRLLR--R-R-RL---LLRR-R-RRR-R-RR-R-RR--R-L-RR--LRRR-RL--R-R---R-RR-RR-LLRRRRRRRR-R--R--RRR--RRL--R----LLR--R--RRRL---R--RRRLRRRRRRRRR-RRRRRRLL--RRR--R--LR-RRR--R-----R--RR-R-RRRR-R---RR-R--R-R-R-R-R-R---LRLRRLRR-RR-RRRRRR----RR-R-RRR--R--RRR-RRLRL--RRR-R-RRR-L-L--RRRRRR---R-RRRR--RR-L-R---RL--RR-RRR-RL--R----LLR-RL-LR-R-RR-LRLLLRRR--RRRR-RRR---RLRRR--R-RR--R-RRL-RRLLLLR-LR----R-R-R--RR--R--R--RRRRRR-RR-RLRR-L-R--R-RR-LRRR----RLRRRR--RRR--RRR-R--RRRLR---R---RRR--RR--R-RR--RRRRR-R-----RRRLR-----L--RR-RR-RR--RR-RRRR--RRLL--RR-R-RRR-RR--RRRR-RRRR-LRL-R----R-RLRLLL-R-RRR---L-RR-R-RRRRRR-RR--RL-RR-LR-RR---RRL--R-L-RLRR-----RRR-RL--R---RRRRR-LLLR--L-R-R--R--RR--L-RRRR---RLR---LRR--RR--R--L----RRLLR-R--R-RR--R---R-RRL-L---R--R-L--RRRL-RLRRRR-RRR---LRRRRRRLR-L--R-RR---RRR-RRR---RRRR-L-RLRLR-LL-L-RRRR-RR-R---RRRRR---RRRLR-RR-R-RRRLR--RRLR-LLRL--RL-RLRL--R--RR-L-L-RRR-RRRR--R-R-RL-R---RL-L--RRRR-RRR-R-R---LRRL-RLL--RRR-LRR--RRRR-LRLR-R--LR--R-LR-R-RR-R-RRRRLR-RRRR-R-RR-R--------R--RRR-R-R--RL-L-L-----R--RRL-L-RRR-R--RRLR-RRLR--R---RR---R-RR-R---RR-R-----RL---R-R-L-R-R-RR-RRL-R-LRR---L--R---R-L---R-----RR-R-RLRR--R-RR-RR-L-R-R-R-RLRR-RR---R-R--RL-RRRRRL-R----R----R-RR--LR-R--LRR-RR-R-R--RRR-R-RRL---RRR--RRR-----R-R--R-R----------RR----RRLL-RRR----R-RR---RR-----LRR--R-R--R--RR-LR----RR-RR--------RRRR---RRRRRR-RR-RR--RLRR--RLR--RR-L-L------L-L---RRLRRRR-RR-----RRR--R-RL-----RL--RRRLLRR-RRRR--L-RRLRRR-R--R--RL----RRRRRLRL-RLR-RRRRR-R---L---RR---RR-R--RRR--R----R-RR--R-R-RR-R-RR-R--R-LR--LR--RRR-R--RR--RRR--R-R-RR--L------R--L---R---RR-R---RL--L--R---RRR-L--R----R-RRR--RR-LR----LR-R-RRLLRR-R-R--R-RR-R--R-R----RR-L---RLRR--L---RR---RRLR-R-LRRR--R-RR-R-RRRR--LRLRL--R--R-RR---RR-R--R-RR-L----LR--L-LR--RRL----RRL---RR-R-LRRL---R---R-L--RR---R--R-RL--RRRRLL--L---L------R--RR--R-L-R--R--RRL--RRR-R--RR-R-RRL--RRRL------R--R-R-R---L-R-RLLRRR-RRRRR-----RRR--RR-L-LRR-L---L-R-LR-----R-R-RL--L-R--RR-RR-R-RRR-RRR---R-----RR----RRRRRR----R-RLR-R--R-L-R--R---RLLL-R-R--R-L-R-R-----R---R-RR-RRR-RRR--R-R--R-R-R-R----L--L----R--RLRLR--R---RLR-R----R---RRRL---LL-R-R--RRRLRL------R----RLL--L---RLRR--RLR-R----RR-R-R-L--RR--R-RR---L---RR---RR-------R-RL--------RR--RRRR--L-RR---RLLR-LR-RL--R-R-R-R-----R-R-RR-R-R-RRLRR---R-RR-R-RR-L--R-LRRRR-RRRRR-R-RR-R----R-RRRR-RR--R-R----RRRRR-RRR--RL-RL---R-L--RR-RR---------RLL---L---RRR--RR---R---RLRRR-----L-R-RRRRL-R-L------R--LL--L-R-L---LRR---R--L---R-RR----RR---RL-----RR----L-RRRLRR-LR---LR---RRR-L-R--RR--RR--RLLRR-RRL-RRRLL-R---LRLR-R---RRR-RRRRR-R-R-RRRRLRL--RL, improve=0.30426700, (0 missing)
## Spa < 1346.5 to the right, improve=0.13215820, (0 missing)
## VRDeck < 1058 to the right, improve=0.12338610, (0 missing)
## CryoSleep splits as LRL, improve=0.11239120, (0 missing)
## RoomService < 366.5 to the right, improve=0.08946097, (0 missing)
## Surrogate splits:
## ailesira splits as RLLLLLLL, agree=0.740, adj=0.239, (0 split)
## Age < 10.5 to the left, agree=0.683, adj=0.070, (0 split)
## Spa < 1024 to the right, agree=0.681, adj=0.065, (0 split)
## VRDeck < 991.5 to the right, agree=0.680, adj=0.062, (0 split)
## RoomService < 705.5 to the right, agree=0.674, adj=0.044, (0 split)
##
## Node number 4: 3173 observations
## mean=0.0009454775, MSE=0.0009445835
##
## Node number 5: 607 observations
## mean=0.324547, MSE=0.2192162
##
## Node number 6: 1676 observations, complexity param=0.04828533
## mean=0.576969, MSE=0.2440758
## left son=12 (1025 obs) right son=13 (651 obs)
## Primary splits:
## CryoSleep splits as LRL, improve=0.2565094, (0 missing)
## Spa < 0.5 to the right, improve=0.2056128, (0 missing)
## VRDeck < 1.5 to the right, improve=0.1922289, (0 missing)
## RoomService < 0.5 to the right, improve=0.1675086, (0 missing)
## FoodCourt < 0.5 to the right, improve=0.1407524, (0 missing)
## Surrogate splits:
## Spa < 0.5 to the right, agree=0.725, adj=0.292, (0 split)
## FoodCourt < 0.5 to the right, agree=0.718, adj=0.275, (0 split)
## VRDeck < 0.5 to the right, agree=0.711, adj=0.257, (0 split)
## ailenum splits as ---------------L---------------RL----------L-----------L-----LR-LL--R---L------L-------L--L-L----------L-L--------L--------L-------------L-------R---------------L--------L----------------L--------------------------L-----------------------L--------R----------------------------R-R------L--L---------L------------L---L---R---------L--------------------L--R-----L----------L--L--R---L--R-----L----R---------R-L-R--------RL--------L----------R----L------L-------------L-----L--L--------L-R------------------R-R----L-L---L-----------------------L-LL------L-----L---------------------------------RL---L--------L------L--RL--L--L-L----------------------------L----L---L-------L--L--------------L-----------------------------------------L-L----------LL----------L----------L-----LLL--L----------------------------L----------------L-----------------------------------R-----R----L--L----L----R--L----------L---L-----L-------L-----L-----------------L-------------R-L--------------LL-L-------------------L---L------L----------------------------------L------------L---------L-------L--L--L------------------R-L-------------------------------LL---------L------L-------L---------------L-L----------------------R--------L------------------R-------L----L----------------------L------------LR----------------------L-L----------------R-----L------------R-----L--R-----------------L--------L-L-L-----L---L-------------------------R--------L---------------------------L------------------L-------------L-----------------------------------------------------------LL-R----------------LL-------LR--L-----------------------------L-L---------------------------R------------------------------------L-----L-L-------------LL-----L--L------------L-L----------R-----LLL--------------L--L------------------------L----------------------------------L---------L----RL--L--------------------------------L---------L--LL----------------R----L---------------------L------------------L-------L--------------R----------------------------------------------L-L---------------L--L-----------L--------R------L------------L-----L------------L----------------------------------------L-----------------------------------------------------L------L---L---R-----L------------------------R----------L---R---------L------L--------------L------------------LLL-----------------------R-RLL---LL---L----L-L------R--L------L--L----------L---L-----------------------L-----------L----L---L-----------L----------------------LL-------L--L--LL--R----L----L--L-L--R---L----------L-------------------------------------L------------------------------------L----L--R-------------L---L----R--LL-------------------------L--L-----------------------RL--L-----------------------------L---------R---L---------------------------------------L-------------------------------L---LR-------------L--R--------------------------------------------L---------------------LR-L--------L-------------------L------------------L-------R-------L------------------------------L---L-------------L----L---L-L-------------L-------L-------------------------------------L---------------------L-----------------------------------------------L-----------L---L-L-L---R--L--------L--L--------------------------R---L----------L--------------------------------L-----------------------------------------------L-------------L-----------------------LL-L---L---------------R------L---------------L--L-----R-L----L--------------L--------------------LL--------L---L--------L-------L----------------R------L-LL--------------------------------------------------------------------LL--------L-------------L------------------------------L-----------------L----L----------------------------------------------LR---------------LL--------L---LL----------------------L-----L-----L----------------LL----------------------L-------LL---------R---------L----------------LL----------L--------------------------------------------------L-L--R-----------------------------------L-L------------L-L----------------------L------R----------L-------RL---L-L-------L-LLL-----------------L---------------L---RLLL--L---------------------------------L---L---------L--------L---------------------L--------------------------------------L------L-----------------------LL-------------------------L-L---------R-LLL---------L------------------L----L---------R----L--L------------L------------LLR---L-------------R---------R----L-----------L------RL-------------------L-L--------R-----L--L-----------L------L--L------------------------L--L-L--LL-L------------------------R----------L-----L--RL-L---L--L-R--------L-L----------------R------L-L-----------------L--L--LL------L---------L-L-----L-----L-------------L----------------------------------L-L-L----------L-L----------L----L-------------------------------L-------R----------R---L-----L--------L---------------L------------L--------L--------------L------L-----------------L-----L-------------------R------------------------------------------LR----------------------L---------------L----------------------------------------L-----L------R-L------L-L-----L--------------------L------L-----LL---------L---L-----------L---------L-L--R------------L-----------------------------------------------L---L---------------------------L---------L---------------L--L----------L-----------------L-----L------RL--------------------------L----L----L----------L----R------------------L-R-L-----------------------R----L---L-R-----L------L--------L--L---------R-------------L------LL--R---L---------------L---------L----------------L-----L-----------------L----LL----------------------L-L---L---L---L-----------R--L-----------------------------------------------L-------L---------LLL--------L-------------------------------------------R--L--------L-L--------R--------------L---LR---------L-L------------LL--L----L-----L--------------L-------------L--------------------L------------------L-------LL--L---L---------------------------L---------------L----R---------------------------------------------------L--L-----L-----------------RL---L------------------L--------L-------L---L---------LR--L---L---L--------L-----------------L-----------L----L---R----L--------R-------------LL-----L----LL-----R-L------------------------L-L---L, agree=0.700, adj=0.227, (0 split)
## RoomService < 0.5 to the right, agree=0.665, adj=0.137, (0 split)
##
## Node number 7: 3237 observations
## mean=0.9919679, MSE=0.007967613
##
## Node number 12: 1025 observations, complexity param=0.02910718
## mean=0.377561, MSE=0.2350087
## left son=24 (317 obs) right son=25 (708 obs)
## Primary splits:
## ailenum splits as ---------------R----------------L----------R-----------R-----LL-RR--R---R------L-------L--L-L----------R-L--------R--------R-------------R-------L---------------R--------L----------------L--------------------------R-----------------------L--------L----------------------------L-L------R--R---------L------------R---R---L---------L--------------------L--------L----------L--R--L---L--L-----R----L-----------R-L--------RR--------R----------L----R------R-------------L-----L--L--------R-R------------------L-L----R-L---R-----------------------R-RR------R-----R----------------------------------R---R--------R------L--LR--L--R-R----------------------------L----R---R-------R--R--------------R-----------------------------------------R-L----------LR----------R----------L-----LLR--L----------------------------L----------------L-----------------------------------L-----L----R--L----L----L--R----------L---R-----L-------R-----R-----------------R-------------L-L--------------LL-R-------------------R---R------R----------------------------------L------------R---------R-------R--R--L------------------R-R-------------------------------LR---------R------L-------L---------------R-L----------------------R--------L------------------L-------L----L----------------------R------------LR----------------------R-R----------------L-----R------------L-----R--L-----------------R--------L-R-R-----L---R----------------------------------L---------------------------L------------------R-------------R-----------------------------------------------------------RR-L----------------LL-------RL--R-----------------------------R-L----------------------------------------------------------------R-----L-L-------------LL-----R--R------------L-L----------L-----RLL--------------L--L------------------------L----------------------------------R---------L----LL--R--------------------------------L---------R--LL----------------L----R---------------------R------------------L-------R--------------L----------------------------------------------R-L---------------R--R-----------L--------L------L------------L-----R------------L----------------------------------------L-----------------------------------------------------R------L---R---------L------------------------L----------R---L---------L------L--------------R------------------LLR-------------------------LRR---RR---L----L-R---------L------L--L----------L---L-----------------------R-----------R----R---L-----------R----------------------LL-------R--L--RR--L----L----L--R-L------L----------L-------------------------------------L------------------------------------R----R--L-------------R---L----L--RL-------------------------R--R-----------------------LR--R-----------------------------R---------L---L---------------------------------------R-------------------------------L---RL-------------R--L--------------------------------------------L---------------------RL-R--------R-------------------L------------------L-------L-------R------------------------------R---R-------------L----L---R-L-------------R-------R-------------------------------------L---------------------R-----------------------------------------------R-----------R---L-L-R------R--------R--L--------------------------L---L----------R--------------------------------L-----------------------------------------------L-------------R-----------------------LL-R---R---------------L------L---------------R--L-----L-L----L--------------R--------------------RR--------R---L--------L-------L-----------------------R-RL--------------------------------------------------------------------RL--------L-------------L------------------------------R-----------------R----R----------------------------------------------R----------------LR--------L---LL----------------------L-----L-----R----------------LL----------------------R-------RL---------L---------R----------------RL----------R--------------------------------------------------R-R--R-----------------------------------R-R------------R-R----------------------L------L----------L-------LL---R-R-------R-RLR-----------------L---------------R---LLRR--R---------------------------------L---R---------L--------R---------------------L--------------------------------------R------R-----------------------LL-------------------------R-L---------L-RRL---------R------------------R----R---------L----R--R------------L------------RLL---L-------------L---------L----R-----------R------LL-------------------R-R--------------R--R-----------R------L--L------------------------R--R-R--RR-R------------------------L----------R-----R---L-R---L--R-L--------R-R----------------R------L-R-----------------R--L--LR------L---------R-R-----R-----L-------------R----------------------------------R-L-L----------R-R----------R----R-------------------------------L-------L----------L---R-----R--------L---------------L------------R--------R--------------R------R-----------------R-----L-------------------L------------------------------------------R-----------------------L---------------L----------------------------------------L-----R------L-R------R-L-----L--------------------R------R-----RR---------L---L-----------R---------L-R--R------------L-----------------------------------------------L---L---------------------------L---------L---------------L--R----------L-----------------R-----R------LL--------------------------L----L----R----------L-----------------------R-L-R-----------------------L----R---L-R-----L------R--------R--R---------L-------------L------RR--L---R---------------R---------L----------------R-----R-----------------R----LL----------------------R-R---R---L---L-----------L--R-----------------------------------------------L-------L---------RLR--------L-------------------------------------------L--R--------R-R--------L--------------R---LL---------L-L------------RR--R----L-----R--------------R-------------L--------------------R------------------L-------LR--R---R---------------------------L---------------L----L---------------------------------------------------R--R-----R-----------------LR---L------------------R--------R-------L---L---------LR--R---R---R--------L-----------------L-----------L----R--------L--------L-------------RR-----L----RR-----L-R------------------------R-R---R, improve=0.26259070, (0 missing)
## Age < 12.5 to the right, improve=0.14269010, (0 missing)
## Spa < 420 to the right, improve=0.09687267, (0 missing)
## RoomService < 249.9754 to the right, improve=0.08111019, (0 missing)
## VRDeck < 87.5 to the right, improve=0.07744737, (0 missing)
## Surrogate splits:
## Spa < 2110.5 to the right, agree=0.704, adj=0.044, (0 split)
## VRDeck < 2266 to the right, agree=0.704, adj=0.044, (0 split)
## VIP splits as RLR, agree=0.695, adj=0.013, (0 split)
## RoomService < 3243 to the right, agree=0.694, adj=0.009, (0 split)
##
## Node number 13: 651 observations, complexity param=0.0131094
## mean=0.890937, MSE=0.09716825
## left son=26 (124 obs) right son=27 (527 obs)
## Primary splits:
## ailenum splits as -------------------------------LR----------R-----------R-----RR-----L---R------R-------R--R-R----------L-R-----------------R-------------R-------R------------------------R----------------R--------------------------------------------------R--------R----------------------------R-R-------------------R--------------------R---------R--------------------R--L-----R----------R-----R---R--R----------R---------L-R-R--------L--------------------R-------------------------R-----R--R----------L------------------R-R------R---R--------------------------R----------------------------------------------L----L---------------R--R---R---------------------------------R--------R-------R--R--------------------------------------------------------L-R----------R-----------L----------R-----RR---R----------------------------R----------------R-----------------------------------R-----R----L--R----R----R-------------R---R-----R-------------L-------------------------------R-R--------------RR-------------------------R------R----------------------------------R----------------------R-------R-----R------------------L---------------------------------R-----------------R-------R-----------------R----------------------L--------R------------------R-------R----R-----------------------------------RL------------------------R----------------R------------------R--------R-----------------L--------R---------R-----------------------------L--------R---------------------------R------------------R-------------R-----------------------------------------------------------RR-R----------------RR--------R--L-----------------------------R-R---------------------------L------------------------------------------R-R-------------RR---------------------R-R----------R------RR--------------R--R------------------------R----------------------------------R---------R----RR-----------------------------------R------------RR----------------R---------------------------------------------R----------------------R------------------------------------------------R------------------------------R--------R------R------------R-----R------------R----------------------------------------R-----------------------------------------------------L------R-------L-----R------------------------R----------R---R---------R------R--------------R------------------RRR-----------------------L-RR----LR---R----R--------L--R------R--R----------R---R-----------------------------------R--------R-----------R----------------------RR-------R--R------R----R----R----R--L---R----------R-------------------------------------R------------------------------------L-------R-------------R---R----R---R----------------------------------------------------RL--L-----------------------------R---------R---R---------------------------------------R-------------------------------R---RR----------------R--------------------------------------------R----------------------R----------R-------------------R------------------R-------R-------R------------------------------R---R-------------R----R---L-R-----------------------------------------------------------R---------------------------------------------------------------------R-----------R---R-R-R---L--------------R--------------------------R---R-------------------------------------------R-----------------------------------------------R-------------R-----------------------RR---------------------R------R---------------R--R-----R-R----R---------------------------------------------R---R--------R-------R----------------L---------R--------------------------------------------------------------------RR--------R-------------R------------------------------------------------R---------------------------------------------------RL---------------R---------R---RR----------------------R-----R----------------------RR----------------------R-------LR---------R--------------------------LR------------------------------------------------------------------R-----------------------------------R--------------R------------------------R------R----------R-------RR---R-R----------R------------------R-------------------RRL-------------------------------------R-------------R------------------------------R---------------------------------------------------------------------RR-------------------------R-R---------R---R---------------------------------R---------R-------R------------R------------RRR---R-------------L---------R----R-----------R------RR------------------------------L-----L--------------L------R--R------------------------R--R----RR-R------------------------R----------------R--LR-----R----R----------R----------------L------R-R-----------------R--R--R-------R-----------------R-----R--------------------------------------------------R-R----------------------------L-------------------------------R-------R----------R------------------R---------------R------------R--------R---------------------L-----------------------R-------------------R------------------------------------------RL----------------------R---------------R----------------------------------------R-----R------R--------L-R-----R--------------------R------------RR---------R---R---------------------R----L------------R-----------------------------------------------R---R---------------------------R---------R---------------R-------------R-----------------------L------RR--------------------------R----R----R----------R----L--------------------R-R-----------------------R--------R-L-----R------L--------R--R---------R-------------R------RR--R---R---------------L---------R----------------------------------------R----RR------------------------R-------R---R-----------R--R-----------------------------------------------R-------R----------RR--------R-------------------------------------------R-------------R--------R--------------R---RR---------R-R------------RL--R----R----------------------------------R--------------------R------------------R-------R-------L---------------------------R---------------R----R---------------------------------------------------R--------R-----------------LR---R---------------------------R-------R---R---------RR--L---L---L--------R-----------------R-----------R----R---L----R--------L--------------------R-----R-----R-R-------------------------------, improve=0.45036460, (0 missing)
## deck splits as RRRRLRL-, improve=0.11754260, (16 missing)
## HomePlanet splits as LRRR, improve=0.09976461, (0 missing)
## Age < 12.5 to the left, improve=0.02356719, (0 missing)
## Destination splits as RLLR, improve=0.01419214, (0 missing)
## Surrogate splits:
## ailesira splits as RRRRRLRL, agree=0.817, adj=0.04, (0 split)
##
## Node number 24: 317 observations
## mean=0.006309148, MSE=0.006269343
##
## Node number 25: 708 observations
## mean=0.5437853, MSE=0.2480828
##
## Node number 26: 124 observations
## mean=0.4596774, MSE=0.2483741
##
## Node number 27: 527 observations
## mean=0.9924099, MSE=0.007532523
rpart.plot(fit_tree)
## Warning: labs do not fit even at cex 0.15, there may be some overplotting
rpart paketini kullanarak bir karar ağacı (decision tree) modelini eğitir ve bu modelin özet istatistiklerini görüntüler.
y_pred = ifelse(preds == TRUE, 1, 0)
“preds” vektöründeki değerleri kontrol eder ve eğer bir değer “TRUE” ise, “y_pred” vektörüne 1 atar; değilse, 0 atar
cm
## function (x)
## 2.54 * x
## <bytecode: 0x0000026b8ea8c708>
## <environment: namespace:grDevices>
(505+667)/(505+667+272+121)
## [1] 0.7488818
fit_tree <- rpart(Transported ~ ., data = train_set)
summary(fit_tree)
## Call:
## rpart(formula = Transported ~ ., data = train_set)
## n= 8693
##
## CP nsplit rel error xerror xstd
## 1 0.62521454 0 1.0000000 1.000261 0.0001746568
## 2 0.08751388 1 0.3747855 1.188792 0.0167400686
## 3 0.04828533 2 0.2872716 1.275538 0.0182573973
## 4 0.02910718 3 0.2389862 1.260885 0.0185339961
## 5 0.02455280 4 0.2098791 1.273756 0.0187420488
## 6 0.01310940 5 0.1853263 1.308503 0.0193651091
## 7 0.01000000 6 0.1722169 1.310339 0.0194027138
##
## Variable importance
## ailenum CryoSleep RoomService Spa VRDeck ShoppingMall
## 54 12 9 8 8 6
## ailesira FoodCourt Age
## 2 1 1
##
## Node number 1: 8693 observations, complexity param=0.6252145
## mean=0.5036236, MSE=0.2499869
## left son=2 (3780 obs) right son=3 (4913 obs)
## Primary splits:
## ailenum splits as LRLRRRRRRLRLLLRRLLRLLLLRRLLLLRLRRLLLRRLLLRLRLRLLLLRRRLLRRRLRRRRLRRRLRLLLRRRRLRRRRLLRLLRRRLRRRLRLRLRLLLRRRRLLRRRLLLRLRRLRLLLRRLLRLRRRRLRLRRLLLLRLLRLLRLLLLLRLRLLLRRLLLRLLRRRLLLRRLRLRRLRRRRLRLRRRRRRLLRLLLRLLRLRRLLLLLRRLRLLRRRLLLRLRRLRRLRLLRLRRLRLLLRLRRRRLLRLLLLRLLRRLLRRLLLLLLRLLRRRRRRRRLRRRRLRLLLLLRRRRRRRLLRLRRLLRLLRRLRLRLLRLLLLRRRRLLLRRRRRRRLLRRLRLRRRLLRLLLRRRLLLLRRRLRRRRLRLLRLRRRRRRLLRLLRRLRRRRLLLLLLLRRLRRRLLRLLRRRRRRRRLRRLLRLLRRLRRRLRRRRRLRLRLLRLRLLRLLLLLLRLRLRLLRRLRRRRRLRRRRRLRLRRLLLLRRRLLLLLRLRLLRRRLRLLRLRRLLRLRLLLRRLRLLLRLLRLRLRLRRRLRRRLLLRRRRRLRRRRRRLLLLLLLRRRLRRLLRLRLLRLLLLRLLLLRRLRLRRRLLLRLRRRLLLLLRRLRRLRRRRRLRRRLLLRLRRLLLRRLRRLLLRRLLRLLRRRLRLRLLLRLLRLRLLRRLRRLRLRLLRRRLLLLRRLLLRLRRLRRLLLRRRLLLRRRLLLRRRLLRLLLLLLRLLRLRRRLRLRLLLLRRRRLRRLRLRLRLRRRRRRLLRRLLLRRRRRRRRLRLLLRRRRLRLRLLLLRLLRRLRLLLLRLLRRRRLLLLRRRRLLRRRRLRRRRLLRLLRLLLRLLLRLLLLLRRLLLRLRRLLLRLRLRLRRRLRRLLRRLRRLRLLRRLLLRLLLLRRLLLRRLRRLRRLLLLLRRLLRLRRLRLRRLLRLRLRLRLLLRLLLLLRLLLLLRRRRRLLRLLLLLLRRRRLRRLRLRLLRLRLLLRLRLLRRLLRLLLRLLRLLLRLRRRRRLRRRLLLRRLRLRLRLRLRLLLLLLLLRRRLLLRLRLRLRRRRLRRRRRLLRLRLRRLLRLRRRRRLRLLRRLLLRLRLLRLLRRLRLLRLLLLRRLLLLLLLLLLRLLLLLRLLLRRRRLLLRLLLLLRRLLLRLRLRRRLRLRRLLLRRLLRRLLLLLRRRLRLRRRLRRLLRRLLLLLRRLLRLLRRLLLLRRLRLRLRRLLRRLLRRLLRLLLLLRRRRLRLRRLLLRRLRLLLLLRRLLLRLLLRRLLRLLLLLLLLRRLLRLLLRRRLLRLLLLLLLLLLRLRRRLLLRRRLRLLRRRLRLLRRLRRLRLLRLRLLLRRRLLLRRLRRRLLRLLRRLRRRLRRLLRLRLRLLLRRRRLRLLRLLRLRRRLRLLRLLRRRLLLLLLLLRRLLLRLRLLLRLLLLRLLLRRRRRRLLLRLRLLLLLRRRRLRLRLRRRRLLLLLLLLLRLLRRRLRLLRLLLLLRLRRRRLRLLLLLLLLRRRLRLLLLRRRRRLLRLRLRRRLRLLRLLRLLLLRLLRLLLLLRLRRLRLLLLRRLLLLRLRRLLRRLLRLLLLRRLRRRRRLLLLLRRLRLLLLRLLLRLLLLLRLLRRRRRRRLLLRRLRRRLLLRLLRRLRLLLRRLLRLLLRRRLLLLLLLLRLLRLLLLLLRLRLLLRLLRLLRLRRLRLRRLLRRRRRRLRRRLRLLLRLLRLLRLRRRRRLLLRRRRRRLLLLLLRRLLLLRRRRLLRLRLRRLLRLLLRLLRLRLRRLLLLLLRLLLLLRRLLLRLRLRRLLLLLRRLRLLRLLRLRLLLLLLLRRLLRRRRRRLLRLLRRRLLLRRRRLRLRRLLLLRRRRLLLRLRLLLRRLLLLLLLRLLRRRRLLLLRRRLLRRLRLLLRLLRRRLRLRRRRRRLRLRLLLRLLRRLRLLLRRRRRLRRLRRRRLRLLRLLLRLLLRLLLLRLRRLLLRLLLLLRRRLRRRLLLLRRLLLLRRLLRRLLLLLLLLRRLLRRLLRRLLLRLLLRLRLRRRRLRLLLLRLLLLLRRRLLRRLLLLLLLLLLRLRLLLLLLRRRLRLRRRRLLRRLRLRLRRLRLRRRRLRRLLRLLLLLRRRRRLLRRLRRLLLRRRRLLRLLLLRRRRLRRRLLLRRLLRRLRLLLLLLLRLRLLLLRRLLLLLLRRLRRRLLLLRLLLLLLLRRRLLLLLRRRRLLRLRRRLRRRRRRLRLRLRRRLLLRLLRLLLRLRRRRLLLRLRRRLRLRLLRRLRLLRRLLRLLRRLLRLLRLRRRRRLRLRLRRLLRLRRLLRRLLLRRLLLRRRLLRRRRLLLRRLRLLRLLRRRRLRLLLRRRLRRRLLLRRRLLRRLLRRLRLRRLLLRRRRRRRLRRRLLRRLLRRRLLRLRLRRRLRRLRLRRLLRRLLRLRLRRLLLRRRRLLRRRLRRRRRRLRRLRRLRRLRLLRLRLRLRRRLRLLLLRLRRRRRLRLRLRRRLRRLLRRLLRLLRRRLRRLLRRRRRRRLRRRRLRRLRLRRRLRLLRLRRRRRRRLRLRLRRLRRRRRLLLLLRLRRRRRLRLLLLRLRLRLLLLRLLRRLLLLLRRLLLRLLLRLRRRRRLRLRRRRRLRLLRRRRRLRLRRLLRRRRLRRLLRRRRLRRLLRRLLRRLLLLLLLLLRLLRLLLRRRRRLLRLRRRRRLRLLRLLLRLRLRLRRLRRRRRLLLLLLRLLLLRRLRRRLRLRLLLRLRLRRLLRLLLRRRLRLRRRLLLLLLLRRRRRLLRLLRLRLLRLRRLRRRLRLRRRLRRLRLLLLRLLLRRRRLRLLLRRRRLLRRLRLLLRRLRRLLLRRRLLRRRRLRLLRLRRRLLLRRLLRLRLLLRRLRRLRRLRRLRLRLLRLLLRRRRLRRLRRLRRLRLRRRRLLRRRRRRRLLRLRRLLRRLRRLRLRRRLRRRLRLRLRLRLRLRLRRRRLRRRLLRRLRRRRLRRRLLLLRLRRLLLRRRRLRLLRRLRLRLRLLLRRLRRLLRRRRRRRLRRRRLRLLLRRLLLRRLLLRLRRLLLRRRRLLLRLRLLRRRLRRLLLLRRLLRRRRLLLRRLRRRLRRLLLLRRLRRLLLLRRRLRLLLRRRLLLRRRLRRRLRLLLLRLLRRRRLLRRRLRRRRLLLRLRRLLRRRRRLLRRLRRLLLLLRRLLRRLLRLLRRRRRRLRRRRLLRLLRLRLLLRRRRLRRLRRLRRRRLLLLLLRRLLLRRRRRLRRRRLRLRRRRLLLRRRLRRRRLLRLLLRRRLRRRLRRLLRLRRLRLLRRRRRRLRLLLLRRLLRRRLLLLRLRLRLRRLRRLRRLLRRLLLLLLLLRRLRRRRRLRRRRRRLLRRRLRRLRLLRRRRLRRLLLRRRRRLLLRRRLLLLRRRRLRLRLRLRRLRRRLLRRLRRLLLLRLRLRLRRRLLRRRLRRLRLRRRLRLRLLLLLRLRRLLLRRRRRRRRLRRRLRLLRRRRRLLLRRRRRRRRRLLRRLLRRRRRLLLRRLLRRRRRRLLLLLRRRRRLLLRLRLRRRRLRLLRLLLRLRRRLRRLRLRRRRLRRRLRRRRRRLLRRRRLLRRLRLLLRRRLRLRRRLLRRRRRRRRRRLRRRLRRRRRRLRLRRRLRLRLRLRLLRLRLLRRRRLRRLLRRLLLLRLLRRRLRRLRLLLLLLLRRLLRLRLRRLLLLRRLLRLLRLLRRRRRLLLLLLLRLLLRRLLRRLRRLRLLRLRRRLLLRRRRLRLRLLRRRRRLLRLRLRRLLLRRRRLRLRRRLRLRRLRLRRLLRLRLRRLLRRRRLRRLLRLRLLLRLRRLRRLRRRRRRRRRRLRLLRLLRRRLLRRRLLRLLLLRRRLLRLLRRRRLLLRLLRRRRRRRRRRRRRLRRRRRRRRLLRRRLLRLLRRLRRRLLRLLLLLRLLRRLRLRRRRLRLLLRRLRLLRLRLRLRLRLRLLLRRRRRRRRLRRLRRRRRRLLLLRRLRLRRRLLRLLRRRLRRRRRLLRRRLRLRRRLRLRLLRRRRRRLLLRLRRRRLLRRLRLRLLLRRLLRRLRRRLRRLLRLLLLRRRLRRLRRLRLRRLRRRRRRRRLLRRRRLRRRLLLRRRRRLLRLRRLLRLRRRLRRRRRRRLRRLLLLRLRLRLLRRLLRLLRLLRRRRRRLRRLRRRRLRLRLLRLRRLRRRRLLLLRRRRRRLLRRRLLRRRLRLLRRRRRLLLRLLLRRRLLRRLLRLRRLLRRRRRLRLLLLLRRRRRLLLLLRLLRRLRRLRRLLRRLRRRRLLRRRRLLRRLRLRRRLRRLLRRRRLRRRRLRRRLRLLLLRLRRRRRRLRLRRRLLLRLRRLRLRRRRRRLRRLLRRLRRLRRLRRLLLRRRLLRLRLRRRRLLLLLRRRLRRLLRLLLRRRRRLRRRRLLRLRLRLLRLLRRLLRLRRRRLLLRRRLLLRRRLLRRLLRLLRLLLLRRRRRLRLLRLRRLLRLLLRLRRRLRLLLRLLRLRLLRRRRLRRRRRRLRRRLLLRRRRRRRRRLRLLRLRRLLLRRRLRRRLLLRRRRLRLRRRRRLRRLRLRRRRLRRLRLLLRRRRRLLLRRRRRLRRLRLRRRRRLLRRRRLRRRRLLRRLRRRRLLRLLRRLRLRLRRRLRRRRLLRLRLRRLRLLLRRLRLLRRRRLRRRLRLRLLLRRRRLRRRLLRRRLRRRLLRRRRLRRRRLRLLRRLLRLRRLRLRRLRLRRRRRRLRRRRLRLRRLRLLLLLLLLRLLRRRLRLRLLRRLRLRLLLLLRLLRRRLRLRRRLRLLRRRRLRRRRLLRLLLRRLLLRLRRLRLLLRRLRLLLLLRRLLLRLRLRLRLRLRRLRRRLRLRRRLLLRLLRLLLRLRLLLRLLLLLRRLRLRRRRLLRLRRLRRLRLRLRLRLRRRRLRRLLLRLRLLRRLRRRRRRLRLLLLRLLLLRLRRLLRRLRLLRRRLRRLRLRLLRRRLRLRRRLLLRRRLLRRRLLLLLRLRLLRLRLLLLLLLLLLRRLLLLRRRRLRRRLLLLRLRRLLLRRLLLLLRRRLLRLRLLRLLRRLRRLLLLRRLRRLLLLLLLLRRRRLLLRRRRRRLRRLRRLLRRRRLLRRRLLRRLRLRLLLLLLRLRLLLRRRRRRRLRRLLLLLRRRLLRLRRLLLLLRRLLRRRRRRRLRRRRLLRLRRRRRRLRLLRLLRRLLLLRRRRRRRRLRRRLRRRRRLRLLLRLLLRRLLLRRLRLLRRRLLRLLLLRLRRLLRLRLRRLRLRRLRLLRLRRLLRRLLRRRLRLLRRLLRRRLLRLRLRRLLRLLLLLLRLLRLLLRLLLRRLRLLLRRLLRLLRLLLRRRLRLLRLLLLRLRRRLLRRLRRLLLLRRLRLRRRRRRLRLRLLRLRRLRLLRLRLLLLRRLRLLLRRRRLLRLLLRRLLLRRRRLRLRRRRLLRLRRLRLRRRRLLRRRRRLLRLLRLRRLLLRRLRLLRLRRLRLLLLRRLLRLRRLLRRRLLLLRRRLLLRRLRLRRRRLLLRLLLRLRLLRRLLLRLLRLRRLLRRRRRRLLRLLLRLLLLLLRLLRRLLRLRLRLLRLLRRRLLRRRLRLLRRLRLRRRLLRRRRLLLLLLRLLRLRLRLLLRLRLRRRRRRLRRRRRLLLLLRRRLLRRLRLRRRLRLLLRLRLRRLLLLLRLRLRRLLRLRLLRRLRRLRLRRRLRRRLLLRLLLLLRRLLLLRRRRRRLLLLRLRRRLRLLRLRLRLLRLLLRRRRLRLRLLRLRLRLRLLLLLRLLLRLRRLRRRLRRRLLRLRLLRLRLRLRLLLLRLLRLLLLRLLRRRRRLLRLLLRRRLRLLLLRLLLRRRRLLLRRLRLRLLRRRRRRLLLLLLRLLLLRRRLLRLLLRRRRLLRRRLRLLLLRRLRLRLRLLRRLLRLRRLLLRLLLRRLLLRRLLLLLLLRLRRLLLLLLLLRRLLRRRRLLRLRRLLLRRRRLRRLRRLLRLRLRLRLLLLLRLRLRRLRLRLRRRRRLLLRLRRLRLRRLRLLRLRRRRRLRRRRRLRLRRLRLLLLRLRRRRLRRLLRLRLLLLRRRRRLRRRLLRRLRRLLLRLRLLRRLRRLLLLLLLLLRRRLLLRLLLRRRLLRRLLLRLLLRRRRRLLLLLRLRLRRRRRLRLRLLLLLLRLLRRLLRLRLRLLLRRRLLLRLLRLLLRLRRLLLLRRLLLRRLLLLLRRLLLLRLRRRRRRLRRLLLRRLLLRRRLRLRLLRRLLRRLLRRRRRLRRRLRRRRRLRLLLRRRRLRLLLRRRLRRRRRLRLRLRRRRRRRLLRR, improve=0.6252145, (0 missing)
## CryoSleep splits as LRL, improve=0.2117218, (0 missing)
## RoomService < 0.5 to the right, improve=0.1204234, (0 missing)
## Spa < 0.5 to the right, improve=0.1183706, (0 missing)
## VRDeck < 0.5 to the right, improve=0.1103404, (0 missing)
## Surrogate splits:
## CryoSleep splits as LRR, agree=0.650, adj=0.196, (0 split)
## RoomService < 0.5 to the right, agree=0.649, adj=0.192, (0 split)
## Spa < 0.5 to the right, agree=0.634, adj=0.158, (0 split)
## VRDeck < 0.5 to the right, agree=0.628, adj=0.146, (0 split)
## ShoppingMall < 0.5 to the right, agree=0.624, adj=0.134, (0 split)
##
## Node number 2: 3780 observations, complexity param=0.0245528
## mean=0.05291005, MSE=0.05011058
## left son=4 (3173 obs) right son=5 (607 obs)
## Primary splits:
## ailenum splits as L-L------L-LLL--RL-LLLL--LLLL-L--LLL--LLL-L-L-LLLL---LL---L----L---L-LLR----L----LL-LL---L---L-L-L-LLL----LL---LLL-L--L-LLR--LL-L----L-L--LLLL-RL-LL-LLLLL-L-LLL--LLL-LL---LLL--L-L--L----L-L------LL-LLL-LL-L--LLLLL--L-LL---LLL-L--L--L-LL-L--L-LLL-L----LL-LLLL-LL--LL--LLLLLL-LL--------L----L-LLLLL-------LR-L--LL-LL--L-L-LL-LLLL----LLR-------LL--L-L---LL-LLL---LLLL---L----L-LL-L------LL-LL--L----LLLLLLL--L---LL-LL--------L--LL-LL--L---L-----L-L-LL-L-LL-LLLLLL-L-L-LL--R-----L-----L-L--LLLL---LLLLL-R-LL---L-LL-L--RL-L-LLL--L-LLR-LL-L-L-L---L---LLL-----L------LLLLLLL---L--LL-L-LL-LLLL-LLLL--L-L---LLL-L---LLLLL--L--L-----L---LLL-L--LLL--L--LLL--LL-LL---R-L-LLL-LL-L-LL--L--L-L-LL---LRLL--LLL-L--L--LLL---LLL---LLL---LL-LLLLLL-LL-L---L-L-LRLL----L--L-L-L-L------RL--RLL--------L-LLL----L-L-LRLL-LL--L-LLLL-RL----LLLL----LL----L----LL-LL-LLL-LLL-LLLLL--LLL-L--LLL-L-L-L---L--LR--L--R-LL--LLL-LLLL--RLL--L--L--LLLLL--LL-L--L-L--RL-L-L-L-LLL-LLLLL-LLLLL-----LL-LRLLLL----L--R-L-LL-L-LLL-L-LL--LL-LLL-LL-RLL-L-----L---LLL--R-L-L-L-L-LLLLLLLL---LLL-L-L-L----L-----LL-L-L--LL-L-----L-RL--LLL-L-LL-LL--L-LL-LLRL--LRLLLLLLLL-RLRLL-LLL----LLR-LLLLL--LLL-L-L---L-L--LLL--RL--LLLLL---L-L---L--LL--LLLLL--LL-LL--LLLL--L-L-L--LL--LL--LL-LLLLL----L-L--LRL--L-LLLLL--LLL-LLL--LL-LLLLLLLL--LL-LLL---LL-LLLLLLLLLL-L---RLL---L-LL---L-LL--L--L-LL-L-LLL---LLL--L---LL-LL--L---L--LL-R-L-LLL----L-LL-LL-L---L-LR-LL---LLLLLLLL--LLL-L-LLL-LLLL-LLL------LLL-L-LLLLL----L-L-L----LLLLLLLLL-LL---L-LL-LLLLL-L----L-LLLLLLRL---L-LLLL-----LL-L-L---L-LL-LL-LLLL-LL-LLLRL-L--L-LLLL--LLLL-L--LL--LL-LRLL--L-----LLLLL--L-LLRL-LLL-LLLLL-LL-------LLL--L---LLL-LL--L-LLL--LL-LLL---LLLLLLLL-LL-LLLLLL-L-LLL-LL-LR-L--L-L--LL------L---L-LLL-LL-LR-L-----LRL------LLLLLL--RLLL----LL-R-L--LL-LLL-LL-L-L--LLLLLL-LLLLL--LLL-L-L--LLLLL--L-LL-LL-L-LLLLLLL--LL------LL-RL---LLL----L-L--LLLL----RLL-L-LRL--LRLLLLL-LL----LLLR---LL--L-LLR-LL---L-L------L-L-LLL-LL--L-LLL-----L--L----L-LL-LLL-LLL-LRLL-L--LLL-LLLLL---L---LLLL--LLLR--LL--LLLLLLLL--LL--LL--LLL-LLL-L-L----L-LLLL-LLLLL---LL--LLLLLLLLLL-L-LLLLLL---L-L----LL--L-L-L--L-L----L--LL-LLLLL-----LL--L--LLL----LL-LRLL----L---LLL--LL--L-RLLLLLL-L-LLLL--LRLLLL--L---LRRL-LLLLLLL---LLLLL----LR-L---L------L-L-L---LLL-LL-LLL-L----LLL-L---R-L-LL--L-LL--RL-LL--LL-LR-L-----L-L-L--RL-L--LL--LLL--LLL---LL----LLL--L-LL-LL----L-LLL---L---LLL---LL--LL--L-L--LLL-------L---LL--LL---LL-L-L---L--L-L--LL--LL-L-L--LLL----LL---L------L--L--L--L-LL-L-L-L---L-LLLL-L-----L-L-L---L--LL--LL-LL---L--LR-------L----L--L-L---L-LL-L-------L-L-L--L-----LLLLL-L-----L-LLLL-L-L-LLLL-LL--LLLLL--LLL-LLL-L-----R-L-----L-LL-----R-L--RL----L--LL----L--LL--LL--LLLLLLLLL-LL-LRL-----LL-L-----L-LL-LLL-R-L-L--L-----LLLLRL-LLLL--R---L-L-LLL-L-L--LL-LLL---L-L---LLLLLLL-----LL-LL-L-LL-L--L---L-L---L--L-LLLL-LLL----L-LLL----LL--L-LLL--L--LLL---LL----L-LL-L---LLL--RL-L-LLL--L--L--L--L-L-LR-RLL----L--L--L--L-L----LL-------LL-L--LL--L--L-L---L---L-L-L-L-L-L-R----L---LL--L----L---LLLL-L--LLL----L-LL--L-L-L-LLL--L--LL-------L----L-LLL--LLL--LLL-L--LLL----LRL-L-LL---L--LLLL--LL----LLL--L---L--LLLL--L--LLLL---L-LLL---LLL---R---L-LLLL-LL----LL---L----RLL-L--LL-----LL--L--LLLLR--LL--LL-LL------L----LL-LL-L-LLL----L--L--L----LLLLLL--LLL-----L----L-R----LLL---L----LL-LLL---L---L--LL-L--L-RL------L-LLLL--LL---LLLL-L-L-L--L--L--LL--LLLLLLLL--L-----L------LL---L--R-LL----L--LLL-----LLL---LLLL----L-L-L-L--L---LL--L--LLLL-L-L-L---LL---L--L-L---L-L-LLLLL-L--RLL--------L---L-LL-----LRL---------LL--LL-----LLL--LL------LLLRL-----LLL-L-R----L-LL-LLL-L---L--L-L----L---L------LL----LL--L-LLL---L-L---LL----------L---L------L-L---L-L-L-L-LL-L-LL----L--LL--LLLL-LL---L--L-LLLLLLL--RL-L-L--LLRL--LL-LR-LL-----LLLLLLL-RRL--LL--L--L-LL-L---LLL----L-L-LL-----LL-L-L--RLL----L-L---L-L--R-L--LR-L-L--LL----L--LL-L-LLL-L--L--L----------R-LL-LL---RL---LL-LLLL---LL-LL----LLL-LL-------------L--------LL---LL-LL--L---LL-LLLLL-LL--L-L----L-LLL--L-LL-L-L-L-L-L-LLL--------L--L------LLLL--L-L---LL-LL---L-----LL---L-L---L-L-LL------LLL-L----LL--L-L-LRR--LL--L---L--LL-LLLL---L--L--L-L--L--------LL----L---LLL-----LL-L--LL-L---L-------L--LLLL-L-L-RL--LL-RL-LL------L--L----L-L-LL-L--L----LLLL------LL---LL---L-LL-----LLL-LLL---LL--RR-L--LL-----L-RLLLR-----LLLLL-LL--L--L--LL--L----LL----LL--L-L---L--LL----L----L---L-LLLL-L------L-R---LLL-L--L-L------L--RL--L--L--L--RLL---LL-L-R----LLLLL---L--RL-LRL-----L----LL-L-L-LL-LL--LL-L----LLL---LLL---LL--LL-LR-LLLL-----L-LL-L--LL-LLL-L---L-LLL-LL-L-LL----L------L---LLL---------L-LL-L--LLL---L---LLL----L-L-----L--L-L----R--L-LLL-----LLR-----L--R-L-----LL----L----LL--L----LR-LL--L-L-L---L----LL-L-L--L-LLL--L-RL----L---L-L-LLL----L---LL---L---LL----L----L-LR--LL-L--L-L--L-L------L----L-L--L-LLLLLLLL-LL---L-L-RL--L-R-LLLLL-LL---L-L---L-LL----L----LL-LLL--LLL-L--L-LLL--L-LLRLL--LLL-L-L-L-L-L--L---R-L---LLL-LL-LLL-L-RLL-LLRLL--L-L----LL-L--L--L-L-L-L-R----L--LLL-L-LL--L------L-LLLL-LLLL-L--LL--L-LL---L--L-L-LL---L-L---LLL---LL---LLLLL-L-LL-L-LLLLLLLLLL--LLLL----L---LLLL-L--LLL--LLLLL---LL-L-LL-LL--L--LLLL--L--LLLLLLLL----LLL------L--L--LL----LL---LL--L-L-LLLLLL-L-LLL-------L--LLLLL---LL-L--LLLLL--LL-------L----LL-L------L-LL-LL--LLLL--------L---L-----L-LLL-LLL--LLL--L-LL---LL-LLLL-L--LL-L-L--L-L--L-LL-L--LL--LL---L-LL--LL---LL-L-L--LL-LLRLLL-LL-LLL-LLL--L-LLL--LL-LL-LLL---L-LL-LRLL-L---LL--R--LLLL--L-L------L-R-RL-R--L-RL-L-LLLL--R-LLL----LL-LLL--LLL----L-L----LL-L--L-L----RL-----LL-LL-L--LLL--L-LL-L--L-LLLL--LL-L--LL---LLLL---LLL--L-L----LLL-LLL-L-LR--RLL-RL-L--LL------LL-LLL-LLLLLL-RL--LL-L-L-LL-LL---LL---L-LL--L-L---LL----LLLLLL-LL-L-L-LLL-L-L------L-----LLLLL---LL--L-L---L-LLL-L-L--LLLLL-L-L--LL-L-LL--L--L-R---L---LLL-LLRLL--LLLL------LLLL-L---L-LL-L-L-LL-LLL----L-L-LL-L-L-L-LLLLL-LLL-L--L---L---LR-L-LL-L-L-L-LLLL-LL-LLLL-LL-----LL-LLL---L-LLLL-LLL----LLL--L-L-LL------LLLLLL-LLLL---LL-LLL----LR---L-LLRL--L-L-L-LL--LL-R--LLL-LLL--LLR--LLLRLLL-L--LLLLLLLL--LL----RL-L--LLL----L--L--LL-L-L-L-LLLLL-L-L--L-L-L-----LLL-L--L-L--L-LL-L-----L-----L-L--L-LRLL-L----L--LL-L-LLLL-----L---LR--L--LLL-R-LL--L--LLLLLLLLL---LLL-LLL---LL--LLR-LLL-----LLLLL-L-L-----L-L-LLLLLL-LR--LL-L-L-LRL---LLL-LL-LLL-L--LLLL--LLL--LLLLL--LLLL-L------L--LLL--LLL---L-L-LL--LL--LL-----L---L-----L-LLL----L-LLL---L-----L-L-L-------LL--, improve=0.28168690, (0 missing)
## ailesira splits as LLRRRRRR, improve=0.11212740, (0 missing)
## Age < 12.5 to the right, improve=0.11123430, (0 missing)
## CryoSleep splits as LRL, improve=0.07443996, (0 missing)
## RoomService < 0.5 to the right, improve=0.03282292, (0 missing)
## Surrogate splits:
## ailesira splits as LLRRRRRR, agree=0.903, adj=0.397, (0 split)
## Age < 12.5 to the right, agree=0.869, adj=0.183, (0 split)
##
## Node number 3: 4913 observations, complexity param=0.08751388
## mean=0.8503969, MSE=0.127222
## left son=6 (1676 obs) right son=7 (3237 obs)
## Primary splits:
## ailenum splits as -R-RRRRRR-R---RL--R----RR----R-LL---RR---R-L-R----RRR--LRR-RRLL-LLR-L---LRRR-RRLR--R--RLR-LRL-R-R-R---RLRL--RRR---L-RR-R---LR--R-RRRR-R-RL----R--L--R-----R-R---RL---R--RRL---RR-R-RR-RRRR-L-RRRRRR--R---R--R-RR-----RL-R--RRR---R-RR-RR-R--R-LR-R---R-LRRR--R----R--RR--RR------R--LRLRRRRR-LRRL-R-----RRLRRRR--R-RR--L--RL-R-L--R----RRLR---RRRRRRR--RR-R-RRL--L---RRL----RRR-RRLR-L--L-RRLRRL--R--LR-RRLR-------RL-LRL--R--RRRLLRRR-RR--L--RR-RRR-RLRRR-L-R--R-L--R------R-R-L--RR-LRRLR-RRRRR-L-LR----RRR-----R-R--LRL-R--L-LR--L-R---RR-R---R--R-R-R-RRL-LLR---RRLRR-RRLRRR-------RRR-RR--R-R--R----R----LL-R-LRR---R-RLR-----LR-LL-RLRRL-LRR---R-RR---RR-RR---RR--R--RLR-R-L---L--R-R--LR-LR-R-R--RRR----LR---R-RR-RR---RRR---RRR---RRR--R------R--L-LRR-R-R----LLRR-RR-R-R-L-RRRRRR--RL---RRLLLRRL-R---RRRR-R-R----R--RR-R----L--RRRR----RRRR--LRRR-RRRR--R--R---R---R-----RR---R-RL---R-L-R-RLR-LR--RL-RR-L--LR---R----RL---LR-RR-LR-----RL--R-RL-R-RR--R-R-R-R---L-----R-----RRLRL--R------RRRR-LL-L-R--R-R---R-R--RR--L---L--R---L-RRRRR-RRR---RR-R-R-R-R-R--------RLR---R-R-R-RRLR-RRRRR--L-R-RR--L-RLRRL-R--RR---R-R--R--RL-L--R----RR----------R-----R---RRLL---R-----LR---R-L-RRR-R-LR---RR--RR-----LRL-R-RRR-RR--RR-----RR--L--RR----LR-R-R-RR--RR--RR--L-----RRLR-R-LR---RR-R-----RR---R---LR--R--------LL--R---RRR--R----------L-LRR---RRR-R--RRR-L--RR-LR-R--R-R---RLR---RL-RLR--R--RR-RRR-RR--L-R-R---RLRL-L--R--L-RRL-R--R--RRR--------RR---R-L---R----L---RRRRRR---R-R-----RRRR-R-L-RRRR---------R--RLR-R--R-----R-LRRR-R--------RRR-R----RRRRR--R-R-RRR-R--R--R----R--R-----R-LL-L----RR----R-RR--LL--R----LL-RLRRR-----RR-R----R---R-----R--LRLRRRR---RR-RRR---R--RR-R---RL--R---RRR--------R--R------R-R---R--L--R-RL-L-RR--RRRRRR-RLL-R---L--L--R-RRRRR---LRLRRR------RL----RLLL--R-R-RR--R---L--L-R-RR------R-----RR---R-L-RR-----RR-R--R--R-R-------RR--RRRLRR--R--RRL---RLLR-L-RR----RRRR---R-R---RR-------R--LRRR----RRL--LL-R---R--RRR-R-RRLRRR-L-R---R--RR-R---RRRRR-LR-RRRR-R--R---R---L----R-RL---R-----RRR-RLR----RR----RR--RR--------RR--RR--RR---R---R-R-LRLR-R----R-----RRL--LR----------L-R------LRR-R-RLRR--RR-R-R-RL-R-RRLR-RR--R-----LRRRR--RR-RR---RRRR--R----RRRR-RRR---RR--LR-R-------R-R----RR------RR-RRR----R-------RRR-----RRLR--R-RLR-RLRRRL-R-R-LRR---R--R---R-RRRR---R-RLR-R-R--RR-L--RL--R--RR--L--R-RRLRR-R-R-RR--R-RL--RR---RR---RRR--RLLL---RR-R--R--RRRR-R---RRL-LLL---LLR--LR--RL-L-RR---LRRLRRR-RRL--LR--RRR--R-L-RRL-RR-R-RR--RR--R-R-RR---LRRR--RRR-RRLRRR-LR-RL-RR-R--R-R-L-RRR-R----R-RRRRR-R-R-LLR-RR--RL--L--LLR-LR--RLRRRRL-RLRL-RL-R-LRR-R--R-RRLRRRR-R-R-RR-RRRRR-----R-RRRRR-R----R-L-R----R--RR-----RR---R---R-RRRRR-R-RLRRR-L--LRRRR-R-RR--RRLR-RL--RRLR-LL--RR--RR---------R--R---RLRRL--R-RRRRR-R--R---R-R-R-LL-RLRRR------R----RR-RRR-R-R---R-L-RR--R---LRR-L-RRR-------RRRRR--R--R-R--R-RR-RRR-R-RRL-RR-R----R---RRRR-R---RRRR--RR-L---LL-RR---RRR--RRLR-L--R-RRR---RR--R-R---RR-RR-RR-RR-R-R--R---RRRL-RR-RR-RR-R-RRRR--RRRLLRL--R-RR--LR-RR-R-RRR-RRR-R-R-L-R-R-R-RRRR-RRR--RL-RRRR-RLR----R-LR---RRRR-R--RR-R-R-R---RR-RR--LRRRLRR-RRRR-R---RL---RL---L-LR---RRRR---R-L--RRR-RL----RR--RRRR---RR-RRR-RR----RR-RR----LRR-R---RRR---RRR-RRR-L----R--RRRR--RRR-RRRR---R-RR--RRRRR--RR-RR-----LR--RR--R--RLRRRL-LRLR--L--L-R---RRRL-RL-RR-RRRR------RR---RRRRR-RLRR-L-RRRR---RRL-RRRR--R---RRR-RRR-RR--R-RR-R--RLRRRR-R----RR--RRR----R-R-R-RR-RR-RR--RR--------LR-RRRRR-RRRRRL--RRR-RR-R--RRRR-RR---RLLRL---LRR----RRRR-R-R-L-RR-RRL--RR-RR----R-R-L-RLR--RRL-LR-R-LRR-R-R-----R-RL---RRRRRRRR-RRR-R--RLLRR---RRRLRRRLR--RR--RLRRR---RL--RRRRRR-----RRRLR---R-L-LLRR-R--R---R-RRR-RR-R-RRRR-RRR-RRRRRR--RRRR--RR-R---RRR-R-RRR--RRRRRRLLRR-RRR-RLRRRR-R-RRR-R-L-R-R--R-R--RRRR-RR--RR----R--RLR-RR-R-------RR--L-R-RL----RR--R--R--RRRRR-------R---RR--RR-RR-R--R-RLL---RRRR-R-R--RRLLR--R-R-RL---LLRR-R-RRR-R-RR-R-RR--R-L-RR--LRRR-RL--R-R---R-RR-RR-LLRRRRRRRR-R--R--RRR--RRL--R----LLR--R--RRRL---R--RRRLRRRRRRRRR-RRRRRRLL--RRR--R--LR-RRR--R-----R--RR-R-RRRR-R---RR-R--R-R-R-R-R-R---LRLRRLRR-RR-RRRRRR----RR-R-RRR--R--RRR-RRLRL--RRR-R-RRR-L-L--RRRRRR---R-RRRR--RR-L-R---RL--RR-RRR-RL--R----LLR-RL-LR-R-RR-LRLLLRRR--RRRR-RRR---RLRRR--R-RR--R-RRL-RRLLLLR-LR----R-R-R--RR--R--R--RRRRRR-RR-RLRR-L-R--R-RR-LRRR----RLRRRR--RRR--RRR-R--RRRLR---R---RRR--RR--R-RR--RRRRR-R-----RRRLR-----L--RR-RR-RR--RR-RRRR--RRLL--RR-R-RRR-RR--RRRR-RRRR-LRL-R----R-RLRLLL-R-RRR---L-RR-R-RRRRRR-RR--RL-RR-LR-RR---RRL--R-L-RLRR-----RRR-RL--R---RRRRR-LLLR--L-R-R--R--RR--L-RRRR---RLR---LRR--RR--R--L----RRLLR-R--R-RR--R---R-RRL-L---R--R-L--RRRL-RLRRRR-RRR---LRRRRRRLR-L--R-RR---RRR-RRR---RRRR-L-RLRLR-LL-L-RRRR-RR-R---RRRRR---RRRLR-RR-R-RRRLR--RRLR-LLRL--RL-RLRL--R--RR-L-L-RRR-RRRR--R-R-RL-R---RL-L--RRRR-RRR-R-R---LRRL-RLL--RRR-LRR--RRRR-LRLR-R--LR--R-LR-R-RR-R-RRRRLR-RRRR-R-RR-R--------R--RRR-R-R--RL-L-L-----R--RRL-L-RRR-R--RRLR-RRLR--R---RR---R-RR-R---RR-R-----RL---R-R-L-R-R-RR-RRL-R-LRR---L--R---R-L---R-----RR-R-RLRR--R-RR-RR-L-R-R-R-RLRR-RR---R-R--RL-RRRRRL-R----R----R-RR--LR-R--LRR-RR-R-R--RRR-R-RRL---RRR--RRR-----R-R--R-R----------RR----RRLL-RRR----R-RR---RR-----LRR--R-R--R--RR-LR----RR-RR--------RRRR---RRRRRR-RR-RR--RLRR--RLR--RR-L-L------L-L---RRLRRRR-RR-----RRR--R-RL-----RL--RRRLLRR-RRRR--L-RRLRRR-R--R--RL----RRRRRLRL-RLR-RRRRR-R---L---RR---RR-R--RRR--R----R-RR--R-R-RR-R-RR-R--R-LR--LR--RRR-R--RR--RRR--R-R-RR--L------R--L---R---RR-R---RL--L--R---RRR-L--R----R-RRR--RR-LR----LR-R-RRLLRR-R-R--R-RR-R--R-R----RR-L---RLRR--L---RR---RRLR-R-LRRR--R-RR-R-RRRR--LRLRL--R--R-RR---RR-R--R-RR-L----LR--L-LR--RRL----RRL---RR-R-LRRL---R---R-L--RR---R--R-RL--RRRRLL--L---L------R--RR--R-L-R--R--RRL--RRR-R--RR-R-RRL--RRRL------R--R-R-R---L-R-RLLRRR-RRRRR-----RRR--RR-L-LRR-L---L-R-LR-----R-R-RL--L-R--RR-RR-R-RRR-RRR---R-----RR----RRRRRR----R-RLR-R--R-L-R--R---RLLL-R-R--R-L-R-R-----R---R-RR-RRR-RRR--R-R--R-R-R-R----L--L----R--RLRLR--R---RLR-R----R---RRRL---LL-R-R--RRRLRL------R----RLL--L---RLRR--RLR-R----RR-R-R-L--RR--R-RR---L---RR---RR-------R-RL--------RR--RRRR--L-RR---RLLR-LR-RL--R-R-R-R-----R-R-RR-R-R-RRLRR---R-RR-R-RR-L--R-LRRRR-RRRRR-R-RR-R----R-RRRR-RR--R-R----RRRRR-RRR--RL-RL---R-L--RR-RR---------RLL---L---RRR--RR---R---RLRRR-----L-R-RRRRL-R-L------R--LL--L-R-L---LRR---R--L---R-RR----RR---RL-----RR----L-RRRLRR-LR---LR---RRR-L-R--RR--RR--RLLRR-RRL-RRRLL-R---LRLR-R---RRR-RRRRR-R-R-RRRRLRL--RL, improve=0.30426700, (0 missing)
## Spa < 1346.5 to the right, improve=0.13215820, (0 missing)
## VRDeck < 1058 to the right, improve=0.12338610, (0 missing)
## CryoSleep splits as LRL, improve=0.11239120, (0 missing)
## RoomService < 366.5 to the right, improve=0.08946097, (0 missing)
## Surrogate splits:
## ailesira splits as RLLLLLLL, agree=0.740, adj=0.239, (0 split)
## Age < 10.5 to the left, agree=0.683, adj=0.070, (0 split)
## Spa < 1024 to the right, agree=0.681, adj=0.065, (0 split)
## VRDeck < 991.5 to the right, agree=0.680, adj=0.062, (0 split)
## RoomService < 705.5 to the right, agree=0.674, adj=0.044, (0 split)
##
## Node number 4: 3173 observations
## mean=0.0009454775, MSE=0.0009445835
##
## Node number 5: 607 observations
## mean=0.324547, MSE=0.2192162
##
## Node number 6: 1676 observations, complexity param=0.04828533
## mean=0.576969, MSE=0.2440758
## left son=12 (1025 obs) right son=13 (651 obs)
## Primary splits:
## CryoSleep splits as LRL, improve=0.2565094, (0 missing)
## Spa < 0.5 to the right, improve=0.2056128, (0 missing)
## VRDeck < 1.5 to the right, improve=0.1922289, (0 missing)
## RoomService < 0.5 to the right, improve=0.1675086, (0 missing)
## FoodCourt < 0.5 to the right, improve=0.1407524, (0 missing)
## Surrogate splits:
## Spa < 0.5 to the right, agree=0.725, adj=0.292, (0 split)
## FoodCourt < 0.5 to the right, agree=0.718, adj=0.275, (0 split)
## VRDeck < 0.5 to the right, agree=0.711, adj=0.257, (0 split)
## ailenum splits as ---------------L---------------RL----------L-----------L-----LR-LL--R---L------L-------L--L-L----------L-L--------L--------L-------------L-------R---------------L--------L----------------L--------------------------L-----------------------L--------R----------------------------R-R------L--L---------L------------L---L---R---------L--------------------L--R-----L----------L--L--R---L--R-----L----R---------R-L-R--------RL--------L----------R----L------L-------------L-----L--L--------L-R------------------R-R----L-L---L-----------------------L-LL------L-----L---------------------------------RL---L--------L------L--RL--L--L-L----------------------------L----L---L-------L--L--------------L-----------------------------------------L-L----------LL----------L----------L-----LLL--L----------------------------L----------------L-----------------------------------R-----R----L--L----L----R--L----------L---L-----L-------L-----L-----------------L-------------R-L--------------LL-L-------------------L---L------L----------------------------------L------------L---------L-------L--L--L------------------R-L-------------------------------LL---------L------L-------L---------------L-L----------------------R--------L------------------R-------L----L----------------------L------------LR----------------------L-L----------------R-----L------------R-----L--R-----------------L--------L-L-L-----L---L-------------------------R--------L---------------------------L------------------L-------------L-----------------------------------------------------------LL-R----------------LL-------LR--L-----------------------------L-L---------------------------R------------------------------------L-----L-L-------------LL-----L--L------------L-L----------R-----LLL--------------L--L------------------------L----------------------------------L---------L----RL--L--------------------------------L---------L--LL----------------R----L---------------------L------------------L-------L--------------R----------------------------------------------L-L---------------L--L-----------L--------R------L------------L-----L------------L----------------------------------------L-----------------------------------------------------L------L---L---R-----L------------------------R----------L---R---------L------L--------------L------------------LLL-----------------------R-RLL---LL---L----L-L------R--L------L--L----------L---L-----------------------L-----------L----L---L-----------L----------------------LL-------L--L--LL--R----L----L--L-L--R---L----------L-------------------------------------L------------------------------------L----L--R-------------L---L----R--LL-------------------------L--L-----------------------RL--L-----------------------------L---------R---L---------------------------------------L-------------------------------L---LR-------------L--R--------------------------------------------L---------------------LR-L--------L-------------------L------------------L-------R-------L------------------------------L---L-------------L----L---L-L-------------L-------L-------------------------------------L---------------------L-----------------------------------------------L-----------L---L-L-L---R--L--------L--L--------------------------R---L----------L--------------------------------L-----------------------------------------------L-------------L-----------------------LL-L---L---------------R------L---------------L--L-----R-L----L--------------L--------------------LL--------L---L--------L-------L----------------R------L-LL--------------------------------------------------------------------LL--------L-------------L------------------------------L-----------------L----L----------------------------------------------LR---------------LL--------L---LL----------------------L-----L-----L----------------LL----------------------L-------LL---------R---------L----------------LL----------L--------------------------------------------------L-L--R-----------------------------------L-L------------L-L----------------------L------R----------L-------RL---L-L-------L-LLL-----------------L---------------L---RLLL--L---------------------------------L---L---------L--------L---------------------L--------------------------------------L------L-----------------------LL-------------------------L-L---------R-LLL---------L------------------L----L---------R----L--L------------L------------LLR---L-------------R---------R----L-----------L------RL-------------------L-L--------R-----L--L-----------L------L--L------------------------L--L-L--LL-L------------------------R----------L-----L--RL-L---L--L-R--------L-L----------------R------L-L-----------------L--L--LL------L---------L-L-----L-----L-------------L----------------------------------L-L-L----------L-L----------L----L-------------------------------L-------R----------R---L-----L--------L---------------L------------L--------L--------------L------L-----------------L-----L-------------------R------------------------------------------LR----------------------L---------------L----------------------------------------L-----L------R-L------L-L-----L--------------------L------L-----LL---------L---L-----------L---------L-L--R------------L-----------------------------------------------L---L---------------------------L---------L---------------L--L----------L-----------------L-----L------RL--------------------------L----L----L----------L----R------------------L-R-L-----------------------R----L---L-R-----L------L--------L--L---------R-------------L------LL--R---L---------------L---------L----------------L-----L-----------------L----LL----------------------L-L---L---L---L-----------R--L-----------------------------------------------L-------L---------LLL--------L-------------------------------------------R--L--------L-L--------R--------------L---LR---------L-L------------LL--L----L-----L--------------L-------------L--------------------L------------------L-------LL--L---L---------------------------L---------------L----R---------------------------------------------------L--L-----L-----------------RL---L------------------L--------L-------L---L---------LR--L---L---L--------L-----------------L-----------L----L---R----L--------R-------------LL-----L----LL-----R-L------------------------L-L---L, agree=0.700, adj=0.227, (0 split)
## RoomService < 0.5 to the right, agree=0.665, adj=0.137, (0 split)
##
## Node number 7: 3237 observations
## mean=0.9919679, MSE=0.007967613
##
## Node number 12: 1025 observations, complexity param=0.02910718
## mean=0.377561, MSE=0.2350087
## left son=24 (317 obs) right son=25 (708 obs)
## Primary splits:
## ailenum splits as ---------------R----------------L----------R-----------R-----LL-RR--R---R------L-------L--L-L----------R-L--------R--------R-------------R-------L---------------R--------L----------------L--------------------------R-----------------------L--------L----------------------------L-L------R--R---------L------------R---R---L---------L--------------------L--------L----------L--R--L---L--L-----R----L-----------R-L--------RR--------R----------L----R------R-------------L-----L--L--------R-R------------------L-L----R-L---R-----------------------R-RR------R-----R----------------------------------R---R--------R------L--LR--L--R-R----------------------------L----R---R-------R--R--------------R-----------------------------------------R-L----------LR----------R----------L-----LLR--L----------------------------L----------------L-----------------------------------L-----L----R--L----L----L--R----------L---R-----L-------R-----R-----------------R-------------L-L--------------LL-R-------------------R---R------R----------------------------------L------------R---------R-------R--R--L------------------R-R-------------------------------LR---------R------L-------L---------------R-L----------------------R--------L------------------L-------L----L----------------------R------------LR----------------------R-R----------------L-----R------------L-----R--L-----------------R--------L-R-R-----L---R----------------------------------L---------------------------L------------------R-------------R-----------------------------------------------------------RR-L----------------LL-------RL--R-----------------------------R-L----------------------------------------------------------------R-----L-L-------------LL-----R--R------------L-L----------L-----RLL--------------L--L------------------------L----------------------------------R---------L----LL--R--------------------------------L---------R--LL----------------L----R---------------------R------------------L-------R--------------L----------------------------------------------R-L---------------R--R-----------L--------L------L------------L-----R------------L----------------------------------------L-----------------------------------------------------R------L---R---------L------------------------L----------R---L---------L------L--------------R------------------LLR-------------------------LRR---RR---L----L-R---------L------L--L----------L---L-----------------------R-----------R----R---L-----------R----------------------LL-------R--L--RR--L----L----L--R-L------L----------L-------------------------------------L------------------------------------R----R--L-------------R---L----L--RL-------------------------R--R-----------------------LR--R-----------------------------R---------L---L---------------------------------------R-------------------------------L---RL-------------R--L--------------------------------------------L---------------------RL-R--------R-------------------L------------------L-------L-------R------------------------------R---R-------------L----L---R-L-------------R-------R-------------------------------------L---------------------R-----------------------------------------------R-----------R---L-L-R------R--------R--L--------------------------L---L----------R--------------------------------L-----------------------------------------------L-------------R-----------------------LL-R---R---------------L------L---------------R--L-----L-L----L--------------R--------------------RR--------R---L--------L-------L-----------------------R-RL--------------------------------------------------------------------RL--------L-------------L------------------------------R-----------------R----R----------------------------------------------R----------------LR--------L---LL----------------------L-----L-----R----------------LL----------------------R-------RL---------L---------R----------------RL----------R--------------------------------------------------R-R--R-----------------------------------R-R------------R-R----------------------L------L----------L-------LL---R-R-------R-RLR-----------------L---------------R---LLRR--R---------------------------------L---R---------L--------R---------------------L--------------------------------------R------R-----------------------LL-------------------------R-L---------L-RRL---------R------------------R----R---------L----R--R------------L------------RLL---L-------------L---------L----R-----------R------LL-------------------R-R--------------R--R-----------R------L--L------------------------R--R-R--RR-R------------------------L----------R-----R---L-R---L--R-L--------R-R----------------R------L-R-----------------R--L--LR------L---------R-R-----R-----L-------------R----------------------------------R-L-L----------R-R----------R----R-------------------------------L-------L----------L---R-----R--------L---------------L------------R--------R--------------R------R-----------------R-----L-------------------L------------------------------------------R-----------------------L---------------L----------------------------------------L-----R------L-R------R-L-----L--------------------R------R-----RR---------L---L-----------R---------L-R--R------------L-----------------------------------------------L---L---------------------------L---------L---------------L--R----------L-----------------R-----R------LL--------------------------L----L----R----------L-----------------------R-L-R-----------------------L----R---L-R-----L------R--------R--R---------L-------------L------RR--L---R---------------R---------L----------------R-----R-----------------R----LL----------------------R-R---R---L---L-----------L--R-----------------------------------------------L-------L---------RLR--------L-------------------------------------------L--R--------R-R--------L--------------R---LL---------L-L------------RR--R----L-----R--------------R-------------L--------------------R------------------L-------LR--R---R---------------------------L---------------L----L---------------------------------------------------R--R-----R-----------------LR---L------------------R--------R-------L---L---------LR--R---R---R--------L-----------------L-----------L----R--------L--------L-------------RR-----L----RR-----L-R------------------------R-R---R, improve=0.26259070, (0 missing)
## Age < 12.5 to the right, improve=0.14269010, (0 missing)
## Spa < 420 to the right, improve=0.09687267, (0 missing)
## RoomService < 249.9754 to the right, improve=0.08111019, (0 missing)
## VRDeck < 87.5 to the right, improve=0.07744737, (0 missing)
## Surrogate splits:
## Spa < 2110.5 to the right, agree=0.704, adj=0.044, (0 split)
## VRDeck < 2266 to the right, agree=0.704, adj=0.044, (0 split)
## VIP splits as RLR, agree=0.695, adj=0.013, (0 split)
## RoomService < 3243 to the right, agree=0.694, adj=0.009, (0 split)
##
## Node number 13: 651 observations, complexity param=0.0131094
## mean=0.890937, MSE=0.09716825
## left son=26 (124 obs) right son=27 (527 obs)
## Primary splits:
## ailenum splits as -------------------------------LR----------R-----------R-----RR-----L---R------R-------R--R-R----------L-R-----------------R-------------R-------R------------------------R----------------R--------------------------------------------------R--------R----------------------------R-R-------------------R--------------------R---------R--------------------R--L-----R----------R-----R---R--R----------R---------L-R-R--------L--------------------R-------------------------R-----R--R----------L------------------R-R------R---R--------------------------R----------------------------------------------L----L---------------R--R---R---------------------------------R--------R-------R--R--------------------------------------------------------L-R----------R-----------L----------R-----RR---R----------------------------R----------------R-----------------------------------R-----R----L--R----R----R-------------R---R-----R-------------L-------------------------------R-R--------------RR-------------------------R------R----------------------------------R----------------------R-------R-----R------------------L---------------------------------R-----------------R-------R-----------------R----------------------L--------R------------------R-------R----R-----------------------------------RL------------------------R----------------R------------------R--------R-----------------L--------R---------R-----------------------------L--------R---------------------------R------------------R-------------R-----------------------------------------------------------RR-R----------------RR--------R--L-----------------------------R-R---------------------------L------------------------------------------R-R-------------RR---------------------R-R----------R------RR--------------R--R------------------------R----------------------------------R---------R----RR-----------------------------------R------------RR----------------R---------------------------------------------R----------------------R------------------------------------------------R------------------------------R--------R------R------------R-----R------------R----------------------------------------R-----------------------------------------------------L------R-------L-----R------------------------R----------R---R---------R------R--------------R------------------RRR-----------------------L-RR----LR---R----R--------L--R------R--R----------R---R-----------------------------------R--------R-----------R----------------------RR-------R--R------R----R----R----R--L---R----------R-------------------------------------R------------------------------------L-------R-------------R---R----R---R----------------------------------------------------RL--L-----------------------------R---------R---R---------------------------------------R-------------------------------R---RR----------------R--------------------------------------------R----------------------R----------R-------------------R------------------R-------R-------R------------------------------R---R-------------R----R---L-R-----------------------------------------------------------R---------------------------------------------------------------------R-----------R---R-R-R---L--------------R--------------------------R---R-------------------------------------------R-----------------------------------------------R-------------R-----------------------RR---------------------R------R---------------R--R-----R-R----R---------------------------------------------R---R--------R-------R----------------L---------R--------------------------------------------------------------------RR--------R-------------R------------------------------------------------R---------------------------------------------------RL---------------R---------R---RR----------------------R-----R----------------------RR----------------------R-------LR---------R--------------------------LR------------------------------------------------------------------R-----------------------------------R--------------R------------------------R------R----------R-------RR---R-R----------R------------------R-------------------RRL-------------------------------------R-------------R------------------------------R---------------------------------------------------------------------RR-------------------------R-R---------R---R---------------------------------R---------R-------R------------R------------RRR---R-------------L---------R----R-----------R------RR------------------------------L-----L--------------L------R--R------------------------R--R----RR-R------------------------R----------------R--LR-----R----R----------R----------------L------R-R-----------------R--R--R-------R-----------------R-----R--------------------------------------------------R-R----------------------------L-------------------------------R-------R----------R------------------R---------------R------------R--------R---------------------L-----------------------R-------------------R------------------------------------------RL----------------------R---------------R----------------------------------------R-----R------R--------L-R-----R--------------------R------------RR---------R---R---------------------R----L------------R-----------------------------------------------R---R---------------------------R---------R---------------R-------------R-----------------------L------RR--------------------------R----R----R----------R----L--------------------R-R-----------------------R--------R-L-----R------L--------R--R---------R-------------R------RR--R---R---------------L---------R----------------------------------------R----RR------------------------R-------R---R-----------R--R-----------------------------------------------R-------R----------RR--------R-------------------------------------------R-------------R--------R--------------R---RR---------R-R------------RL--R----R----------------------------------R--------------------R------------------R-------R-------L---------------------------R---------------R----R---------------------------------------------------R--------R-----------------LR---R---------------------------R-------R---R---------RR--L---L---L--------R-----------------R-----------R----R---L----R--------L--------------------R-----R-----R-R-------------------------------, improve=0.45036460, (0 missing)
## deck splits as RRRRLRL-, improve=0.11754260, (16 missing)
## HomePlanet splits as LRRR, improve=0.09976461, (0 missing)
## Age < 12.5 to the left, improve=0.02356719, (0 missing)
## Destination splits as RLLR, improve=0.01419214, (0 missing)
## Surrogate splits:
## ailesira splits as RRRRRLRL, agree=0.817, adj=0.04, (0 split)
##
## Node number 24: 317 observations
## mean=0.006309148, MSE=0.006269343
##
## Node number 25: 708 observations
## mean=0.5437853, MSE=0.2480828
##
## Node number 26: 124 observations
## mean=0.4596774, MSE=0.2483741
##
## Node number 27: 527 observations
## mean=0.9924099, MSE=0.007532523
“rpart” paketini kullanarak bir karar ağacı (decision tree) modelini eğitir ve bu modelin özet istatistiklerini görüntüler.
rpart.plot(fit_tree)
## Warning: labs do not fit even at cex 0.15, there may be some overplotting
rpart.plot fonksiyonu, “rpart” paketindeki bir karar ağacını görselleştirmek için kullanılır.
y_pred = ifelse(preds == TRUE,TRUE,FALSE)
“preds” veri çerçevesindeki her bir gözlem için “TRUE.” sütunundaki değeri kontrol eder ve bu değer “TRUE” ise 1, değilse 0 olarak sınıflandırır.
Transported <- as.character(y_pred)
PassengerId<- test$PassengerId
daha önce oluşturulan “y_pred” vektöründeki sınıflandırılmış sonuçları karakter dizisine (as.character) dönüştürür ve bu değerleri “Transported” adlı yeni bir vektöre atar. Aynı zamanda, “test” veri çerçevesindeki “PassengerId” sütununu “PassengerId” adlı başka bir vektöre atar
Transported<- as.vector(Transported)
“Transported” adlı vektörü as.vector fonksiyonu kullanarak bir vektör olarak günceller. as.vector fonksiyonu, belirli bir veri yapısını vektöre dönüştürmek için kullanılır
submission <- cbind(PassengerId, Transported)
“PassengerId” ve “Transported” vektörlerini birleştirerek yeni bir veri çerçevesi olan “sample_submission”ı oluşturur. cbind fonksiyonu, sütunları birleştirmek için kullanılır ve bu durumda “PassengerId” ve “Transported” sütunları “sample_submission” veri çerçevesini oluşturur.
submission <- as.data.frame(submission)
“sample_submission” adlı nesnenin tipini veri çerçevesine dönüştürür. Yani, “sample_submission” nesnesinin içeriği aynı kalmakla birlikte, artık bir veri çerçevesi olarak ele alınacaktır
submission$Transported <- str_to_title(submission$Transported)
str_to_title fonksiyonu, “stringr” paketinde bulunan bir fonksiyondur ve bir karakter dizisindeki her kelimenin baş harfini büyük yapar.
write.csv(submission, "submission_.dtree", row.names =FALSE, quote=FALSE)
Bu kodu çalıştırdığınızda, “submission” veri çerçevesi “submission_.dtree” adlı bir CSV dosyasına yazılır. Bu dosya, tahmin sonuçları veya diğer veri çerçevesi içeriğini içerir ve genellikle analiz veya raporlama amacıyla kullanılır.