Когда я пытаюсь преобразовать набор данных в R, никакие действия не выполняются

Question

Я пытаюсь увеличить или увеличить выборку набора данных в R с помощью функции "ovun.sample" в пакете ROSE, вычисления не выполняются.

mission <- read.csv(file.choose(), header = T)
colnames(mission) <- c("Gen", "Age", "Key_Comp", "Weight", "Height", "Pulse", "HBP", "LBP",
                           "RR", "PMH", "HB", "Urea", "Creatinine", "Arrival", "Arrival_State",
                           "Admsn_Type", "C2H", "B2P", "Concession", "Actl_Amt", "Stay", 
                           "ICU_stay", "Ward_stay", "Implant", "Implant_Cost", "GRL")

library(caTools)
set.seed(123)

split <- sample.split(mission, SplitRatio = 0.7)

train <- subset(mission, split == T)
test <- subset(mission, split == F)
over <- ovun.sample(GRL ~.,data = train, method = "over", N = 254)$mission

over$GRL
"NULL"

table(over$GRL)
"< table of extent 0 >"

Когда я запускаю "свыше $ GRL", Я получаю «NULL» в качестве ответа, а при запуске «table (over $ GRL)» я получаю «<таблица экстента 0>» в качестве результата. Я не могу перебирать или отбирать данные из набора данных. Может ли кто-нибудь помочь мне с этим?

Answer 1

Вот мой ответ из комментариев, для полноты:

mission <- read.csv(file.choose(), header = T)
colnames(mission) <- c("Gen", "Age", "Key_Comp", "Weight", "Height", "Pulse", "HBP", "LBP",
                           "RR", "PMH", "HB", "Urea", "Creatinine", "Arrival", "Arrival_State",
                           "Admsn_Type", "C2H", "B2P", "Concession", "Actl_Amt", "Stay", 
                           "ICU_stay", "Ward_stay", "Implant", "Implant_Cost", "GRL")

library(caTools)
set.seed(123)

split <- sample.split(mission, SplitRatio = 0.7)

train <- subset(mission, split == T)
test <- subset(mission, split == F)

# this line was the problem - it should end $data, not $mission
over <- ovun.sample(GRL ~.,data = train, method = "over", N = 254)$data