RutinaRMarkdown

Informe de investigación

subtitulo2

subtitulo3

El proposito de esta investigación es visibilizar como el campo de la educación esta femenizado en las diferentes regiones de Colombia. La información que obtuvimos fue tomada de la base de datos del DANE https://www.dane.gov.co/files/operaciones/EDUC/bol-EDUC-2022.pdf

si se quiere poner la letra en negrilla se debe poder dos astericos antes y despues y cursiva con un solo asterisco

a continuación se incluye el codigo de R utilizado para hacer el analisis

Grafico de actitud hacia la democracia:

library(readr)
library(ggplot2)

## Warning: package 'ggplot2' was built under R version 4.5.2

latino23 <- read.csv("LATINO23.csv")

tab_far <- table(latino23$P18ST.A)
View(tab_far)

# 1: uniform color. Color is for the border, fill is for the inside
ggplot(latino23, aes(x=as.factor(P18ST.A) )) +
  geom_bar(color="blue", fill=rgb(0.1,0.4,0.5,0.7) )

# 2: Using Hue
ggplot(latino23, aes(x=as.factor(P18ST.A),
               fill=as.factor(P18ST.A) )) +
  geom_bar( ) +
  scale_fill_hue(c = 40) +
  theme(legend.position="none")

# 3: Using RColorBrewer
ggplot(latino23, aes(x=as.factor(P18ST.A), fill=as.factor(P18ST.A) )) + 
  geom_bar( ) +
  scale_fill_brewer(palette = "Set1") +
  theme(legend.position="none")

# 4: Using greyscale:
ggplot(latino23, aes(x=as.factor(P18ST.A), fill=as.factor(P18ST.A) )) + 
  geom_bar( ) +
  scale_fill_grey(start = 0.25, end = 0.75) +
  theme(legend.position="none")

# 5: Set manualy
ggplot(latino23, aes(x=as.factor(P18ST.A), fill=as.factor(P18ST.A) )) +  
  geom_bar() +
  scale_fill_manual(values = c("red", "green", "blue","orange") ) +
  theme(legend.position="none")

hacer descripción

## Including Plots

figura que represente la democracia

You can also embed plots, for example:

Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.