Разделение данных временного ряда - PullRequest
0 голосов
/ 07 января 2019

Я пытаюсь разбить данные о землетрясении «А» на тестовый и тренировочный набор. Поскольку я использовал код для нарезки временных рядов, он выдал эту ошибку.

Error seq.default(1, min(ncol(x) - 1, len), by = 1) : wrong sign in 'by' argumentused.

Таким образом, это данные,

структура (список (Месяц. = C (9L, 9L, 7L, 3L, 5L, 1L, 6L, 6L, 6L, 2л, 2л, 1л, 10л, 9л, 7л, 6л, 5л, 5л, 4л, 1л), день. = с (19л, 22л, 24л, 20л, 20л, 7л, 29л, 18л, 16л, 23л, 17л, 26л, 22л, 9л, 17л, 12л, 16л, 11л, 27л, 25л), Mag. = c (7.1, 4.6, 4.5, 5.3, 4.9, 4.1, 4,5, 4, 5,8, 4,1, 4, 4,1, 4,3, 4, 4,1, 4, 4, 4, 4, 4), Lat = c (18,55, 18.02, 18.06, 18.07, 18.16, 18.18, 18.16, 18.06, 18.16, 18.17, 17,91, 18,09, 17,84, 17,82, 18,62, 17,84, 17,93, 17,72, 18,11, 18,08), Lon = с (-98,5, -98,4, -97,2, -98,52, -99,95, -99,72, -99,15, -100,02, -99,2, -99,37, -98,24, -99,58, -97,7, -99,93, -99,93, -97,74, -97,75, -99,85, -99,86, -99,98), Глубина км = c (51, 50,9, 69,7, 51,8, 62,7, 45,3, 59,6, 52,7, 52, 38, 49,4, 51,7, 64,8, 65, 75,7, 65,6, 63,7, 37,7, 52,1, 51,8), Day.since.Mw8.1.earthquake = c (11,55922454, -350,4447106, -410,5616088, -902,2633565, -1207,132525, -1339,944618, -1531.312454, -1542.510671, -1544.97941, -1657.711794, -1663.206956, -1685.732604, -1781.218218, -1824.403634, -1878.53603, -1914.132917, -1940.750532, -1945.763854, -1959.212801, -2052.762095)), row.names = c (NA, 20L), класс = "data.frame") **

Я использовал этот код для нарезки временных рядов

Я не знаю, что делать, чтобы устранить эту ошибку. Может кто-нибудь помочь мне?

library(caret)
library(ggplot2)
library(pls)


myTimeControl <- trainControl(method = "timeslice",
                              initialWindow = 36,
                              horizon = 12,
                              fixedWindow = TRUE)

plsFitTime <- train(Day.since.Mw8.1.earthquake ~ Mag.,
                    data = A,
                    method = "pls",
                    preProc = c("center", "scale"),
                    trControl = myTimeControl)
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...