statistical graphics with R

references:
- ggplot2 documentation

barplot

reference:
- Moore, et al., EPS, chapter 3, example 3.8, p.86

gps <- read.table("data/gps.txt", header=TRUE)
str(gps)
## 'data.frame':    5 obs. of  2 variables:
##  $ Company    : Factor w/ 5 levels "Garmin","Magellan",..: 1 5 2 3 4
##  $ MarketShare: int  47 19 17 7 10

Color by company

ggplot(gps, aes(Company, MarketShare, fill = Company)) +
  geom_bar(stat = "identity") +
  labs(title = "GPS")