UNIVERSIDAD CENTRAL DEL

ECUADOR
FACULTAD DE CIENCIAS ECONÓMICAS
MUESTREO II

S6-P001

2022-2023
GEORGINA AGILA

ROBERTO CORDOBA

DIEGO JARAMILLO

JOSELYN QUINGA

SARA REINO

DAYANA TOAPANTA

CRISTIAN VACA
 Tema:

Estudio sobre la factibilidad de la modalidad a distancia aplicada en la

Facultad de Jurisprudencia Ciencias Políticas y Sociales en sus diferentes

carreras y semestres.

Definición del proyecto

¿En dónde se va a realizar?

Universidad Central del Ecuador en la Facultad de Jurisprudencia Ciencias

Políticas y Sociales.

¿A quién voy a investigar?

El presente proyecto se va a enfocar en los estudiantes de la facultad de

Jurisprudencia Ciencias Políticas y Sociales.

¿Qué problema deseo investigar?

La necesidad de los estudiantes de la Facultad de Jurisprudencia de Ciencias

Políticas y Sociales que cuenten con carreras con modalidad a distancia que les

permitan según su necesidad y facilidad una fácil adaptación y aprendizaje para

la carrera en curso.

¿Qué es lo que pienso realizar?

Recolectar los datos de los estudiantes de la Facultad de Ciencias Políticas y

Sociales, para su posterior análisis mediante el método de correlación.

¿Cómo se va a realizar?

Mediante el levantamiento de encuestas a los estudiantes y su posterior

análisis en la herramienta R-Studio.

Título de la investigación

o Necesidad de contar con modalidad a distancia en las carreras de la Facultad de

Jurisprudencia Ciencias Políticas y Sociales.

Cliente

DECANO: Dr. José Luis Terán, PhD.

SUBDECANO: Dr. Ramiro García, PhD.

Objetivos

Objetivo general

Determinar la necesidad de los estudiantes de la Facultad de Jurisprudencia

Ciencias Políticas y Sociales de contar con modalidad a distancia de las distintas

carreras presenciales.

Objetivos Específicos

 Identificar cual es la carrera que tiene mayor necesidad de contar con

modalidad a distancia.

 Determinar si los estudiantes estarían dispuestos adaptarse a la modalidad

a distancia.

 Aplicar análisis estadístico de variables identificadas para reconocer el

alcance explicativo de las variables.

Descripción de la realidad problemática / justificación

La educación a distancia es considerada como una innovación en la

interacción entre el estudiante y profesor que ya no se ve limitada por un espacio

físico ni la distancia que estos dos sujetos se encuentren uno del otro, se

considera también como una solución a la creciente demanda de la sociedad por

cubrir los estándares de educación actuales y variados. Según (Sanchez, 2003)

La educación a distancia se apoya en el desarrollo tecnológico y se sustenta en la

adopción de estrategias novedosas que posibiliten la expansión de la

información, del conocimiento y en definitiva, del desarrollo cultural, espiritual,

económico y material de toda la sociedad. El uso de tecnologías avanzadas

 posibilita la ejecución de programas con diversos niveles y complejidades

educativas, expandir el rango de los sectores sociales a los que se ofrece

servicio, así como su personalización para satisfacer con mayor efectividad las

necesidades particulares de los diferentes individuos.

Esta modalidad de estudio fue considera muy costosa, sin embargo el mundo

se vio envuelto en un salto exponencial en su forma de educar de un momento a

otro debido a la pandemia Covid-19 causante del cierre total de aulas a nivel

mundial, obligando así la utilización de herramientas digitales que hoy

conocemos como plataformas virtuales en las cuales se podía realizar el proceso

educativo. Sin embargo esta nueva modalidad trajo a mesa distintas ventajas y

desventajas que los usuarios pudieron notar, las cuales se enlistan de la siguiente

manera.

Ventajas de la educación virtual

 Ahorro de dinero

 Repetir las clases las veces que sea necesario

 Accesos a información en todo momento

 Flexibilidad en el tiempo

 Utilización de recursos propios

Desventajas de la educación virtual

 Dificultad en el momento de concentrarse

 Necesidad de herramientas tecnológicas adecuadas

 Poca sociabilidad

 Retrasos por fallas de las plataformas

 Sedentarismo
 En este estudio pretendemos determinar cuáles son las razones y bajo que

circunstancias la modalidad a distancia de las carreras es una opción factible o

no para los estudiantes de la Facultad de Jurisprudencia Ciencias Políticas y

Sociales.

Antecedentes

La historia es la evidencia de la evolución humana y esta se encuentra en

distintas civilización que han ido adoptando esta clase de educación un claro

ejemplo se encuentra en la civilización de la Grecia antigua en la cual existieron

las denominadas cartas científicas o literarias lo que hoy se conoce como

epistolografía. Durante el siglo XIX en el desarrollo industrial tanto en Europa

Occidental como América del Norte adopto esta modalidad de estudio para las

distintas minorías que por diversas razones no podían ingresar a escuelas y

recibir la educación oportuna y de calidad para esto se crearon los cursos por

correspondencia los cuales les permitían realizar actividades laborales durante la

semana correspondiente a las horas de trabajo y en sus horas libres dedicarse a la

realización de las actividades detalladas en la correspondencia, este método de

estudio se creó por la necesidad de cubrir los conocimientos técnicos y

fundamentales que necesitaban conocer los obreros generalmente en las

actividades laborales que se centraban en la explotación de minas de carbón por

lo cual existía una gran abundancia de accidentes tanto como respuesta al curso

