Набор данных Shift для нейронной сети в R - PullRequest
0 голосов
/ 06 мая 2018

Мне выдан файл Excel (см. Ниже), который содержит значения обменного курса для каждого дня в течение ряда дней и должен использовать следующую формулу:

Y(t+1) = f(Y(t), Y(t-1), Y(t-2))

чтобы сдвинуть данные ниже, чтобы создать еще 3 входа для нейронной сети, чтобы у меня было 4 столбца данных для обучения и тестирования нейронной сети MLP для предсказаний временных рядов. 't' представляет текущее значение.

Exchange Values
1.0621
1.0791
1.0927
1.0906
1.0986
1.0918
1.0891
1.0817
1.0741
1.0767
1.0876
1.0876
1.1006

1 Ответ

0 голосов
/ 06 мая 2018

Рассмотрим функцию embed:

Exchange_Values <- scan(text="1.0621
1.0791
1.0927
1.0906
1.0986
1.0918
1.0891
1.0817
1.0741
1.0767
1.0876
1.0876
1.1006")

Позволяет построить матрицу со смещением или смещением в значениях последовательности:

embed(Exchange_Values, 3)
        [,1]   [,2]   [,3]
 [1,] 1.0927 1.0791 1.0621
 [2,] 1.0906 1.0927 1.0791
 [3,] 1.0986 1.0906 1.0927
 [4,] 1.0918 1.0986 1.0906
 [5,] 1.0891 1.0918 1.0986
 [6,] 1.0817 1.0891 1.0918
 [7,] 1.0741 1.0817 1.0891
 [8,] 1.0767 1.0741 1.0817
 [9,] 1.0876 1.0767 1.0741
[10,] 1.0876 1.0876 1.0767
[11,] 1.1006 1.0876 1.0876
...