在 R 中使用云函数时出错答案

【问题标题】：Error using cloud function in R在 R 中使用云函数时出错
【发布时间】：2016-11-01 22:02:14
【问题描述】：

我正在尝试使用云函数（lattice 包）制作 3d 散点图，但出现无法调试的错误。

本质上，我想要完成的是看看随着时间的推移，汽油消耗量（英国）与司机死亡之间是否存在任何相关性。这是我目前所拥有的：

gas <- UKgas
dd <- UKDriverDeaths
dd.zoo <- zoo(dd)
ddq <- aggregate(dd.zoo, as.yearqtr, mean)
gas2 <- window(UKgas, start = c(1969,1), end = c(1984,4))
gasdeathq <- list(x = gas2, y = ddq)

quarters.f <- factor(c(1,2,3,4),levels = c(1,2,3,4), labels = c("Q1","Q2","Q3","Q4"))
cloud(gasdeathq$y~gasdeathq$x*time(gasdeathq$x)|quarters.f, main="3D Scatterplot by Quarter")

尝试绘制此数据时出现错误：“使用数据包 3 索引重叠时出错”

【问题讨论】：

标签： r cloud lattice

【解决方案1】：

好吧，它开始工作了......我摸不着头脑，因为一切都应该正常工作，但我认为它可能是时间序列/动物园类，所以我首先将所有内容强制转换为数字向量：

cloud(as.numeric(ddq)~as.numeric(gas2)*as.numeric(z)|quarters.f,xlab = "气体消耗", ylab = "年份", zlab = "司机死亡", main="按季度划分的 3D 散点图")

【讨论】：