“Minería y prevención de accidentes mineros” uno de los claros ejemplos de

educación a distancia en el desarrollo industrial de los países.

Marco Teórico
 En el Ecuador, el sistema de educación superior históricamente se ha

caracterizado por la sobrerrepresentación de los sectores más aventajados de la

sociedad. En el año 2008, el Ecuador aprobó una nueva Constitución que

incorporó nuevas directrices para la educación superior orientadas hacia la

consecución de la igualdad de oportunidades. Con el fin de garantizar este

principio, se implementó en 2012 el Sistema de Nivelación y Admisión (SNNA).

De esta forma dando oportunidad a todo estudiante graduado de colegios del

país y del extranjero a formar parte del sistema educativo de tercer nivel, según

su puntaje obtenido en este nuevo sistema de Nivelación y Admisión. Según

(Lopez Valverde, 2001), la educación se encarga como función social, de

transmitir los valores sociales e individuales que en un momento histórico una

colectividad humana considerada valiosos, necesarios para su desarrollo y

evolución, creando un imaginario colectivo, que establece la base ideológica que

cohesiona al interior y exterior a la sociedad que los establece.

La educación a distancia generalmente era observada como un compensatorio

a la educación que estaba ligada a las personas que no contaban con la

posibilidad de asistir de forma presencial y continua a establecimientos de

educación formales.

En otro aspecto el uso de las “Tecnologías de la Información y las

Comunicaciones (TIC)” como medio plataforma de comunicación continua libre

de las barreras de espacios físicos es una de las soluciones frente a la formación

inicial y continua que tanto los profesionales de la educación y los estudiantes la

utilizan para un desarrollo contino sin embargo (Juca Maldonado, 2016), nos

explica una gran contradicción entre los principios didácticos de la educación a

distancia con el uso de las TIC para la formación inicial y continua del
 profesional. Se revisan los elementos que contribuyen a pensar la formación

docente como una articulación de factores que sin negar los contextos, permiten

la apropiación de los recursos de la tecnología digital para la enseñanza.

El paso del tiempo es un gran indicador de la evolución de la educación, en

ese siglo XXI se ha demostrado la gran amplitud de estos recursos por lo cual es

indispensable entender como es esta modalidad para los estudiantes que son la

principal fuente de respuesta pues ellos deben adaptarse a la nuevas normas,

metodologías y aplicativos utilizados para el óptimo aprendizaje sin embargo

también hay que considerar que estos mismos factores tienen relación directa

con el profesional encargado de impartir las clases. En este presente trabajo nos

basamos en determinar por qué es una necesidad para los estudiantes contar con

modalidades a distancia ya se por su relación directa con la utilización del

tiempo y el óptimo uso de los recursos o la comodidad por el tema de distancia y

las preferencias de los estudiantes a través de una revisión documental donde

nos enfocamos en factores socioculturales, socio tecnológicos y

socioeconómicos. Se concluye que esta realidad exige a las instituciones no sólo

una actitud de cambio y apertura sino también, la transformación de los modelos

de enseñanza y de gobernanza de las instituciones.

Marco Conceptual

Para un estudiante universitario es importante determinar el ambiente ideal

para su optimo aprendizaje en el cual deben estar incluidos aspectos como son el

tiempo, la comodidad, el transporte y la fácil interacción entre él y su profesor.

Todos estos factores definen un correcto aprendizaje si se emplean de forma

adecuada en el estudiante y esto se da en respuesta en el rendimiento académico

 en estudiantes universitarios se define como la cantidad de materias aprobadas

por año, nota promedio y una combinación de esas dos medidas. Existen

distintos factores que son representativos para un estudiante que logra

determinar lo mejor para su sistema educativo dependiendo de la carrera ya sea

de carácter virtual o presencial.

Educación a distancia

También conocida como educación online, en línea o remota, se trata de una

innovadora forma de aprender y enseñar que lleva la dinámica de una clase

tradicional y presencial, al mundo digital. De esta manera, desde cualquier lugar

del mundo, los alumnos y docentes podrán conectarse en un entorno virtual en

sus computadoras a través de internet, haciendo uso intensivo de las facilidades

que proporcionan las nuevas tecnologías digitales. (Palermo, s.f.)

Educación presencial

La educación virtual o educación en línea, se refiere al desarrollo de

actividades de aprendizaje mediante entornos virtuales o no presenciales, donde

el educando puede instruirse sin la necesidad de estar presencialmente asistiendo

en un centro educativo. (Learning, s.f.)

o Tics

 Las tecnologías de la información y la comunicación (TIC) son todas

aquellas herramientas y programas que tratan, administran,

transmiten y comparten la información mediante soportes

tecnológicos. La informática, Internet y las telecomunicaciones son

las TIC más extendidas, aunque su crecimiento y evolución están

haciendo que cada vez surjan cada vez más modelos. (Bmn, 2022)

o Socioculturales
  La educación sociocultural responde a una propuesta humanizadora

de la vivencia personal y colectiva, mediante procesos de

intervención directa como es la educación para el ocio. Propuesta

que busca el desarrollo de valores, actitudes, conocimientos y

habilidades para el florecimiento personal y comunitario.

Experiencia que busca dar sentido de vida. Trabajo educativo que se

realiza con el apoyo de las organizaciones sociales con la finalidad

de apoyar procesos de desarrollo integral de las personas y de los

colectivos. (Nieves Chavez, 2014)

o Socioeconómicos

 El nivel socioeconómico se refiere a las condiciones que tienen los

estudiantes para satisfacer las necesidades que plantea el sostenerse

