r - ggplot2スタックラインプロットがおかしい

Question

私の積み重ねられたプロットは、後年、すべて不安定になります。誰かが私のコードを見て、どこが間違っていたのか教えてもらえますか? 私のコードはサンプルコードと同じだと思いました（両方とも以下）。

私は ggplot2 プロット スタッキングの経験があまりないので、単純なエラーを起こしている可能性があります。

次のようなものが欲しかった：

上記の積み上げプロットを生成するコードは、The R Graphics Cookbook の一部として入手でき、Revolutions R ブログ投稿で見つけることができます。
R Graphics Cookbook ライブラリ (ggplot2) ライブラリ (gcookbook)から

 ggplot(uspopage, aes(x=Year, y=Thousands, fill=AgeGroup)) +
 geom_area(colour="black", size=.2, alpha=.4) +
 scale_fill_brewer(palette="Blues", breaks=rev(levels(uspopage$AgeGroup)))

構文をかなり複製したと思いました。 しかし、私はどこかで間違いを犯したに違いないと私には思えます。

 lawsize <- as.data.frame(read.csv("https://raw.githubusercontent.com/EconometricsBySimulation/wild-monkey/master/usc.csv"))

 ggplot(lawsize, aes(x=Year, y=KB, fill=factor(Name)))+
 geom_area(colour="black", size=.2, alpha=.4)
 scale_fill_brewer(palette="Blues", breaks=rev(levels(lawsize$Name)))

この件についてご検討いただきありがとうございます。ふ