毎回

言われるんだよなー。「ブレイク」以外にいい言葉があれば教えて欲しい・・・。正直これほど端的かつキャッチーな言葉もないと思うので、きっとこれからも使い続けるでしょう。
ま、それはそうと。

> d <- read.table("clipboard")
> d
     V1 V2
1  1996  1
2  1997  2
3  1998  4
4  1999  7
5  2000  5
6  2001  9
7  2002  8
8  2003  9
9  2004  9
10 2005  8
11 2006 15
12 2007 22
> palette <- c("#1E5692", "#3E9A3B", "#F9A015", "#DA2025", "#7E377E")
> plot(V2 ~ V1, d, type="o", pch=16, col=palette[4], lwd=2, xaxt="n", xlab="year", ylab="appearance")
> lines(smooth.spline(d$V1, d$V2), col=palette[1])

んー、Rは楽ちん♪
データ元は 桑島法子 - Wikipedia の、年毎の出演作品数。