en el momento de su desarrollo profesional, tales como:

alimentación, vestuario, vivienda, esparcimiento, transporte, material

de estudio entre otras. (Cruz, Medina, Espinosa, & Antonio)

o Tiempo Escolar

 El tiempo escolar a diferencia del tiempo en el hogar, está

organizado en toda su dimensión de medida, pues cada área de

conocimiento está delimitada por horarios, y, dentro de estos, el

profesional de la enseñanza tiene la libertad de darle sentido a cada

segundo según lo considere necesario para el aprovechamiento.

(EUROINNOVA, 2022)

o Recursos propios
  Los ingresos generados y administrados por la misma IE por

diferentes conceptos, excluyendo los provenientes del tesoro público,

destinados al mejoramiento institucional del servicio educativo

o Concentración

 La concentración es la capacidad de dirigir la atención, de forma

voluntaria, en una dirección determinada y mantenerla durante el

tiempo deseado.

o Herramientas tecnológicas

 Mecanismo sistematizado para obtener información válida y certera

sobre tópicos en específico.

o Sedentarismo

 Aquellas actividades que realizamos las personas sentadas o

reclinadas, mientras estamos despiertas, y que utilizan muy poca

energía.

Marco metodológico

Chi- Cuadrado

La prueba chi-cuadrado, también llamada Ji cuadrado (X2), se encuentra

dentro de las pruebas pertenecientes a la estadística descriptiva, concretamente la

estadística descriptiva aplicada al estudio de dos variables en donde se debe

tener en cuenta que la estadística descriptiva se centra en extraer información

sobre la muestra.

El nombre de la prueba es propio de la distribución Chi-cuadrado de la

probabilidad en la que se basa. Esta prueba fue desarrollada en el año 1900 por

Karl.
 La prueba chi-cuadrado es una de las más conocidas y utilizadas para analizar

variables nominales o cualitativas, es decir, para determinar la existencia o no de

independencia entre dos variables. Que dos variables sean independientes

significa que no tienen relación, y que por lo tanto una no depende de la otra, ni

viceversa.

El estadístico chi cuadrado, que tiene distribución de probabilidad del mismo

nombre, sirve para someter a prueba hipótesis referidas a distribuciones de

frecuencias. En términos generales, esta prueba contrasta frecuencias observadas

con las frecuencias esperadas de acuerdo con la hipótesis nula.

El uso del estadístico chi-cuadrado nos ayuda a probar la asociación entre dos

variables utilizando una situación hipotética y datos simulados. Luego se

describe su uso para evaluar cuán buena puede resultar una distribución teórica,

cuando pretende representar la distribución real de los datos de una muestra

determinada. A esto se le llama evaluar la bondad de un ajuste. Probar la bondad

de un ajuste es ver en qué medida se ajustan los datos observados a una

distribución teórica o esperada. Para esto, se utiliza una segunda situación

hipotética y datos simulados. (Lopez, s.f.)

El estadístico de prueba chi-cuadrado compara las frecuencias que entregan

los datos de la muestra (frecuencias observadas) con las frecuencias esperadas, y

tiene la siguiente fórmula cálculo:

 oi representa a cada frecuencia observada.

 ei representa a cada frecuencia esperada.

En cuanto a la interpretación el estadístico chi-cuadrado tomará un valor igual

a 0 si existe concordancia perfecta entre las frecuencias observadas y las

 esperadas; por contra, el estadístico tomará un valor grande si existe una

discrepancia entre las frecuencias, y consecuentemente se deberá rechazar la

hipótesis nula. (Ruiz Mitjana, s.f.)

Aplicación del Chi-cuadrado en el código en R

o Requerimientos para trabajar con la distribución de chi-cuadrado:

o La muestra debe ser tomadas al azar 

o Variables medidas deben ser independientes

o Los datos deben ser reportados en frecuencias absolutas (no porcentajes)

o Valores / categorías de variables deben ser mutuamente excluyentes.

o Frecuencias observadas no deben pequeñas.

o Para la ejecución de Chi-cuadrado en R se ocupa el comando [Link].

Detalles de la ejecución en R

Si x es una matriz con una fila o columna, o si x es un vector y no se

proporciona y, entonces se realiza una prueba de bondad de ajuste (x se trata

como una tabla de contingencia unidimensional). Las entradas de x deben ser

enteros no negativos. En este caso, la hipótesis que se prueba es si las

probabilidades de la población son iguales a las de p, o son todas iguales si no se

da p.

Si x es una matriz con al menos dos filas y columnas, se toma como una tabla

de contingencia bidimensional: las entradas de x deben ser números enteros no

negativos. De lo contrario, x e y deben ser vectores o factores de la misma

longitud; los casos con valores faltantes se eliminan, los objetos se coaccionan a

factores y la tabla de contingencia se calcula a partir de estos. Luego se realiza la

 prueba chi-cuadrado de Pearson de la hipótesis nula de que la distribución

conjunta de los recuentos de celdas en una tabla de contingencia bidimensional

es el producto de los márgenes de fila y columna.

En el caso de la tabla de contingencia, la simulación se realiza mediante un

muestreo aleatorio del conjunto de todas las tablas de contingencia con

marginales dados, y funciona solo si los marginales son estrictamente positivos.

La corrección de continuidad nunca se usa y la estadística se cita sin ella. Tenga

en cuenta que esta no es la situación de muestreo habitual asumida para la

prueba de chi-cuadrado, sino más bien para la prueba exacta de Fisher.

En el caso de bondad de ajuste, la simulación se realiza mediante un muestreo

