サンプリング後に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) 

がありますが、再現可能な例がなければわかりにくいです。