Передача временного ряда в функциях modwt дает ошибку - PullRequest
0 голосов
/ 26 июня 2019

У меня есть фрейм данных, состоящий из различных значений фондовых индексов страны на ежедневной основе.Я конвертирую его во временные ряды, а затем передаю в функцию modwt для расчета дисперсии.Это дает мне ошибку.но если я передаю один столбец данных напрямую, то я не получаю ошибку, но я предполагаю, что мы должны преобразовать данные во временные ряды перед применением функции modwt.Я прав?а также может кто-нибудь предложить мне правку в коде.

ссылка на CSV-файл: https://drive.google.com/file/d/1bG0NA20tgWUHqzB1kqdi8lr-76LL8zPx/view?usp=sharing

library(waveslim)
library(xts)


df<- read.csv("multi_country.csv")

df <-na.omit(df)

Aff <- xts(df[,-1], order.by=as.Date(df[,1], "%m/%d/%Y"))

A <- Aff$NYSA

A <- diff(log(A))
J <- 8
#Choose the type of wavelet filter: la8 or d4
wf <- "la8"

## VARIABLE A Calculate MODWT for variable A
A.modwt <- modwt(A, wf, J)
...