p <- ggplot(data=mpg,mapping=aes(x=cty,y=hwy))+geom_point()print(p)summary(p)data: manufacturer, model, displ, year, cyl, trans, drv, cty, hwy, fl, class [234x11]mapping: x=cty, y=hwy世博Stone 学前 1 倒数第二行代码,不确定是 [234x11] 还是 [234*11] ...