ar.gm(x, order=1, wsave=T, effgm=<<see below>>, effloc=<<see below>>, b=T, c=<<see below>>, chr=<<see below>>, cbr=<<see below>>, iterh=4, iterb=1)
Martin, R. D. (1981). Robust methods for time series. In Applied Time Series Analysis II. D. F. Findley, ed. Academic Press, New York. pp. 683-759. Time Series chapter.
robar <- ar.gm(bicoal.tons,2)