aleatorio de la distribución discreta especificada por p, siendo cada muestra de

tamaño n = sum(x). Esta simulación se realiza en R y puede ser lenta.

Argumento Descripción

X Un vector numérico o matriz. x e y también pueden ser factores.

Un vector numérico; ignorado si x es una matriz. Si x es un factor, y

Y
debería ser un factor de la misma longitud.

Es una indicación lógica si se debe aplicar la corrección de

continuidad al calcular la estadística de prueba para tablas de 2 por

correcto 2: se resta la mitad de todo |O - E| diferencias; sin embargo, la

corrección no será mayor que las propias diferencias. No se realiza

ninguna corrección si [Link] = VERDADERO.

 Un vector de probabilidades de la misma longitud de x. Se da un
pags
error si alguna entrada de p es negativa.

Un escalar lógico; si es VERDADERO, p se vuelve a escalar (si es

reescalar.p necesario) para que sume 1. Si rescale.p es FALSO, y p no suma 1,

se da un error.

Una lógica que indica si se deben calcular los valores p mediante la

[Link]
simulación de Monte Carlo.

Un número entero que especifica el número de réplicas utilizadas en

B
la prueba de Monte Carlo.

Parámetros Descripción

Una lista con clase "htest" que contiene los siguientes

Valor
componentes:

[Link] El valor p para la prueba

Una cadena de caracteres que proporciona los nombres

[Link]
de los datos.

Método una cadena de Indica el tipo de prueba realizada y si se utilizó

caracteres simulación de Monte Carlo o corrección de continuidad.

Observado Los conteos observados.

 Previsto Las cuentas esperadas bajo la hipótesis nula.

Derechos residuales de Los residuos de Pearson, (observado - esperado) / sqrt

autor (esperado).

Stdres: residuos Observado - esperado) / sqrt(V), donde V es la varianza

estandarizados de celda residual

Factor De Expansión

Es un factor que aproximara la muestra a la población, de forma que permite

identificar cuantos elementos de la población representa cada elemento de la

muestra. Se calcula como n/N, y se aproximara al entero más cercano.

Código en R

Proyecto para determinar la factibilidad de la modalidad a distancia en la

Facultad de Jurisprudencia Ciencias Políticas y Sociales

Existe un estimado de 4 a 5 paralelos por semestre y un estimado de

estudiantes de 150 a 200, se tomará 5 paralelos por semestre de 200 estudiantes

cada semestre

 Derecho - 10 semestres

 Ciencias Políticas y sociales - 8 Semestres

Simulación de Todos los Estudiantes de la Facultad de Jurisprudencia Ciencias

Políticas y Sociales

N_Derecho = El número de estudiantes de derecho

N_Derecho = 200*10

N_CPoliticas = El número de estudiantes de ciencias políticas

 N_CPoliticas = 200*8

N_Jurisprudencia = El número total de estudiantes de la facultad

N_Jurisprudencia = N_Derecho+N_CPoliticas

Creación del Tamaño de la Facultad por la Carrera, Paralelo y Semestre

Carrera = sample(1:2, N_Jurisprudencia, replace = TRUE)

Estudiantes = seq(1:N_Jurisprudencia)

Paralelo = sample(1:5, N_Jurisprudencia, replace = TRUE)

Semestre = sample(1:10,N_Jurisprudencia, replace = TRUE)

Creación del Data Frame de la Facultad de Jurisprudencia, Ciencias

Políticas y Sociales

F_Jurisprudencia = [Link](Carrera, Paralelo, Estudiantes, Semestre)

str(F_Jurisprudencia)

## '[Link]': 3600 obs. of 4 variables:

## $ Carrera : int 2 2 1 1 2 1 2 2 1 2 ...

## $ Paralelo : int 5 4 2 5 5 4 3 1 3 3 ...

## $ Estudiantes: int 1 2 3 4 5 6 7 8 9 10 ...

## $ Semestre : int 3 9 9 10 8 9 8 6 2 8 ...

Base de los Estudiantes de la Facultad de Jurisprudencia, Ciencias Políticas y

Sociales

head(F_Jurisprudencia)

## Carrera Paralelo Estudiantes Semestre

## 1 2 5 1 3

## 2 2 4 2 9

## 3 1 2 3 9
 ## 4 1 5 4 10

## 5 2 5 5 8

## 6 1 4 6 9

Muestreo Tri-Etápico

Muestreo por Carrera

N = N_Jurisprudencia

Z = qnorm(0.975)

E = 0.05

n = (Z^2*0.5^2*N) / (0.5^2*Z^2 + (N-1)*E^2)

n = ceiling(n)

## [1] 348

M_Barra

M_Barra = N_Jurisprudencia/2

M_Barra

## [1] 1800

Carrera Muestreada

n_Carrera = n/M_Barra

n_Carrera = ceiling(n_Carrera)

n_Carrera

## [1] 1
Muestra por Carrera

S = sample(1:2,n_Carrera)

## [1] 2

MuestraC = F_Jurisprudencia[F_Jurisprudencia[,1]==S[1],]

head(MuestraC)

## Carrera Paralelo Estudiantes Semestre

## 1 2 5 1 3

## 2 2 4 2 9

## 5 2 5 5 8

## 7 2 3 7 8

## 8 2 1 8 6

## 10 2 3 10 8

Muestreo por Semestre

N2 = nrow(MuestraC)

Z = qnorm(0.975)

E = 0.05

n2 = (Z^2*0.5^2*N2) / (0.5^2*Z^2 + (N2-1)*E^2)

