La escuela de Biología de la Universidad Nacional de Costa Rica imparte tres énfasis distintos para las personas que cursen el bachillerato: Biología Tropical, Biología Marina y Biotecnología. Debido a la baja escogencia de Biología Marina y el aumento en la escogencia de Biotecnología, se aplicó una encuesta de forma aleatoria a 64 estudiantes de la carrera de Biología que se encontraran cursando el tronco común, para determinar qué factores les son más influyentes en la escogencia del énfasis. Según un análisis estadístico de las encuestas, el ámbito laboral ofrecido, la importancia del énfasis y el lugar de procedencia de los estudiantes, son los principales factores determinantes, y según sus respuestas en la encuesta, la oferta laboral es el principal factor para la disminución en la escogencia de Biología Marina, y este mismo factor junto al auge tecnológico actual son los principales responsables del incremento en la escogencia de Biotecnología. Con estos resultados se puede concluir que el futuro laboral es la principal causa determinante tanto para el aumento de escogencia en el énfasis de Biotecnología como para la disminución en el énfasis de Biología Marina.
Según la información brindada por la subdirección de la Escuela de Ciencias Biológicas (ECB-UNA), en los últimos 3 años el énfasis de Biotecnología ha sido el que ha presentado mayor demanda por parte de los estudiantes de la carrera, mientras que los énfasis de Biología Tropical y Biología Marina presentan una baja selección, siendo Biología Marina el que recibe la menor cantidad de estudiantes al año. El objetivo de esta investigación es identificar los factores que definen la elección del énfasis en la carrera de Biología de la ECB-UNA.
Establecer si la edad, el género y la condición socioeconómica ha sido un factor que influye en la elección del énfasis.
Identificar si la zona de procedencia y el ámbito laboral tiene influencia en la elección de la carrera.
Inferir si la falta de información, así como el nivel de dificultad respecto a un énfasis afecta en la selección de este.
Se trabajó con una muestra de 63 personas de la población de estudiantes de la carrera de Biología del tronco común, se les aplicó una encuesta (ver anexo 21) mediante Google Forms, para conocer su percepción de los énfasis en diferentes ámbitos. Los datos fueron evaluados en R estudio, previamente se realizó una tabla con los datos obtenidos, contados y organizados. Se usó el estadístico Chi-cuadrado, para determinar cuáles aspectos influenciaron en la elección del énfasis y se analizaron los resultados con base al valor de p obtenido, ya sea p>0.05 o p<0.05.
library(readxl)
Encuesta <- read_excel("C:/Users/Mary/Desktop/Proyecto de biostadística/Encuesta.xlsx")
library(ggplot2)
table(Encuesta$enfasis.que.desea)->Favoritismo
Favoritismo
##
## Biología Marina Biología Tropical Biotecnología
## 12 19 32
qplot(factor(enfasis.que.desea), data=Encuesta, geom = "bar", xlab = "Énfasis de Preferencia", ylab = "Número de personas") + theme_classic()
El siguiente análisis muestra si el género influye en la elección del énfasis (ver anexo 1 y 2).
table(Encuesta$genero,Encuesta$enfasis.que.desea)->genero.vs.enfasis
genero.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## Femenino 7 9 22
## Masculino 5 10 10
fisher.test(genero.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: genero.vs.enfasis
## p-value = 0.3015
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom="bar", fill=genero, xlab = "Énfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys") + theme_classic()
El siguiente análisis muestra si la edad influye en la elección del énfasis (ver anexo 3 y 4).
table(Encuesta$edad,Encuesta$enfasis.que.desea)->edad.vs.enfasis
edad.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## 17 - 19 2 4 9
## 20 - 22 5 12 20
## 23 - 25 4 3 3
## 26 o más 1 0 0
fisher.test(edad.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: edad.vs.enfasis
## p-value = 0.251
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom="bar", fill=edad, xlab = "Énfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys")+ theme_classic()
El siguiente análisis muestra si el año influye en la elección del énfasis (ver anexo 5 y 6).
table(Encuesta$año,Encuesta$enfasis.que.desea)->ano.vs.enfasis
ano.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## 2014 3 2 3
## 2015 1 8 7
## 2016 4 6 11
## 2017 3 3 9
## otro 1 0 2
fisher.test(ano.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: ano.vs.enfasis
## p-value = 0.4822
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom="bar", fill=año, xlab = "Énfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys")+ theme_classic()
El siguiente análisis muestra si el lugar de procedencia influye en la elección del énfasis (ver anexo 7 y 8).
lugar.vs.enfasis<-table(Encuesta$lugar.procedencia,Encuesta$enfasis.que.desea)
lugar.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## Zona Urbana 7 4 19
## Zona Costera 3 1 2
## Zona Rural 2 14 11
fisher.test(lugar.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: lugar.vs.enfasis
## p-value = 0.004842
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom="bar", fill=lugar.procedencia, xlab = "Énfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys")+ theme_classic()
El siguiente análisis muestra si el ámbito laboral influye en la elección del énfasis (ver anexo 9 y 10).
table(Encuesta$ambito.laboral,Encuesta$enfasis.que.desea)->ambito.laboral.vs.enfasis
ambito.laboral.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## Bueno 1 3 14
## Incierto 8 6 9
## Malo 0 5 2
## Regular 3 5 7
fisher.test(ambito.laboral.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: ambito.laboral.vs.enfasis
## p-value = 0.03039
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom = "bar", fill=ambito.laboral, xlab = "Énfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys")+ theme_classic()
El siguiente análisis muestra si la percepción de la importancia del énfasis influye en la elección del mismo (ver anexo 11 y 12).
table(Encuesta$enfasis.mas.importante,Encuesta$enfasis.que.desea)->importancia.vs.enfasis
importancia.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## Biología Marina 8 1 0
## Biología Tropical 1 9 0
## Biotecnología 3 9 32
fisher.test(importancia.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: importancia.vs.enfasis
## p-value = 7.104e-11
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom = "bar", fill=enfasis.mas.importante, xlab = "Énfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys")+ theme_classic()
El siguiente análisis muestra si la información brindada influye en la elección del énfasis (ver anexo 13 y 14).
info.vs.enfasis<-table(Encuesta$informacion,Encuesta$enfasis.que.desea)
info.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## No 6 6 13
## Sí 6 13 19
fisher.test(info.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: info.vs.enfasis
## p-value = 0.5845
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom = "bar", fill=informacion, xlab = "Enfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys") + theme_classic()
El siguiente análisis muestra si la percepción por el nivel de dificultad influye en la elección del énfasis (ver anexo 15 y 16).
dificultad.vs.enfasis<-table(Encuesta$dificultad,Encuesta$enfasis.que.desea)
dificultad.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## No 12 19 29
## Sí 0 0 3
fisher.test(dificultad.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: dificultad.vs.enfasis
## p-value = 0.2913
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom = "bar", fill=dificultad, xlab = "Enfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys")+ theme_classic()
El siguiente análisis muestra si las influencias externas determinan la elección del énfasis (ver anexo 17 y 18).
influencia.vs.enfasis<-table(Encuesta$influencia,Encuesta$enfasis.que.desea)
influencia.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## No 6 16 24
## Si 6 3 8
fisher.test(influencia.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: influencia.vs.enfasis
## p-value = 0.117
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom = "bar", fill=influencia, xlab = "Enfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys")+ theme_classic()
El siguiente análisis muestra si el ingreso económico influye en la elección del énfasis (ver anexo 19 y 20).
economico.vs.enfasis<-table(Encuesta$ingreso.economico,Encuesta$enfasis.que.desea)
economico.vs.enfasis
##
## Biología Marina Biología Tropical
## Entre ¢200.000 y ¢400.000 4 3
## Entre ¢400.000 y ¢600.000 1 2
## Inferior a ¢200.000. 2 8
## Superior a ¢600.000 5 6
##
## Biotecnología
## Entre ¢200.000 y ¢400.000 7
## Entre ¢400.000 y ¢600.000 10
## Inferior a ¢200.000. 8
## Superior a ¢600.000 7
fisher.test(economico.vs.enfasis)
##
## Fisher's Exact Test for Count Data
##
## data: economico.vs.enfasis
## p-value = 0.2966
## alternative hypothesis: two.sided
qplot(factor(enfasis.que.desea), data=Encuesta, geom = "bar", fill=ingreso.economico, xlab = "Enfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys")+ theme_classic()
El siguiente análisis muestra si el hecho de que los estudiantes sean becados o no determina su elección por el énfasis.
table(Encuesta$beca,Encuesta$enfasis.que.desea)->beca.vs.enfasis
beca.vs.enfasis
##
## Biología Marina Biología Tropical Biotecnología
## No 7 9 17
## Sí 5 10 15
chisq.test(beca.vs.enfasis)
##
## Pearson's Chi-squared test
##
## data: beca.vs.enfasis
## X-squared = 0.36894, df = 2, p-value = 0.8315
qplot(factor(enfasis.que.desea), data=Encuesta, geom = "bar", fill=beca, xlab = "Enfasis de Preferencia", ylab = "Número de personas")+scale_fill_brewer(palette = "Greys")+ theme_classic()
library(readxl)
Aumento <- read_excel("C:/Users/Mary/Desktop/Proyecto de biostadística/Aumento.xlsx")
library(ggplot2)
g1<-ggplot(Aumento,aes(Factores))
g1+geom_bar()+labs(x = "Factores",y = "Número de ocasiones")+theme_classic()
library(readxl)
Disminucion <- read_excel("C:/Users/Mary/Desktop/Proyecto de biostadística/Disminucion.xlsx")
library(ggplot2)
g2<-ggplot(Disminucion,aes(Factores2))
g2+geom_bar()+labs(x = "Factores",y = "Número de ocasiones") + theme_classic()
Una investigación realizada por Canto (2011) revela que no hay preferencias de carreras determinadas por el género, sin embargo, en este mismo artículo se menciona un trabajo realizado por Watson y Stead (1994), donde se afirma que la decisión certera de una carrera aumenta conforme la edad y es dependiente del estado socioeconómico y del género, más adelante se menciona que las selecciones hechas no se basan en determinantes como los niveles de dificultad y la forma de aprendizaje, antecedentes, dogmatismo, entre otros. En una encuesta realizada por Segura et al en el 2015 en la UNA, se determinó que hay una relación entre el género y el énfasis por el que se opta.
Según la figura 5, respecto a las variables que tienen incidencia en la escogencia del énfasis, se encontró que el lugar del cual proviene el estudiante sí incurrirá significativamente en su preferencia vocacional, cumpliendo con la hipótesis inicialmente planteada, en la cual se exponía que la mayoría de las personas de zonas rurales tendrían más afinidad por Biología Tropical, debido a que crecieron rodeados de un ambiente natural más denso y desarrollarían un gusto por el mismo y verán una oportunidad de trabajar en aquello que los ha rodeado. Así mismo los encuestados de zona urbana se vieron en su mayoría inclinados por Biotecnología ya que la posible familiarización con una mayor cantidad de compañías, fábricas y zonas francas en general haga que visualicen más factible una carrera evocada a la tecnología e innovación.
Según la figura 6, el 44% de la población encuestada afirma que Biotecnología ha recibido mayor cantidad de estudiantes debido a que consideran que siendo profesionales en esta área cuentan con un buen mercado laboral. Un 33% considera que este es el énfasis con mejor salario y además estiman que este rama ha aumentado su demanda debido a que la tecnología ha abordado ampliamente el área de ciencias exactas en los últimos años esto según un 35% de las respuestas, en efecto, países como Colombia consideran que para el año 2032 productos creados en base a ciencia y tecnología serán clave para la competencia dentro del mercado laboral (Fuentes, 2012).
A las personas que seleccionaron un énfasis de preferencia se les preguntó cómo consideraban su futuro laboral en esa área, y éste fue el resultado: La población que preferiría Biología Marina estaría muy insegura con respecto a su futuro laboral, ya que se indica un 66.66% de incertidumbre, por otra parte; Biotecnología sería el énfasis que presenta seguridad de acuerdo con su paradero laboral (43,75%); Biología Tropical presenta grandes incógnitas pues la población estaría opinando que la oportunidad de laborar en esa área puede ser mala o regular, en igual proporción (26,31%).
Es importante reconocer que a pesar de las preferencias hacia los énfasis y la seguridad de poder conseguir una oportunidad laboral, sigue siendo un tema de gran controversia, así lo señala Barquero, actualmente la Ley General de Salud tiene a más de 2 mil profesionales, de ciencias Biológicas, aislados de posibles empleos en área relacionadas a la salud, lo que ha causado un aumento en el índice de desempleo que supera el 5.61%, además, de no resolverse tal problema aproximadamente 1.300 estudiantes de universidades públicas estarían enfrentando esta situación cuando se gradúen (2016).
De igual forma como se aprecia en la figura 7, se encontró que la percepción que tienen los estudiantes sobre la importancia actual de cada uno de los énfasis es un factor determinante para la escogencia de este, siendo Biotecnología el énfasis considerado como más importante, hecho que puede ser justificado por la creciente demanda de tecnologías novedosas y sobre todo amigables con el ambiente. Según la Comisión Económica para América Latina y el Caribe (CEPAL, 2009), la Biotecnología tiene tres proyecciones principales en la actualidad, las cuales enumeran como: el mejoramiento de costos y desarrollo de productos tradicionales, la modificación de especies por medio de métodos transgénicos y la profundización científica en el funcionamiento molecular, los cuales son ideales de importancia poblacional, que junto a buena educación pueden conllevar al mejoramiento económico y ambiental del país, siendo esta una de las posibles razones que los estudiantes toman en cuenta a la hora de escoger su énfasis.
En la figura 14, se muestran las opiniones con respecto a los cursos introductorios del tronco común. El propósito de los cursos introductorios es reforzar o adquirir nuevos conocimientos que preparan y motivan a los estudiantes universitarios para otras materias más específicas y sirvan de guía también en su elección del énfasis. Los estudiantes consideran que el interés está más dirigido hacia los énfasis de Biología Tropical y Biotecnología a comparación de Biología Marina. Este factor puede estar relacionado también con el ámbito laboral, debido a que se tiende a promocionar o destacar a las especializaciones con mayor posibilidad de generar empleos.
Las tres variables con menor cantidad de opiniones fueron las instalaciones, profesores y equipo de laboratorio de baja calidad, esto indica que dichos factores no son significativos para la mayoría de la población muestreada, por lo tanto, no influyen de manera importante en la preferencia de los estudiantes por Biología Marina. Según los datos obtenidos en la encuesta los estudiantes no han optado por elegir el énfasis de Biología Marina debido a la preocupación por el desempleo o una oferta laboral muy baja.
Actualmente, el área científica no está produciendo los puestos de trabajo más ideales en Costa Rica, más bien las carreras relacionadas con tecnología o idiomas presentan mayor promoción y puestos de trabajo con salarios favorables. Por lo tanto, los estudiantes de Biología de la Universidad Nacional tienden a preferir los énfasis más relacionados con el área tecnológica (Biotecnología). En el caso de Biología Marina, este se enfoca más en el estudio de los organismos acuáticos y su relación con el medio ambiente marino, que en las áreas ya mencionadas.
Según los datos obtenidos, sobre la opinión de los estudiantes de Biología y el posterior análisis de los mismos se puede concluir:
El género, la edad y la condición socioeconómica no poseen una relación significativa en la elección del énfasis. El lugar de procedencia muestra una asociación significativa en la escogencia del énfasis. Los estudiantes provenientes de zonas rurales tienden a preferir Biología Tropical y los de zonas urbanas Biotecnología. La escasez de información brindada a los estudiantes no determina su elección por el énfasis. El ámbito laboral está asociado a la decisión por los énfasis. Los estudiantes consideran que el énfasis de Biología Marina es el que presenta la menor oportunidad laboral; por lo tanto, no es una opción viable para su futuro profesional, en contraste con Biotecnología que muestra mejores expectativas. La percepción por el nivel de dificultad de los distintos énfasis no influye de manera importante con respecto a la escogencia de los énfasis.
Elegir una muestra más grande para encontrar más respuestas sobre las personas que quieren Biología Marina.
Analizar también las respuestas de los estudiantes que aún no se han decidido por un énfasis.
Desglosar las preguntas de respuestas múltiples, para evaluar los factores por separados y tener un resultado estadístico certero.
Canto, J. E. (2011). Certeza de elección de carrera y preferencia vocacional. Revista Educación y Ciencia (ISSN 2448-525X), 4(21).
Barquero, K. (2016). Piden Modificación de un Artículo en la Ley General de Salud. Recuperado de http://www.crhoy.com/archivo/biologos-reclaman-discriminacion-laboral-por-parte-del-estado/nacionales/
Fuentes, H. G., & Valenzuela, C. (2012). La investigación en la currícula de las Escuelas de Bibliotecología de la Universidad Tecnológica Metropolitana y de la Universidad de Playa Ancha de Ciencias de la Educación (Chile). Transinformação-ISSNe 2318-0889, 15(2).
Bisang,R., Campi,M., & Cesa, V . (2009). Biotecnología y desarrollo. Santiago, Chile: CEPAL. Recuperado de:http://repositorio.cepal.org/bitstream/handle/11362/3650/S2009064_es.pdf?sequence=1&isAllowed=y
chisq.test(genero.vs.enfasis)$expected
## Warning in chisq.test(genero.vs.enfasis): Chi-squared approximation may be
## incorrect
##
## Biología Marina Biología Tropical Biotecnología
## Femenino 7.238095 11.460317 19.30159
## Masculino 4.761905 7.539683 12.69841
prop.table(genero.vs.enfasis)
##
## Biología Marina Biología Tropical Biotecnología
## Femenino 0.11111111 0.14285714 0.34920635
## Masculino 0.07936508 0.15873016 0.15873016
chisq.test(edad.vs.enfasis)$expected
## Warning in chisq.test(edad.vs.enfasis): Chi-squared approximation may be
## incorrect
##
## Biología Marina Biología Tropical Biotecnología
## 17 - 19 2.8571429 4.5238095 7.6190476
## 20 - 22 7.0476190 11.1587302 18.7936508
## 23 - 25 1.9047619 3.0158730 5.0793651
## 26 o más 0.1904762 0.3015873 0.5079365
prop.table(edad.vs.enfasis)
##
## Biología Marina Biología Tropical Biotecnología
## 17 - 19 0.03174603 0.06349206 0.14285714
## 20 - 22 0.07936508 0.19047619 0.31746032
## 23 - 25 0.06349206 0.04761905 0.04761905
## 26 o más 0.01587302 0.00000000 0.00000000
chisq.test(ano.vs.enfasis)$expected
## Warning in chisq.test(ano.vs.enfasis): Chi-squared approximation may be
## incorrect
##
## Biología Marina Biología Tropical Biotecnología
## 2014 1.5238095 2.4126984 4.063492
## 2015 3.0476190 4.8253968 8.126984
## 2016 4.0000000 6.3333333 10.666667
## 2017 2.8571429 4.5238095 7.619048
## otro 0.5714286 0.9047619 1.523810
prop.table(ano.vs.enfasis)
##
## Biología Marina Biología Tropical Biotecnología
## 2014 0.04761905 0.03174603 0.04761905
## 2015 0.01587302 0.12698413 0.11111111
## 2016 0.06349206 0.09523810 0.17460317
## 2017 0.04761905 0.04761905 0.14285714
## otro 0.01587302 0.00000000 0.03174603
chisq.test(lugar.vs.enfasis)$expected
## Warning in chisq.test(lugar.vs.enfasis): Chi-squared approximation may be
## incorrect
##
## Biología Marina Biología Tropical Biotecnología
## Zona Urbana 5.714286 9.047619 15.238095
## Zona Costera 1.142857 1.809524 3.047619
## Zona Rural 5.142857 8.142857 13.714286
prop.table(lugar.vs.enfasis)
##
## Biología Marina Biología Tropical Biotecnología
## Zona Urbana 0.11111111 0.06349206 0.30158730
## Zona Costera 0.04761905 0.01587302 0.03174603
## Zona Rural 0.03174603 0.22222222 0.17460317
chisq.test(ambito.laboral.vs.enfasis)$expected
## Warning in chisq.test(ambito.laboral.vs.enfasis): Chi-squared approximation
## may be incorrect
##
## Biología Marina Biología Tropical Biotecnología
## Bueno 3.428571 5.428571 9.142857
## Incierto 4.380952 6.936508 11.682540
## Malo 1.333333 2.111111 3.555556
## Regular 2.857143 4.523810 7.619048
prop.table(ambito.laboral.vs.enfasis)
##
## Biología Marina Biología Tropical Biotecnología
## Bueno 0.01587302 0.04761905 0.22222222
## Incierto 0.12698413 0.09523810 0.14285714
## Malo 0.00000000 0.07936508 0.03174603
## Regular 0.04761905 0.07936508 0.11111111
chisq.test(importancia.vs.enfasis)$expected
## Warning in chisq.test(importancia.vs.enfasis): Chi-squared approximation
## may be incorrect
##
## Biología Marina Biología Tropical Biotecnología
## Biología Marina 1.714286 2.714286 4.571429
## Biología Tropical 1.904762 3.015873 5.079365
## Biotecnología 8.380952 13.269841 22.349206
prop.table(importancia.vs.enfasis)
##
## Biología Marina Biología Tropical Biotecnología
## Biología Marina 0.12698413 0.01587302 0.00000000
## Biología Tropical 0.01587302 0.14285714 0.00000000
## Biotecnología 0.04761905 0.14285714 0.50793651
chisq.test(info.vs.enfasis)$expected
## Warning in chisq.test(info.vs.enfasis): Chi-squared approximation may be
## incorrect
##
## Biología Marina Biología Tropical Biotecnología
## No 4.761905 7.539683 12.69841
## Sí 7.238095 11.460317 19.30159
prop.table(info.vs.enfasis)
##
## Biología Marina Biología Tropical Biotecnología
## No 0.0952381 0.0952381 0.2063492
## Sí 0.0952381 0.2063492 0.3015873
chisq.test(dificultad.vs.enfasis)$expected
## Warning in chisq.test(dificultad.vs.enfasis): Chi-squared approximation may
## be incorrect
##
## Biología Marina Biología Tropical Biotecnología
## No 11.4285714 18.0952381 30.47619
## Sí 0.5714286 0.9047619 1.52381
prop.table(dificultad.vs.enfasis)
##
## Biología Marina Biología Tropical Biotecnología
## No 0.19047619 0.30158730 0.46031746
## Sí 0.00000000 0.00000000 0.04761905
chisq.test(influencia.vs.enfasis)$expected
## Warning in chisq.test(influencia.vs.enfasis): Chi-squared approximation may
## be incorrect
##
## Biología Marina Biología Tropical Biotecnología
## No 8.761905 13.873016 23.365079
## Si 3.238095 5.126984 8.634921
prop.table(influencia.vs.enfasis)
##
## Biología Marina Biología Tropical Biotecnología
## No 0.09523810 0.25396825 0.38095238
## Si 0.09523810 0.04761905 0.12698413
chisq.test(economico.vs.enfasis)$expected
## Warning in chisq.test(economico.vs.enfasis): Chi-squared approximation may
## be incorrect
##
## Biología Marina Biología Tropical
## Entre ¢200.000 y ¢400.000 2.666667 4.222222
## Entre ¢400.000 y ¢600.000 2.476190 3.920635
## Inferior a ¢200.000. 3.428571 5.428571
## Superior a ¢600.000 3.428571 5.428571
##
## Biotecnología
## Entre ¢200.000 y ¢400.000 7.111111
## Entre ¢400.000 y ¢600.000 6.603175
## Inferior a ¢200.000. 9.142857
## Superior a ¢600.000 9.142857
prop.table(economico.vs.enfasis)
##
## Biología Marina Biología Tropical
## Entre ¢200.000 y ¢400.000 0.06349206 0.04761905
## Entre ¢400.000 y ¢600.000 0.01587302 0.03174603
## Inferior a ¢200.000. 0.03174603 0.12698413
## Superior a ¢600.000 0.07936508 0.09523810
##
## Biotecnología
## Entre ¢200.000 y ¢400.000 0.11111111
## Entre ¢400.000 y ¢600.000 0.15873016
## Inferior a ¢200.000. 0.12698413
## Superior a ¢600.000 0.11111111