如何在采样后去除R热图中的非采样数据？

Question

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

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)

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