R 预测使用寓言，如何使用特价？

在使用fable软件包进行预测时，我试图使用

特价产品

，但我不知道如何使用它们的语法，而且我还没有找到一个可以作为指导的示例

我在下面举了一个简单的例子，试图使用预测模型的窗口，但它给了我一个错误

非常感谢您的帮助

#加载库
图书馆（寓言）
#>警告：程序包“fable”是在R版本3.6.3下构建的
#>加载所需包：fabletools
#>警告：“fabletools”包是在R版本3.6.3下构建的
图书馆（TSIBLE）
#>警告：包“tsibble”是在R版本3.6.3下生成的
库（tsibbledata）
#>警告：包“tsibbledata”是在R版本3.6.3下生成的
图书馆（lubridate）
#>警告：“lubridate”软件包是根据R版本3.6.3构建的
#> 
#>附加包装：“lubridate”
#>以下对象已从“package:tsibble”屏蔽：
#> 
#>间歇
#>以下对象已从“package:base”屏蔽：
#> 
#>日期、相交、设置差异、联合
图书馆（dplyr）
#>警告：程序包“dplyr”是在R版本3.6.3下生成的
#> 
#>正在附加包：“dplyr”
#>以下对象被“package:lubridate”屏蔽：
#> 
#>交集、集差、并集
#>以下对象已从“package:tsibble”屏蔽：
#> 
#>身份证
#>以下对象已从“package:stats”屏蔽：
#> 
#>滤波器，滞后
#>以下对象已从“package:base”屏蔽：
#> 
#>相交、setdiff、setequal、并集
#运行示例
澳大利亚零售%>%
滤器(
以%c表示的州百分比（“新南威尔士州”、“维多利亚州”），
行业==“百货公司”
) %>% 
模型(
斯奈夫=斯奈夫（营业额），
平均值f=平均值（营业额、窗口（尺寸=12））
)
#>hasTsp（x）中出错：缺少参数“x”，没有默认值

由（v0.3.0）于2020年4月23日创建

sessionInfo（）
#>R版本3.6.2（2019-12-12）
#>平台：x86_64-w64-mingw32/x64（64位）
#>在以下环境下运行：Windows Server x64（内部版本17763）
#> 
#>矩阵乘积：默认值
#> 
#>区域设置：
#>[1]LC_COLLATE=English_irland.1252 LC_CTYPE=English_irland.1252
#>[3]LC_MONETARY=English_Ireland.1252 LC_NUMERIC=C
#>[5]LC_TIME=English_irland.1252
#> 
#>附加基本包：
#>[1]统计图形设备GRUTILS数据集方法库
#> 
#>其他随附包裹：
#>[1]dplyr_0.8.5润滑油_1.7.8 tsibbledata_0.1.0 tsibble_0.8.6
#>[5]寓言工具0.1.2寓言工具0.1.3
#> 
#>通过命名空间加载（未附加）：
#>[1]Rcpp_1.0.3编译器_3.6.2支柱_1.4.3高_0.8
#>[5]工具\u 3.6.2摘要\u 0.6.23评估\u 0.14生命周期\u 0.2.0
#>[9]TIBLE_3.0.1 GTBLE_0.3.0 anytime_0.3.7 pkgconfig_2.0.3
#>[13]rlang_0.4.5 yaml_2.2.0 xfun_0.12 stringr_1.4.0
#>[17]knitr_1.27泛型_0.0.2 VCTR_0.2.4网格_3.6.2
#>[21]整理选择_1.0.0胶水_1.4.0 R6_2.4.1标记_2.1
#>[25]purrr_0.3.4 ggplot2_3.3.0 tidyr_1.0.2 Magritr_1.5
#>[29]scales_1.1.0省略号_0.3.0 htmltools_0.4.0 assertthat_0.2.1
#>[33]色彩空间_1.4-1 stringi_1.4.5蒙塞尔_0.5.0蜡笔_1.3.4

fable软件包使用公式式接口进行型号规格说明，它与

lm（）

函数非常相似。特殊项包含在模型公式的右侧，如果支持多个特殊项，则可以添加这些特殊项。而不是

MEAN（营业额，窗口（大小=12））

，它应该是

MEAN（营业额~window（大小=12）

。对于

ARIMA（）

可以有许多特殊功能的模型，您可以使用

ARIMA（营业额~pdq（0,1,4）+pdq（3,1,0））

#加载库
图书馆（寓言）
图书馆（TSIBLE）
库（tsibbledata）
图书馆（lubridate）
图书馆（dplyr）
#运行示例
澳大利亚零售%>%
滤器(
以%c表示的州百分比（“新南威尔士州”、“维多利亚州”），
行业==“百货公司”
) %>% 
模型(
斯奈夫=斯奈夫（营业额），
平均值f=平均值（营业额~窗口（大小=12））
)
#>#A梅布尔：2 x 4
#>#重点：国家、行业[2]
#>国有工业企业
#>                             
#>1新南威尔士百货公司
#>2维多利亚百货公司

由（v0.3.0）于2020年5月8日创建