save(X,file="test.RData")這句代碼如果報(bào)錯(cuò)object X not found，是為什么，應(yīng)該怎么解決？
最有可能的原因是X的大小寫(xiě)錯(cuò)誤，找到正確的對(duì)象名稱(chēng)替換即可。
今天的學(xué)習(xí)內(nèi)容依然是ggplot繪圖
條形圖統(tǒng)計(jì)變換
ggplot(data=diamonds)+
geom_bar(mapping = aes(x=cut))
image.png
這里得到的count在原數(shù)據(jù)里并不存在，是geom_bar里stat參數(shù)默認(rèn)給cut這一列不同種類(lèi)計(jì)數(shù)得到的頻數(shù)，如果不想做這種變換，就采用原始的數(shù)據(jù)，可以將stat改為stat="identity"
ggplot(data=demo)+
geom_bar(mapping=aes(x=a,y=b),stat="identity")
位置調(diào)整
ggplot(data=diamonds)+
geom_bar(mapping = aes(x=cut,fill=clarity))
image.png
這里默認(rèn)是堆疊模式，還可以選擇 identity、fill、dodge
ggplot(data=diamonds)+
geom_bar(mapping = aes(x=cut,fill=clarity),position = "fill")
image.png
當(dāng)position=“dodge”
image.png
散點(diǎn)圖位置調(diào)整
當(dāng)散點(diǎn)圖中點(diǎn)過(guò)多時(shí)，很多點(diǎn)會(huì)出現(xiàn)重疊，position=“jitter”通過(guò)為每個(gè)數(shù)據(jù)添加一個(gè)很小的抖動(dòng)，可以將重疊的點(diǎn)分開(kāi)。
ggplot(data=mpg)+
geom_point(mapping=aes(x=displ,y=hwy),position = "jitter")
ggplot(data=mpg)+
geom_jitter(mapping=aes(x=displ,y=hwy))
坐標(biāo)系
coored_flip()可以交換x軸和y軸，非常適用于當(dāng)x軸標(biāo)簽非常長(zhǎng)時(shí)。
ggplot(data=mpg,mapping=aes(x=class,y=hwy))+
geom_boxplot()+
coord_flip()
image.png
bar <- ggplot(data=diamonds)+
geom_bar(mapping = aes(x=cut,fill=cut),show.legend = F,width = 1)+
theme(aspect.ratio = 1)+
labs(x=NULL,y=NULL)
bar+coord_polar()
image.png
總結(jié)
image.png
image.png
