Publications by Alexsis Romero Moreno
CASO 16
1.- Cargar Librerias library(ggplot2) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union library(knitr) options(scipen = 999) 2.- Solución de ejercicios 2....
2071 sym R (2478 sym/33 pcs)
CASO 15
1.- Cargar Librerias library(ggplot2) library(stringr) # String library(stringi) # String library(gtools) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, uni...
810 sym R (1181 sym/13 pcs) 2 tbl
CASO 13
Libreria library(knitr) Las probabilidades Se trata de encontrar las probabilidades condicionales usando el Teorema de Bayes para personas que trabajan en algún sector (‘Servicios’, ‘Salud’ u ‘Otros’) y sean o que estén en función de algún género (‘Hombre’ o ‘Mujer’). Evento sectores Existen tres sectores en donde tra...
2243 sym R (934 sym/23 pcs)
CASO 12
Cargar Librerias library(knitr) library(gtools) baraja <- c("AC","2C","3C","4C","5C","6C","7C","8C","9C","10C","JC","QC","KC","AP","2P","3P","4P","5P","6P","7P","8P","9P","10P","JP","QP","KP","AT","2T","3T","4T","5T","6T","7T","8T","9T","10T","JT","QT","KT","AD","2D","3D","4D","5D","6D","7D","8D","9D","10D","JD","QD","KD") n <- length(baraja) #...
1816 sym R (3842 sym/27 pcs)
CASO 11
Cargar Librerias library(knitr) Ejercicio 1 Extraído de (matemovil, n.d.) P(A)=0.60 P(B)=0.40 P(A∩B)=0.18 Calcular: P(A|B) P(A|B)=P(A∩B)P(B)=0.180.40=0.45 prob.A <- 0.60 prob.B <- 0.40 prob.A.Inter.B <- 0.18 prob.B.Inter.A <- prob.A.Inter.B # La misma Prob.A.dado.B <- prob.A.Inter.B / prob.B paste("La pobabilida de que se de A dado...
2754 sym R (2596 sym/20 pcs) 2 tbl
CASO 9
1.- Cargar Librerias library(knitr) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union 2.- Determinar o construir el conjunto de datos source("https://raw.git...
86 sym R (420 sym/6 pcs) 1 tbl
CASO 8
1.- Cargar Librerias library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union library(knitr) library(gtools) 2.- Cargar Cartas source("../Probabilidad y Estadistica...
932 sym R (9473 sym/56 pcs) 2 tbl
CASO 10
1.- Cargar Librerias library(VennDiagram) ## Loading required package: grid ## Loading required package: futile.logger library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequ...
1249 sym R (10880 sym/70 pcs) 1 img 24 tbl
CASO 14
1.- Cargar Librerias library(ggplot2) library(stringr) # String library(stringi) # String library(gtools) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, uni...
4866 sym R (5692 sym/40 pcs) 13 img
CASO 17
1.- Cargar Librerias library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union source("https://raw.githubusercontent.com/rpizarrog/probabilidad-y-estad-stica/master/fu...
1841 sym R (2104 sym/28 pcs)