r - ggplot積み上げファセットの非表示のラベル

Question

ラベルがうまく収まるように、ファセットの ylim を特定の割合だけ増やす方法はありますか? 現時点では、非常に小さなバーの上にハーフ カット オフ ラベルが表示されます。hjust を使用すると、大きなバーの上部でも同じ問題が発生します。

これまでの私のコードは次のとおりです。

ggplot(test, aes(x=YEAR, y=(value), fill=variable)) +
   labs(title="Test", x=NULL, y="Total", fill=NULL) + 
   geom_bar(stat="identity"), position="stack") + 
   facet_grid(variable ~., scales="free") +
   theme(legend.position = "none") + 
   geom_text(aes(x=YEAR, y=(value), label=value), size=3)