R语言上机作业，给出一个数据集，要求给我代码（并附带一定的注释和图形）
作业具体内容如下
首先进行白噪声检验和平稳性检验（给出结果）
第二步，选择合适模型进行拟合（arma等模型）
第三步，估计所选择模型的参数
第四步，对模型进行有效性检验，对参数进行显著性检验
第五步，对模型进行优化（至少两个模型，比如AIC和BIC）
第六步，进行预测，用最后10个数据预测501,502,503（使用优化过的模型，预测两次）
每一步的图形也要保留下来