Se realizará un análisis descriptivo del paquete datos, más especificamente de la base de datos credito, de la cual se tomara una muestra de 100 datos con respecto al credito donde se encuentran datos tanto cualitativos como cuantitativos.
library(datos)
set.seed(2668)
datos.c = data.frame(datos_credito)
muestra1 = datos.c[sample(nrow(datos.c),size=100),0:14]Debido a que la base de datos credito tiene más de 4000 entradas tomaremos una muestra como se menciono anteriormente, esta se obtendra utilizando la muestra1 y la función set.seed para que todos obtengamos el mismo resultado.