Datos: Ranking de empresas en florida central en 2003.
¿Que empresas ocuparon los primeros puestos en florida central en el año 2003?
df <- data.frame(Empresas =
c("Disney World",
"Florida Hospital",
"Publix Supermarkets Inc",
"Wal-Mart Stores Ind",
"Universal Orlando"),
Asalariados =
c(51600,
19283,
14995,
14995,
12000))
knitr::kable(df)
| Empresas | Asalariados |
|---|---|
| Disney World | 51600 |
| Florida Hospital | 19283 |
| Publix Supermarkets Inc | 14995 |
| Wal-Mart Stores Ind | 14995 |
| Universal Orlando | 12000 |
head(df)
## Empresas Asalariados
## 1 Disney World 51600
## 2 Florida Hospital 19283
## 3 Publix Supermarkets Inc 14995
## 4 Wal-Mart Stores Ind 14995
## 5 Universal Orlando 12000
library(ggplot2)
ggplot(data=df, aes(x=Empresas, y=Asalariados)) + geom_bar(stat="identity")