＞aqi ＜-read.table （“aqi.csv”, header ＝T, sep ＝“,”）<br>
＞x＜-ts (aqi, start ＝c（2014,1）, frequency ＝12)<br>
＞-x.dif ＜- diff （x）<br>
＞-acf （dif.x）<br>
画acf 图的时候横坐标刻度一直是小数，不是整数刻度，如果画acf ( aqi )的时候是可以的，但是我要的是差分以后的aqi ，不是差分之前的