You definitely need to follow Sandy Muspratt's suggestions, but even then you'll have over 60 factors producing something like:
lawsize$Name <- factor(tolower(lawsize$Name))
lawsize = lawsize[!duplicated(lawsize), ]
gg <- ggplot(lawsize, aes(x=Year, y=KB, fill=Name))
gg <- gg + geom_area(colour="black", size=.2, alpha=.4)
gg <- gg + theme(legend.position="none")
gg
which is pretty, but—IMO—hardly informative. Perhaps thinking more about what story you're trying to communicate before picking a visualization would be in order?