其他比例尺在r中的第二个y轴

Question

我想在R中绘制一些东西，并且需要另一个具有不同比例尺的y轴。有特殊命令吗？我发现了一些提示，但是它们并没有太大帮助。我试图首先像这样绘制它：

A <- c(1975, 1976, 1977, 1978, 1979, 1980, 1981, 1982, 1983, 1984, 1985, 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016)
B <- c(11, 952, 116, 37, 130, 435, 159, 184, 465, 561, 456, 837, 649, 459, 531, 196, 265, 121, 184, 270, 1170, 273, 212, 357, 298, 518, 200, 108, 68, 52, 75, 158, 74, 78, 242, 251, 371, 493, 242, 396, 53, 95)
C <- c(0, 313, 11, 0, 26, 59, 13, 13, 40, 223, 159, 109, 65, 68, 38, 14, 15, 21, 9, 25, 11, 24, 31, 50, 49, 185, 47, 72, 29, 13, 22, 17, 10, 34, 22, 7, 9, 10, 8, 18, 11, 17)
plot(A,B)
lines(A,C, type="b")

但是它只是使它们成为一个带有y轴的图。

我将代码缩短了一点，其余的并不是那么重要。我想将b的ylim设置为1500，将c的ylim设置为350。轴图仅创建了另一个具有相同比例的轴。

我希望它看起来像这样：

你们中的任何人都可以帮助我吗？