r - 采样后如何去除 R 热图中的未采样数据？

Question

以下代码生成热图，但在 y 轴上显示原始数据集中包含的所有 194 个国家/地区的标签（采样前）。即使我删除了原始数据集，这种情况也会继续发生。我还尝试关闭控制台以启动新会话，但无济于事。

qlife.s <- myData[sample(194,size=10,replace=F),]

qlife.s.m <- melt(qlife.s)

qlife.s.m <- ddply(qlife.s.m, .(variable), transform, rescale=rescale(value))

(p <- ggplot(qlife.s.m, aes(variable, qlife.s.m$Country))
      + geom_tile( aes(fill = rescale),
                   colour = "white")
      + scale_fill_gradient(low = "red", high = "green")
)

非常感谢任何建议。提前致谢。

Answer 1

用于droplevels()您的数据。从事情的外观来看：

qlife.s.m <- droplevels(qlife.s.m)

应该做你想做的事，但如果没有可重复的例子，很难说。