Datos: Ranking de empresas en Florida central 2003
¿Qué empresas ocuparon los primeros puestos en Florida central en 2003?
df <- data.frame(Empresa =
c("Tierra Santa",
"D1",
"Justo y bueno",
"Olimpica",
"ISIMO"),
Asalariados =
c(51600,
19283,
14995,
14995,
12000))
knitr::kable(df)
| Empresa | Asalariados |
|---|---|
| Tierra Santa | 51600 |
| D1 | 19283 |
| Justo y bueno | 14995 |
| Olimpica | 14995 |
| ISIMO | 12000 |
library(ggplot2)
ggplot(data=df, aes(x=Empresa, y=Asalariados)) + geom_bar(stat="identity")