regular-language - 用 R 语言运行离散小波变换

Question

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

我尝试过以下数据格式；Year, Rain.

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

尚未将 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

请提供示例帮助，以便我理解为什么会出现此错误