在R语言中运行离散小波变换

Question

请有人帮助解决在R中运行离散小波变换的解决方案。

我尝试过以下数据格式; Year，Rain。

年份是1970,1972,1973 ......和Rain的形式是200,85,34,56 23,0.5 ...等我不知道我的数据框是否正确。或者如果我在运行之前需要对数据做些什么。

Haven没有将data.frame保存为wave，我跑了：

rain.dwt.01 <- wavDWT(wave) 

这是我的代码：

getwd()
setwd("C:\\Users\\dell\\Desktop\\ANN")
wave<-read.csv(file.choose(),header = T)
library(wmtsa)
library(wavelets)
library(waveslim)
library(MASS)
library(wavethresh) ### loaded auxillary functions from Internet
con <- url("faculty.washington.edu/dbp/R-CODE/workshop.Rdata")
print(load(con))
close(con)
lplot(wave)
abline(h=mean(wave),lty="dotted",col="red")
rain.dwt.01 <- wavDWT(wave)

我收到了这个错误：

Error in itCall("RS_wavelets_transform_discrete_wavelet_convolution",  : 
  (list) object cannot be coerced to type 'double

请帮助举例，以便我能理解为什么会出现此错误