Archivo:UK Income by Age and Gender.png
Tamaño de esta previsualización: 800 × 471 píxeles. Otras resoluciones: 320 × 188 píxeles · 640 × 376 píxeles · 1024 × 602 píxeles · 1280 × 753 píxeles · 2560 × 1506 píxeles · 4250 × 2500 píxeles.
Ver la imagen en su resolución original (4250 × 2500 píxeles; tamaño de archivo: 240 kB; tipo MIME: image/png)
Resumen
| Descripción |
English: Median UK Income by Age and Gender 2012/13
Data from https://www.gov.uk/government/statistics/distribution-of-median-and-mean-income-and-tax-by-age-range-and-gender-2010-to-2011 ("Distribution of median and mean income and tax by age range and gender: 2012 to 2013") |
| Fecha | |
| Fuente | Trabajo propio |
| Autor | D Wells |
Licencia
Yo, el titular de los derechos de autor de esta obra, la publico en los términos de la siguiente licencia:
Este archivo está disponible bajo la licencia Creative Commons Attribution-Share Alike 4.0 International.
- Eres libre:
- de compartir – de copiar, distribuir y transmitir el trabajo
- de remezclar – de adaptar el trabajo
- Bajo las siguientes condiciones:
- atribución – Debes otorgar el crédito correspondiente, proporcionar un enlace a la licencia e indicar si realizaste algún cambio. Puedes hacerlo de cualquier manera razonable pero no de manera que sugiera que el licenciante te respalda a ti o al uso que hagas del trabajo.
- compartir igual – En caso de mezclar, transformar o modificar este trabajo, deberás distribuir el trabajo resultante bajo la misma licencia o una compatible como el original.
Source code
IncomeAge <- structure(list(Age = structure(c(1L, 2L, 3L, 4L, 5L, 6L, 7L,
8L, 9L, 10L, 11L, 12L, 13L, 1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 9L,
10L, 11L, 12L, 13L, 1L, 2L, 3L, 4L, 5L, 6L, 7L, 8L, 9L, 10L,
11L, 12L, 13L), .Label = c("Under 20", "20-24", "25-29", "30-34",
"35-39", "40-44", "45-49", "50-54", "55-59", "60-64", "65-69",
"70-74", "75 and over"), class = c("ordered", "factor")), Category = structure(c(1L,
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 3L, 3L, 3L, 3L,
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 2L, 2L, 2L, 2L, 2L, 2L, 2L,
2L, 2L, 2L, 2L, 2L, 2L), .Label = c("Both", "Female", "Male"), class = "factor"),
MedianIncome = c(11200L, 14500L, 19300L, 23400L, 25000L,
25100L, 25000L, 24500L, 23200L, 20400L, 19300L, 17200L, 17000L,
11500L, 15300L, 20000L, 25000L, 28100L, 29400L, 29600L, 29400L,
27200L, 23600L, 20900L, 17900L, 18800L, 10600L, 13700L, 18500L,
21200L, 21100L, 20100L, 20200L, 19500L, 19200L, 17100L, 17100L,
16000L, 15400L)), .Names = c("Age", "Category", "MedianIncome"
), row.names = c(NA, -39L), class = "data.frame")
library(ggplot2)
library(scales)
IncomeAge$Age <- factor(IncomeAge$Age,levels=c("Under 20","20-24","25-29","30-34","35-39","40-44","45-49","50-54","55-59","60-64","65-69","70-74","75 and over"),ordered=TRUE)
ggplot(data=IncomeAge,aes(x=Age, y=MedianIncome, colour=Category)) + geom_line(aes(group=Category),size=1) + labs(x="Age", y="Median Income Pre-Tax (£)", title="Income by Age and Gender in the UK", color="Gender") + theme_minimal() + theme(legend.position="bottom",axis.line = element_line(size = 0.5, linetype = "solid",colour = "black")) + scale_y_continuous(limits=c(0,30000),breaks=c(seq(from=0,to=30000,by=5000)),labels=comma)
ggsave(file="IncomeAge.pdf", width=8.5, height=5)
Historial del archivo
Haz clic sobre una fecha y hora para ver el archivo tal como apareció en ese momento.
| Fecha y hora | Miniatura | Dimensiones | Usuario | Comentario | |
|---|---|---|---|---|---|
| actual | 21:07 26 sep 2016 | | 4250 × 2500 (240 kB) | Cmdrjameson | Compressed with pngout. Reduced by 228kB (48% decrease). |
| 17:34 12 sep 2015 |  | 4250 × 2500 (469 kB) | D Wells | User created page with UploadWizard |
Usos del archivo
La siguiente página usa este archivo:
Uso global del archivo
Las wikis siguientes utilizan este archivo:
- Uso en en.wikipedia.org
