#RStudio Version 1.2.5019 sessionInfo() # R version 3.6.2 (2019-12-12) #Platform: x86_64-w64-mingw32/x64 (64-bit) #Running under: Windows 10 x64 (build 17134)
Hello, I am sure I am missing something simple. Here is my data, its aggregated and if need be I can unaggregate I guess: dput(tmp) structure(list(InOutFlagAlpha = c("NO ", "YES", "NO ", "YES", "NO ", "YES", "NO ", "YES", "NO ", "YES", "NO ", "YES", "NO ", "YES", "NO ", "YES", "NO ", "YES", "NO ", "YES"), ProductLineFlag = structure(c(1L, 1L, 2L, 2L, 1L, 1L, 2L, 2L, 1L, 1L, 2L, 2L, 1L, 1L, 2L, 2L, 1L, 1L, 2L, 2L), .Label = c("ACH", "CARD"), class = "factor"), Region = structure(c(1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L, 5L, 5L, 5L, 5L), .Label = c("Frontier", "Midwest", "Northeast", "Pacific", "South"), class = "factor"), ProductLineID = c(7163L, 34212L, 35891L, 54177L, 8873L, 34008L, 52017L, 67881L, 7408L, 29430L, 64108L, 70532L, 5984L, 21720L, 49030L, 60211L, 7330L, 34876L, 46387L, 75893L)), row.names = c(NA, -20L), class = "data.frame") |InOutFlagAlpha |ProductLineFlag | Region| ProductLineID| |:--------------|:---------------|---------:|-------------:| |NO |ACH | Frontier| 7163| |YES |ACH | Frontier| 34212| |NO |CARD | Frontier| 35891| |YES |CARD | Frontier| 54177| |NO |ACH | Midwest| 8873| |YES |ACH | Midwest| 34008| |NO |CARD | Midwest| 52017| |YES |CARD | Midwest| 67881| |NO |ACH | Northeast| 7408| |YES |ACH | Northeast| 29430| |NO |CARD | Northeast| 64108| |YES |CARD | Northeast| 70532| |NO |ACH | Pacific| 5984| |YES |ACH | Pacific| 21720| |NO |CARD | Pacific| 49030| |YES |CARD | Pacific| 60211| |NO |ACH | South| 7330| |YES |ACH | South| 34876| |NO |CARD | South| 46387| |YES |CARD | South| 75893| I am trying to get the value from ProductLineID into the bars I have slowly stepped through to the point of having everything but the values. Appreciate any advice, thank you. WHP #1 ggplot(tmp, aes(x=Region, y=ProductLineID, fill=Region)) + geom_bar(stat = "identity") #2 ggplot(tmp, aes(x=Region, y=ProductLineID, fill=Region)) + geom_bar(stat = "identity") + facet_grid("InOutFlagAlpha") #3 ggplot(tmp, aes(x=Region, y=ProductLineID, fill=Region)) + geom_bar(stat ="identity") + facet_grid("InOutFlagAlpha") #4 ggplot(tmp, aes(x=Region, y=ProductLineID, fill=Region)) + geom_bar(stat ="identity",position = 'dodge') + facet_grid("InOutFlagAlpha") #5 ggplot(tmp, aes(x=Region, y=ProductLineID, fill=ProductLineFlag)) + geom_bar(stat ="identity",position = 'dodge') + facet_grid("InOutFlagAlpha") #6 ggplot(tmp, aes(x=Region, y=ProductLineID, fill=ProductLineFlag)) + #Best so far geom_bar(stat ="identity") + geom_col() + facet_grid("InOutFlagAlpha") #7 ggplot(tmp, aes(x=Region, y=ProductLineID, fill=ProductLineFlag)) + #Not working geom_bar(stat ="identity") + geom_col(position = 'dodge') + facet_grid("InOutFlagAlpha") WHP Confidentiality Notice\ \ This email and the attachments...{{dropped:11}} ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.