geom_boxplot (aes(x=Type,y=Sales,color=Type))+ labs(title='Sales Distribution by Type') Type.model.B<-lm(Sales~Type,data=B.sales)
確定! 回上一頁