如图（第一个）是《R语言实战》上的代码及结果，我照着做了一遍得到第二个图，请问是哪里出了问题？