Geoms - ��� ����!"#$geom��%&'�geom�()*+,(aes)���-./�!"01&2343�5/�6�7�891& :�;� <=>?@ a <- ggplot(seals, aes(x =long, y =lat)) b<- ggplot(economics, aes(date, unemploy)) a +geom_blank() (軸を拡大するのに使う) a +geom_curve(aes(yend=lat +delta_lat, xend=long+delta_long, curvature=z)) x, xend, y, yend, alpha, angle, color, curvature, linetype, size b+geom_path(lineend="butt", linejoin="round’ , linemitre=1) x,