我有一个数据库,其中包括1985 - 2012年间不同年份的法律.我想为每年制作不同的17个图(因此,制作一个函数),包括它的'值和前几年,并为每个图保持相同的x和y轴设计,如你所见在如下图所示:

这就是我在1985年至2012年间制作上图的方式:
> v <- ddply(leg.by.melt, .(year), summarise, count = sum(value))
> v
year count
1 1985 2
2 1987 5
3 1988 9
4 1989 12
5 1990 14
6 1991 11
7 1992 16
8 1993 23
9 1994 25
10 1995 10
11 1996 11
12 1997 24
13 1998 35
14 1999 32
15 2000 24
16 2001 22
17 2002 65
18 2003 42
19 2004 56
20 2005 42
21 2006 …Run Code Online (Sandbox Code Playgroud)