1

私は両方のパッケージ ( gganimate と ggrepel ) を数日間使用してきましたが、視覚化に関しては非常に役立つと言わざるを得ません。とはいえ、それらを組み合わせる方法はないかと考えていました。

最後に、いくつかのコミュニティ (フランス) について、各コミュニティ (18 のコミュニティ) のスタッフの支出額と機器の支出額、および 2011 年から 2015 年までのこの裁定取引の進化をプロットしてみました。 .

したがって、興味深いのは、ggrepel を使用してポイントを適切なコミュニティに関連付け、gganimateを使用してこれらのポイントが時間の経過とともにどのように進化するかを確認することです。

ここに私のコードの一部があります:

p <- ggplot(df) + 
          geom_point(aes(Equip, Staff, size=population, color=factor(Type), frame=Year)) + 
          scale_size(range = c(2,10)) +
          geom_label_repel(aes(Equip, Staff, fill = factor(Type),
                           label = Name),
                           size=2.5,
                           fontface = 'bold',
                           color = 'white',
                           box.padding = unit(2.5, "lines"),
                          point.padding = unit(0.1, "lines"),
                          segment.color = 'grey50',
                          segment.size = 1,
                          max.iter = 20000, alpha = .7) +
          facet_wrap(~other_variable, scales = "free")
gganimate(p,interval = 3,
          ani.width = 1064,
          ani.heigth = 768)

私の問題は、gganimateが各フレーム (つまり年) のポイントのみを更新し、実際に印刷されているフレームを破棄してすべてのラベルを印刷することです。

たとえば、2011 年に都市A の座標が(100, 200)で、2012 年に(150, 200)の場合、2011 年の最初の座標に A を印刷し、2012 年の最初の座標に A を印刷する代わりに、両方の年の各座標にラベルを印刷します。 2012 年の 2 番目の座標。

誰でもこの問題の解決策を持っていますか?

どうもありがとう。

4

0 に答える 0