Kelly Alejandra Almeida Páez
E = mc^2
a^2 + b^2 = c^2
e^x = e^x$
_0e{-x} , dx = 1
_{n=1}^ =
=
^2 + ^2 = 1
f(x) = e^{-}
_{x } = 1
x =
F = G
_C d = -
x p
x =
= m
x =
P(A B) = P(A) P(B|A)
e^{i} + 1 = 0
_{k=0}^n = 2^n
dx = |x| + C
=
= D
y = mx + b
_{-}^x e^{-} dt = (x)
_a^b f(x) , dx = F(b) - F(a)
# Datos de ejemplo: reemplaza esto con tus propios datos
categorias <- c('PERA', 'MANZANA', 'NARANJA', 'UVA')
valores <- c(25, 40, 30, 35)
# Crear la gráfica de barras
barplot(valores, names.arg = categorias,
col = c("GREEN", "RED", "orange", "PURPLE"),
main = "FRUTAS MAS COMUNES",
xlab = "Categorías", ylab = "Valores")
# Añadir leyenda
legend("topright", legend = categorias, fill = c("GREEN", "RED", "orange", "PURPLE"), title = "FRUTAS")