GGPLOT2:如何在ggplot()脚本中绘制特定的选择

ad_*_*d_s 2 r ggplot2

这是一个名为大型数据集的高峰P,其中有10个特许经营者(CS)具有不同的商店(SHP),其中包含多个数值.数据集按周(WK)2 tm 52 列出它们.它创建一个大文件.只有6个第一行的峰值:

WK,MND,CS,SHP,RevCY,RevLY,TCY,TLY,ACY,ALY
=========================================
2,JAN,AAA,AAA Shop 1,16834,16686,1837,1983,2853,3002 

2,JAN,AAA,AAA Shop 2,95919,114696,9742,11813,20521,24673

2,JAN,BBB, BBB shop 1,93428,92212,7647,7857,18436,17984

2,JAN,BBB, BBB Shop 2,30600,35831,2748,3063,5579,6408

2,JAN,CCC, CCC Shop 1, 65229,78761,6074,7172,13852,16706

2,JAN,CCC, CCC Shop 2,465,754,73,118,92,162
Run Code Online (Sandbox Code Playgroud)

我很难只绘制关注fi的值SHP==AAA.

p <- ggplot(P, aes(WK, RevCY)) + geom_bar(stat="identity")
Run Code Online (Sandbox Code Playgroud)

这是所有商店和所有商店的密谋CS.因此,基本问题是要了解我如何只绘制商店(SHP)CS=AAA.让我们说代码中WKx轴和RevCYy轴上的周()ggplot() + geom_bar(stat="identity").

这是正确的方向吗?:

p <- ggplot(P[P$CS=="AAA"], aes(WK, RevCY)) + geom_bar(stat="identity")
Run Code Online (Sandbox Code Playgroud)

因此,无需创建各种子集并直接进入ggplot()代码.希望我的问题很明确.

小智 6

这对你有帮助吗?

ggplot(t, aes(WK, RevCY)) + geom_bar(data=subset(t,CS=="AAA"),stat="identity")
Run Code Online (Sandbox Code Playgroud)