n2 = ceiling(n2)

n2

## [1] 317

M_Barra2

if (S==1) {

M_Barra2 = N2/10
 }else{M_Barra2 = N2/8

M_Barra2

## [1] 226

Semestres Muestreados

n_semestre = n2/M_Barra2

n_semestre = ceiling(n_semestre)

n_semestre

## [1] 2

Muestra por Semestre

S2 = sample(1:10,n_semestre)

S2

## [1] 7 5

MuestraS = MuestraC[MuestraC[,4]==S2[1],]

for (i in 2: n_semestre) {

aux = MuestraC[MuestraC[,4]==S2[i],]

MuestraS = rbind(MuestraS, aux)

head(MuestraS)

## Carrera Paralelo Estudiantes Semestre

## 12 2 5 12 7

## 33 2 4 33 7

## 42 2 1 42 7

## 46 2 3 46 7
 ## 49 2 5 49 7

## 52 2 3 52 7

Muestra por Paralelo

N3 = nrow(MuestraS)

Z = qnorm(0.975)

E = 0.05

n3 = (Z^2*0.5^2*N3) / (0.5^2*Z^2 + (N3-1)*E^2)

n3 = ceiling(n3)

n3

## [1] 194

M_Barra 3

M_Barra3 = N3/5

M_Barra3

## [1] 77.4

Paralelos Muestreados

n_paralelo = n3/M_Barra3

n_paralelo = ceiling(n_paralelo)

n_paralelo

## [1] 3

Muestra por Paralelos

S3 = sample(1:5,n_paralelo)

S3

## [1] 5 2 4
 MuestraP = MuestraS[MuestraS[,2]==S3[1],]

for (i in 2: n_paralelo) {

aux2 = MuestraS[MuestraS[,2]==S3[i],]

MuestraP = rbind(MuestraP,aux2)

head(MuestraP)

## Carrera Paralelo Estudiantes Semestre

## 12 2 5 12 7

## 49 2 5 49 7

## 125 2 5 125 7

## 193 2 5 193 7

## 345 2 5 345 7

## 370 2 5 370 7

Tamaño de la Muestra Tri-Etápica

n4 = nrow(MuestraP)

n4

## [1] 227

Factor de Expansión

Fex = N_Jurisprudencia/n4

Fex = round(Fex, digits = 0)

Fex

## [1] 16
Simulación de los datos del Cuestionario

P1 = sample(1:2, n4, replace = TRUE)

P2 = sample(18:28, n4, replace = TRUE)

P3 = sample(1:2, n4, replace=TRUE)

P4 = sample(1:10, n4, replace = TRUE)

P5 = sample(1:3, n4, replace = TRUE)

P6 = sample(1:2, n4, replace = TRUE)

P7 = sample(1:5, n4, replace = TRUE)

P8 = sample(1:5, n4, replace = TRUE)

P9 = sample(1:2, n4, replace = TRUE)

P10 = sample(1:5, n4, replace = TRUE)

P11 = sample(1:2, n4, replace = TRUE)

P12 = sample(1:3, n4, replace = TRUE)

Base Muestral numérica de los Estudiantes de la Facultad de Jurisprudencia,

Ciencias Políticas y Sociales

Base_Numero = [Link](P1, P2, P3, P4, P5, P6, P7, P8, P9, P10, P11, P12)

head(Base_Numero)

## P1 P2 P3 P4 P5 P6 P7 P8 P9 P10 P11 P12

## 1 1 25 2 7 1 1 5 4 1 1 2 3

## 2 2 27 1 3 1 1 2 2 1 2 1 2

## 3 2 28 2 4 2 1 3 2 1 3 1 3

## 4 2 23 1 10 1 1 4 3 2 4 2 2

## 5 1 27 2 9 2 1 3 3 1 3 2 3

## 6 1 25 1 7 1 2 2 4 2 1 2 1
Categorización de la Base

P1[P1==1] = "Masculino"

P1[P1==2] = "Femenino"

P3[P3==1] = "Derecho"

P3[P3==2] = "Ciencias Políticas"

P4[P4==1] = "Primer Semestre"

P4[P4==2] = "Segundo Semestre"

P4[P4==3] = "Tercer Semestre"

P4[P4==4] = "Cuarto Semestre"

P4[P4==5] = "Quinto Semestre"

P4[P4==6] = "Sexto Semestre"

P4[P4==7] = "Séptimo Semestre"

P4[P4==8] = "Octavo Semestre"

P4[P4==9] = "Noveno Semestre"

P4[P4==10] = "Decimo Semestre"

P5[P5==1] = "Teórico"

P5[P5==2] = "Practica"

P5[P5==3] = "Teórico-Practica"

P6[P6==1] = "Si"

P6[P6==2] = "No"

P7[P7==1] = "Ahorro de dinero"

P7[P7==2] = "Repetir las clases las veces que sea necesario"

P7[P7==3] = "Accesos a información en todo momento"

P7[P7==4] = "Flexibilidad en el tiempo"

P7[P7==5] = "Utilización de recursos propios"

 P8[P8==1] = "Dificultad en el momento de concentrarse"

P8[P8==2] = "Necesidad de herramientas tecnológicas adecuadas"

P8[P8==3] = "Poca sociabilidad"

P8[P8==4] = "Retrasos por fallas de las plataformas"

P8[P8==5] = "Sedentarismo"

P9[P9==1] = "Si"

P9[P9==2] = "No"

P10[P10==1] = "Muy Positivo"

P10[P10==2] = "Positivo"

P10[P10==3] = "Neutro"

P10[P10==4] = "Negativo"

P10[P10==5] = "Muy Negativo"

P11[P11==1] = "De Forma Positiva"

P11[P11==2] = "De Forma Positiva"

P12[P12==1] = "Si"

P12[P12==2] = "No"

P12[P12==3] = "Tal Vez"

Base Muestral Categorizada de los Estudiantes de la Facultad de

Jurisprudencia, Ciencias Políticas y Sociales

Base_Letras = [Link](P1,P2,P3,P4,P5,P6,P7,P8,P9,P10,P11,P12)

head(Base_Letras)

## P1 P2 P3 P4 P5 P6

## 1 Masculino 25 Ciencias Políticas Séptimo Semestre Teórico Si

## 2 Femenino 27 Derecho Tercer Semestre Teórico Si

## 3 Femenino 28 Ciencias Políticas Cuarto Semestre Practica Si

## 4 Femenino 23 Derecho Decimo Semestre Teórico Si

## 5 Masculino 27 Ciencias Políticas Noveno Semestre Practica Si

## 6 Masculino 25 Derecho Séptimo Semestre Teórico No

## P7

## 1 Utilización de recursos propios

## 2 Repetir las clases las veces que sea necesario

## 3 Accesos a información en todo momento

## 4 Flexibilidad en el tiempo

## 5 Accesos a información en todo momento

## 6 Repetir las clases las veces que sea necesario

## P8 P9 P10

## 1 Retrasos por fallas de las plataformas Si Muy Positivo

## 2 Necesidad de herramientas tecnológicas adecuadas Si Positivo

## 3 Necesidad de herramientas tecnológicas adecuadas Si Neutro

## 4 Poca sociabilidad No Negativo

## 5 Poca sociabilidad Si Neutro

## 6 Retrasos por fallas de las plataformas No Muy Positivo

## P11 P12

## 1 De Forma Positiva Tal Vez

## 2 De Forma Positiva No

## 3 De Forma Positiva Tal Vez

## 4 De Forma Positiva No

## 5 De Forma Positiva Tal Vez

## 6 De Forma Positiva Si
Base Expandida en Base al Factor de Expansión

library(splitstackshape)

## Warning: package 'splitstackshape' was built under R version 4.0.5

BaseEx = expandRows(Base_Numero, count = rep(Fex, n4), [Link] =

FALSE)

a = nrow(BaseEx)

[Link](BaseEx) = seq(1,a)

head(BaseEx)

## P1 P2 P3 P4 P5 P6 P7 P8 P9 P10 P11 P12

## 1 1 25 2 7 1 1 5 4 1 1 2 3

## 2 1 25 2 7 1 1 5 4 1 1 2 3

## 3 1 25 2 7 1 1 5 4 1 1 2 3

## 4 1 25 2 7 1 1 5 4 1 1 2 3

## 5 1 25 2 7 1 1 5 4 1 1 2 3

## 6 1 25 2 7 1 1 5 4 1 1 2 3

BaseEx1 = BaseEx

Resultados

library(ggplot2)

Objetivo general

Determinar la necesidad de los estudiantes de la Facultad de Jurisprudencia

Ciencias Políticas y Sociales de contar con modalidad a distancia de las distintas

carreras presenciales
 Gráfico sobre las Ventajas

 Ahorro de dinero = 1

 Repetir las clases las veces que sea necesario = 2

 Accesos a información en todo momento = 3

 Flexibilidad en el tiempo = 4

 Utilización de recursos propios = 5

barplot(table(BaseEx$P7), beside = TRUE, col = c("blue", "red", "orange",

"purple", "yellow"), xlab = "Ventajas de la Modalidad a Distancia")

Se puede apreciar que según la percepción de los estudiantes las ventajas más

relevantes para la educación a distancia serian: Ahorro de Dinero, Acceso a

Información en Todo Momento y la Utilización de Recursos Propios

Gráfico sobre las Desventajas

 Dificultad en el momento de concentrarse = 1

 Necesidad de Herramientas Tecnológicas Adecuadas = 2

  Poca Sociabilidad = 3

 Retrasos por Fallas de las Plataformas = 4

 Sedentarismo = 5

barplot(table(BaseEx$P8), beside = TRUE, col = c("blue", "red", "orange",

"purple", "yellow"), xlab = "Desventajas de la Modalidad a Distancia")

Se puede observar que según la percepción de los estudiantes de la facultad

de jurisprudencia las desventajas más relevantes para la modalidad a distancia

serian: necesidad de herramientas tecnológicas adecuadas, retrasos por fallas de

las plataformas y la dificultad en el momento de concentrarse.

Objetivos Específicos

Identificar cual es la carrera que tiene mayor necesidad de contar con

modalidad a distancia

 Pregunta 3: Carrera a la que pertenecen

 Pregunta 6: ¿Consideraría factible que existiera una modalidad a

distancia en las carreras de su facultad?

 Categorización

BaseEx$P3[BaseEx$P3==1] = "Derecho"

BaseEx$P3[BaseEx$P3==2] = "Ciencias Políticas"

BaseEx$P6[BaseEx$P6==1] = "Si"

BaseEx$P6[BaseEx$P6==2] = "No"

Respuesta Objetivo 1

barplot(table(BaseEx$P6, BaseEx$P3), beside=TRUE, [Link]=TRUE,

col=c("red", "blue"), main="Aceptación de la Modalidad a distancia por

Carreras")

Interpretación: Se puede observar que tanto los estudiantes de Ciencias

Políticas como los estudiantes de Derecho concuerdan en que no es factible la

modalidad a distancia en sus respectivas carreras sin embargo en comparación

 existe más aceptación de la modalidad a distancia en la carrera de ciencias

políticas que en la carrera de derecho.

Análisis de Hipótesis

Aplicar análisis estadístico de variables identificadas para reconocer el

alcance explicativo de las variables

 H0:No existe relación entre la carrera a la que pertenecen los estudiantes,

y su aceptación a modalidad a distancia

 H1:Existe relación entre la carrera a la que pertenecen los estudiantes, y

su aceptación a modalidad a distancia

Carrera de Derecho

HD = subset(BaseEx1,BaseEx1$P3=="1"|BaseEx1$P6=="1")

[Link](HD$P3, HD$P6, correct = TRUE,

p=rep(1/length(HD$P3)),length(HD$P3))

## Pearson's Chi-squared test with Yates' continuity correction

## data: HD$P3 and HD$P6

## X-squared = 755.4, df = 1, p-value < 2.2e-16

El valor P es menor a 0.05, se rechaza la hipótesis nula, es decir, existe

relación entre los estudiantes de la Carrera de Derecho y la aceptación con la

modalidad a distancia

Carrera de Ciencias Políticas y Sociales

HCp = subset(BaseEx1,BaseEx1$P3=="2"|BaseEx1$P6=="1")

[Link](HCp$P3, HCp$P6, correct = TRUE,

p=rep(1/length(HCp$P3)),length(HCp$P3))

## Pearson's Chi-squared test with Yates' continuity correction

## data: HCp$P3 and HCp$P6

## X-squared = 628.45, df = 1, p-value < 2.2e-16

El valor P es menor a 0.05, se rechaza la hipótesis nula, es decir, Existe

relación entre los estudiantes de la Carrera de Ciencias Políticas y Sociales y la

aceptación con la modalidad a distancia

Determinar si los estudiantes estarían dispuestos adaptarse a la modalidad a

distancia

 Pregunta 9: ¿Estaría dispuesto adaptarse a la modalidad a distancia

aplicada en su carrera?

Categorización

BaseEx$P9[BaseEx$P9==1] = "Si"

BaseEx$P9[BaseEx$P9==2] = "No"
Respuesta Objetivo 2

barplot(table(BaseEx$P9, BaseEx$P3),beside=TRUE, [Link]=TRUE,

col=c("red", "blue"), main="Adaptación a la Modalidad a distancia por

Carreras")

Interpretación: Se puede apreciar que la mayoría de los estudiantes de la

carrera de Ciencias políticas estarían dispuestos a adaptarse a una modalidad a

distancia, caso contrario en la carrera de Derecho donde los estudiantes por igual

estarían dispuestos y no estarían dispuestos adaptarse a una modalidad en línea.

Análisis Estadístico General

Estudiantes por Sexo

 a = table(BaseEx$P1)

BaseEx1$P1[BaseEx1$P1==1] = "Masculino"

BaseEx1$P1[BaseEx1$P1==2] = "Femenino"

b = table(BaseEx1$P1)

c = [Link](b, a)

ggplot(c, aes(x=1,y=Freq, fill=Var1))+

geom_bar(stat = "identity", color="black")+

geom_text(aes(label=paste0(round((Freq/sum(Freq))*100),"%")),position =

position_stack(vjust=0.5))+

coord_polar("y")+theme_void()+

labs(title = "Porcentaje de Estudiantes por Sexo", fill="Sexo")

Se puede apreciar que en la muestra se tiene un 48% de mujeres encuestadas,

y un 52% de hombres encuestados

Estudiantes por Edad

barplot(table(BaseEx$P2), col=rainbow(11), main="Edades de los

Estudiantes")

Se puede apreciar que el rango de edad de los estudiantes de la Facultad de

Jurisprudencia se distribuye entre 18 y 28 años, donde la mayoría de los

estudiantes tienen 18,22,24 y 26 años

Estudiantes por Carrera

d = table(BaseEx$P3)

BaseEx1$P3[BaseEx1$P3==1] = "Derecho"

BaseEx1$P3[BaseEx1$P3==2] = "Ciencias Políticas"

e = table(BaseEx1$P3)

f = [Link](e, d)

ggplot(f, aes(x=1,y=Freq, fill=Var1))+

geom_bar(stat = "identity", color="black")+

geom_text(aes(label=paste0(round((Freq/sum(Freq))*100),"%")),position =

position_stack(vjust=0.5))+
 coord_polar("y")+theme_void()+

labs(title = "Porcentaje de Estudiantes por Carrera", fill="Carrera")

Se puede apreciar que en la muestra se tiene un 43% de estudiantes de la

carrera de Derecho, y un 57% de estudiantes de la carrera de Ciencias Políticas.

Estudiantes por Semestre

barplot(table(BaseEx$P4), col=rainbow(11), main= "Estudiantes por

Semestre")
 Se puede apreciar que los estudiantes encuestados en su mayoría se

encuentran en segundo y noveno semestre

Adaptación del Modelo a Distancia

g = table(BaseEx$P10)

BaseEx1$P10[BaseEx1$P10==1] = "Muy Positivo"

BaseEx1$P10[BaseEx1$P10==2] = "Positivo"

BaseEx1$P10[BaseEx1$P10==3] = "Neutro"

BaseEx1$P10[BaseEx1$P10==4] = "Negativo"

BaseEx1$P10[BaseEx1$P10==5] = "Muy Negativo"

h = table(BaseEx1$P10)

i = [Link](h, g)

ggplot(i, aes(x=1,y=Freq, fill=Var1))+

geom_bar(stat = "identity", color="black")+

geom_text(aes(label=paste0(round((Freq/sum(Freq))*100),"%")),position =

position_stack(vjust=0.5))+

coord_polar("y")+theme_void()+

labs(title = "Adaptación al Modelo a Distancia", fill="Consideración")

 Se puede apreciar que según los estudiantes la modalidad a distancia tendría

una adaptación mayormente negativa en sus carreras, y a su vez que un 19% cree

que se puede adaptar de forma muy positiva

Influencia de la Modalidad a Distancia con el Aprendizaje

j = table(BaseEx$P11)

BaseEx1$P11[BaseEx1$P11==1] = "De Forma Positiva"

BaseEx1$P11[BaseEx1$P11==2] = "De Forma Negativa"

k = table(BaseEx1$P11)

l = [Link](k, j)

ggplot(l, aes(x=1,y=Freq, fill=Var1))+

geom_bar(stat = "identity", color="black")+

geom_text(aes(label=paste0(round((Freq/sum(Freq))*100),"%")),position =

position_stack(vjust=0.5))+

coord_polar("y")+theme_void()+

labs(title = "Influencia de la Modalidad a Distancia con el Aprendizaje",

fill="Influencia")
 Se puede apreciar que los estudiantes consideran que la modalidad a distancia

influye en su aprendizaje, de forma negativa o positiva casi de una manera

similar ya que un 51% influye de forma negativa y 49% por ciento de forma

positiva.

Factibilidad de la Modalidad a Distancia por Medio de la Facultad según

los Estudiantes

BaseEx$P12[BaseEx$P12==1] = "Si"

BaseEx$P12[BaseEx$P12==2] = "No"

BaseEx$P12[BaseEx$P12==3] = "Tal Vez"

barplot(table(BaseEx$P12), col=rainbow(11), main = "Factibilidad de la

Modalidad a Distancia")

Se puede apreciar que en su mayoría los estudiantes de la Facultad de

Jurisprudencia consideran que la modalidad a distancia no es factible en sus

carreras
CONCLUSIONES

Podemos concluir que la educación a distancia es una modalidad educativa

que también se puede considerar como una estrategia educativa que permite que

los factores de espacio y tiempo, ocupación o nivel de los participantes no

condicionen el proceso enseñanza-aprendizaje, sin embargo, no todas las

carreras se acogen a la misma por la necesidad de conocimientos prácticos.

Según la investigación realizada se observa que los estudiantes de la facultad de

jurisprudencia de la Universidad Central del Ecuador no verían necesaria o

factible una modalidad a distancia en su mayoría por factores tales como la

necesidad de herramientas tecnológicas adecuadas, retrasos por fallas de las

plataformas y la dificultad en el momento de concentrarse.

Se puede inferir que a pesar de las ventajas percibidas por los estudiantes

acerca de la modalidad a distancia hay una mayor aceptación por parte de los

estudiantes de la carrera de Ciencias Políticas en comparación a la carrera de

derecho sin embargo no es mayor al número de estudiantes que consideran que

dicha modalidad no es factible para el aprendizaje adecuado.

Del mismo modo podemos concluir que a pesar de que existe una relación

entre la carrera a la que pertenecen los estudiantes y la aceptación a esta nueva

forma de aprendizaje, de existir una modalidad a distancia el 59% de los

estudiantes de ambas carreras no estarían dispuestos a adaptarse a la misma.

RECOMENDACIONES

En base al proyecto realizado se recomienda que no todos los estudiantes, ni

facultades estarían dispuestas a tener una modalidad virtual por lo cual antes de

tomar decisiones en cuanto a la educación y sus modalidades se recomienda

realizar estos tipos de estudios para tener un sondeo previo.

Se recomienda crear estrategias que garanticen que la educación virtual sea de

calidad para que de esta manera se pueda implementar esta modalidad y los

estudiantes estén dispuestos a recibir clases de esta forma.

Bibliografía
Bmn. (11 de Agosto de 2022). Bliblioteca Medica Nacional. Obtenido de Bliblioteca

Medica Nacional: [Link]

Cruz, Z., Medina, J., Espinosa, J., & Antonio, A. (s.f.). Influencia del nivel

socioeconomico en el rendimiento academico de los alumnus. 3-4.

EUROINNOVA. (2022). EUROINNOVA. Obtenido de EUROINNOVA:

[Link]

%20tiempo%20escolar%20a%20diferencia,considere%20necesario%20para

%20el%20aprovechamiento.

Juca Maldonado, F. X. (Enero de 2016). La educación a distancia, una necesidad para

la formación de los profesionales. Obtenido de SCielo:

[Link]

36202016000100016

Learning, I. (s.f.). InGenio Learning. Obtenido de InGenio Learning:

[Link]

Lopez Valverde, C. E. (2001). Eduacion a distancia y transmision de valores. ESPIGA.

Lopez, N. (s.f.). IES. Obtenido de IES:

[Link]

archivos/repositorio/250/295/html/estadistica/[Link]

Nieves Chavez, M. A. (2014). EDUCACIÓN SOCIOCULTURAL Y MODERNIDAD.

CASO DE INTERVENCIÓN EN EL BARRIO DEL TEPETATE. 8.

Palermo, U. d. (s.f.). UP. Obtenido de UP: [Link]

[Link]

Ruiz Mitjana, L. (s.f.). Psicoligia y Mente. Obtenido de Psicoligia y Mente:

[Link]

Sanchez, A. (2003). La educación a distancia. La Habana: ACIMED.