2

我有 2001-2009 年印度不同地点的天气变量数据，例如温度、降雨量等。

为了查看这些变量之间的关系，我使用 splom 和以下代码创建了一个散点图矩阵。

   library(lattice)
   library(RColorBrewer)
   splom(~aod_corr[c(5,8,11,14)], lower.panel = panel.splom,
  upper.panel = function(x, y, ...) {
      panel.fill(col = brewer.pal(9, "RdBu")[ round(cor(x, y) * 4 + 5)])
      panel.text(mean(x), mean(y), round(cor(x, y),2), font=2)
  },

 scales = list(x = list( draw = TRUE, cex=0.1)), type = c("g", "p", "smooth"),layout =     c(1, 1))

我现在希望确定每个面板中可以追溯到数据的异常值。我该怎么做？

4

2 回答 2

5

似乎这是该功能的工作panel.link.splom。见这里 http://procomun.wordpress.com/2011/03/18/splomr/

于 2012-12-29T11:54:36.630 回答
4

根据@Karsten 给出的链接，我给你一个与splom对象交互的场景：

  1. 我的阴谋
  2. 我识别面板
  3. 我使用链接 splom 选择了一些点
  4. 我逃跑以获得结果

细节：

  1. 我使用 lattice splom 创建了一个 splom

  2. 相互作用：

    ## I get the focus on the major panel (red color)
trellis.focus('panel', 1, 1)
## I link my panel to the splom
idx <- panel.link.splom(pch=13, cex=0.6, col='green')

  3. 我用鼠标选择了一些点。它们将涂成绿色

  4. 逃跑以获得焦点

  5. 检查结果

    str(idx)   num [1:5] 111 95 132 96 15
于 2012-12-29T16:18:50.790 回答