Solucion Compendio 5 y 6
Solucion Compendio 5 y 6
Solucion Compendio 5 y 6
A.)Salarios=
Trabajadores
No
Salarios
Rector
Secretarias
Coordinadores
Docentes
Celadores
Aseadoras
1
4
2
45
3
4
2000.000
750.000
1500.000
1200.000
600.000
450.000
20000001+7500004+15000002+120000045+6000003+4500004
59
65600000
=1111.864
59
B.)
Salarios=
Trabajadores
No
Salarios
Rector
Secretarias
Coordinadores
Docentes
Celadores
Aseadoras
1
4
2
45
3
4
2002.100
752.100
1502.100
1202.100
602.100
452.100
20021001+7521004+15021002+120210045+6021003+4521004
59
65723900
59
=1113.964
Estudiantes
Cantidad
Peso
1
2
3
4
15
20
10
18
162
148
153
140
16215+14820+15310+14018
63
Peso=
9440
63
=149,8
2.3
1.8
1.7
3.8
3.3
1.0
2.9
1.0
4.1
2.2
5.0
3.1
3.8
4.4
4.6
3.2
4.2
4.2
4.5
4.1
2.8
3.3
3.1
4.0
4.4
3.5
1.8
1.7
3.5
3.3
4.2
2.9
1.5
3.3
4.8
5.0
4.4
2.6
2.1
4.4
rango=0,7*6=4.2
diferencia = 4.2-4=0.2
xmin= 1-0.1=0.9
xmax=5+0.1=5.1
Intervalos
xi
f* xi
0.9-1.6
1.25
3.75
1.6-2.3
1.95
13.65
2.3-3
2.65
13.25
3-3.7
12
3.35
40.20
3.7-4.4
12
4.05
48.60
4.4-5.1
4.75
28.50
45
Notas
media=
147.95
45
147.95
= 3.28
B.) en realidad no, puesto que la media pone al grupo en un trmino promedio de
3.28 excluyendo a 20 estudiantes que estn por encima de la media que
demuestran que hay ms nivel en el grupo y si les da una posicin privilegiada a una
parte del grupo que se encuentra muy por debajo de la nota promedio.
C.) mujeres:
4.5
3.2
2.3
1.8
1.0
2.9
5.0
3.1
3.2
4.2
2.8
3.3
3.5
1.8
4.2
2.9
5.0
4.4
1.0
4.1
2.2
3.8
4.4
4.6
4.2
4.5
4.1
3.1
4.0
4.4
1.7
3.5
3.3
1.5
3.3
4.8
2.6
2.1
4.4
Hombres:
3.3
3.3
2.7
1.7
3.8
3.3
4.5+2,3+1+52+3,22+2,8+3.5+4,22+1,82+2,92+3,1+3,3+4,4
18
Mujeres=
=3.28
3.35+1.72+1+2.2+3.82+4,2+3.1+4.6+1.5+2.6+4.12+4.8+4.43+4.5+4+3.5+2.1+2.7
27
Hombres=
3.2818+3.3227
45
=3.32
= 3.304
70
86
75
72
66
90
85
70
72
81
70
75
84
62
66
74
82
75
68
83
81
65
75
70
73
65
82
80
66
73
95
72
85
84
75
68
80
75
68
80
78
73
72
68
84
75
72
80
rango=7*5=35
diferencia =35-33=2
xmin= 62-1=61
xmax=95+1=96
Intervalos
xi
f* xi
61-66
63.5
381
66-71
68.5
548
71-76
16
73.5
1176
76-81
78.5
471
81-86
83.5
751.5
86-91
88.5
88.5
Precios
91-96
47
3509.5
47
93.5
93.5
3509.5
= 74.67
C.)
intervalos
(61,66]
(66,71]
(71,76]
(76,81]
(81,86]
(86,91]
(91,96]
f
6
8
16
6
9
1
1
h
0.1276596
0.1702128
0.3404255
0.1276596
0.1914894
0.0212766
0.0212766
Fa
2
*C
Mediana= Me= Li +
f
47
14
ME=71 + ( 2 16 ) 5 = 73.96875
47
347
30
4
347
14
10
16
547
14
10
16
747
30
10
P80=81 + (
P70=76 + (
V2=71 + (
) 5 = 80.375
) 5 = 71.03125
) 5 = 73.96875
) 5 = 78.41667
8047
36
100
) 5 = 81.8889
8047
30
100
) 5 = 78.41667
247
14
5
16
) 5 = 72.5
347
14
5
V3=71 + (
16
) 5 = 75.4375
F
6
14
30
36
45
46
47
H
0.1276596
0.2978723
0.6382979
0.7659574
0.9574468
0.9787234
10.000.000
marca
63.5
68.5
73.5
78.5
83.5
88.5
93.5
X
381.0
548.0
1176.0
471.0
751.5
88.5
93.5
Pesos
118 _ 126
127 _ 135
136 _ 144
145 _ 153
154 _ 162
163 _ 171
172 _ 180
Frecuencias
3
6
8
10
7
4
2
Pesos
xi
f* xi
118-126
122
366
127-135
131
786
136-144
17
140
1120
145-153
10
27
149
1490
154-162
34
158
1106
163-171
38
167
668
172-180
40
176
352
40
5888
40
40
17
5888
= 147.2
No de palabras ledas
Dislxicos
Normales
26
24
27
16
21
28
12
29
29
10
28
30
32
Calcule:
No de palabras ledas
Dislxicos
No de palabras ledas
Normales
26
24
26
27
16
27
21
28
12
28
29
29
10
29
28
30
30
32
a.) dislxicos
> datos=read.table("dis.txt")
> attach(datos)
> datos
> f=table(datos)
>f
> x=c(26,27,28,29,30)
X
> cbind(x,f)
> xf=x*f
> xf
> cbind(x,f,xf)
> n=sum(f)
datos
26 27 28 29 30
24 16 12 10 2
[1] 26 27 28 29 30
x f
26 26 24
27 27 16
28 28 12
29 29 10
30 30 2
datos
26 27 28 29 30
624 432 336 290 60
x f xf
26 26 24 624
27 27 16 432
28 28 12 336
29 29 10 290
30 30 2 60
[1] 64
>n
> media=sum(xf)/n
> media
[1] 27.21875
Normales
> datos=read.table("normales.txt")
> attach(datos)
> datos
> f=table(datos)
>f
> x=c(26,27,28,29,30)
X
> cbind(x,f)
> xf=x*f
> xf
> cbind(x,f,xf)
> n=sum(f)
>n
> media=sum(xf)/n
> media
datos
26 27 28 29 30
9 21 29 28 32
[1] 26 27 28 29 30
x f
26 26 9
27 27 21
28 28 29
29 29 28
30 30 32
datos
26 27 28 29 30
234 567 812 812 960
x f xf
26 26 9 234
27 27 21 567
28 28 29 812
29 29 28 812
30 30 32 960
[1] 119
[1] 28.44538
Q1
quantile(datos, prob = c(0.25))
Q3
quantile(datos, prob = c(0.75))
D5
quantile(datos, prob = c(0.50))
D7
quantile(datos, prob = c(0.70))
P35
quantile(datos, prob = c(0.35))
P70
quantile(datos, prob = c(0.70))
25%
26
75%
28
50%
27
70%
28
35%
26
70%
28
Normales:
Q1
quantile(datos, prob = c(0.25))
Q3
quantile(datos, prob = c(0.75))
D5
quantile(datos, prob = c(0.50))
D7
quantile(datos, prob = c(0.70))
P35
quantile(datos, prob = c(0.35))
P70
quantile(datos, prob = c(0.70))
25%
27.5
75%
30
50%
29
70%
29
35%
28
70%
29
e.)
No de palabras ledas
Dislxicos
26
24
27
16
28
12
29
10
30
No de palabras ledas
Normales
26
27
21
28
29
29
28
30
32
f.) pues el hecho de que fueron ms las personas normales las que lograron leer
ms palabras que las personas dislxicas.
Sujetos con
Intervalos
Frecuencia
Frecuencia
6 10
75
19
10 16
35
26
16 22
20
25
22 28
30
30
28 34
25
54
34 40
15
46
SOLUCIN
A)
Frecuencia
6 10
75
10 16
35
16 22
20
22 28
30
28 34
25
34 40
15
> f=c(75,35,20,30,25,15)
> liminf=c(6,10,16,22,28,34)
cbind (f)
f
[1,] 75
[2,] 35
[3,] 20
[4,] 30
[5,] 25
[6,] 15
[1] 8 13 19 25 31 37
> limsup=c(10,16,22,28,34,40)
> marca=(limsup+liminf)/2
> marca
> X=f*marca
>X
> F=cumsum(f)
>F
> cbind(f,F,marca,X)
> n=200
>n
> media=sum(X)/n
> media
> n/2
> li=10
> Fa=75
> fo=35
> c=4
> me=li+((n/2-Fa)/fo)*c
> me
> fo=75
> fa=0
> fs=35
> li=6
> delta1=fo-fa
> delta1
> delta2=fo-fs
> delta2
> mo=li+(delta1/(delta1+delta2))*c
> mo
> cbind(media,me,mo)
[1] 75
[1] 40
[1] 8.608696
media
me
mo
[1,] 17.575 12.85714 8.608696
Nivel socioeconmico
Intervalos
Frecuencia
6 10
19
10 16
26
16 22
25
22 28
30
28 34
54
34 40
46
> f=c(75,35,20,30,25,15)
>cbind(f)
> liminf=c(6,10,16,22,28,34)
> limsup=c(10,16,22,28,34,40)
> marca=(limsup+liminf)/2
> marca
> X=f*marca
>X
> F=cumsum(f)
>F
> cbind(f,F,marca,X)
> n=200
>n
> media=sum(X)/n
> media
> n/2
> li=22
> Fa=70
Sujetos con
f
[1,] 19
[2,] 26
[3,] 25
[4,] 30
[5,] 54
[6,] 46
[1] 8 13 19 25 31 37
f F marca X
[1,] 19 19 8 152
[2,] 26 45 13 338
[3,] 25 70 19 475
[4,] 30 100 25 750
[5,] 54 154 31 1674
[6,] 46 200 37 1702
[1] 200
[1] 25.455
[1] 100
[1] 26
> fo=30
> c=4
> me=li+((n/2-Fa)/fo)*c
> me
> fo=54
> fa=30
> fs=46
> li=28
> delta1=fo-fa
> delta1
> delta2=fo-fs
> delta2
> mo=li+(delta1/(delta1+delta2))*c
> mo
> cbind(media,me,mo)
[1] 24
[1] 8
[1] 31
media me mo
[1,] 25.455 26 31
8). Considere las siguientes medidas: media, mediana, moda, (max + min)/2, primer
cuartil, tercer cuartil. Dos de las propiedades de abajo pertenecen a las medidas
anteriores.
1. Su valor siempre tiene que ser igual a uno de los datos observados.
2. Divide al conjunto de datos en dos conjuntos de igual tamao.
3. Es el centro de los datos en un intervalo de clase.
4. Siempre existe.
9).Se ha definido una nueva medida Cuantil, los Quintiles, en cuantas partes divide
a una distribucin los quintiles, y cul es el quintil cuyo valor corresponde a la
mediana?
1. 5 partes
2. El 3 quintil
3. 50 partes
4. El segundo Quintil
10).Si se dan los siguientes Cuantles: Q1; Q2 ; Q3; D2; D5; D8; P25; P50; P90; en
cual de los siguientes alternativas los Cuantles mostrados son equivalentes
11). Se sabe que ninguna de las sucursales de una empresa comercial tiene ms de 9
empleados o menos de 7. La mayora tiene 8 empleados, pero el 25% tiene 9
empleados y una de cada 10 sucursales tiene 7 empleados. Cul es el promedio de
empleados por sucursal?.
A. 10.15
B. 8.15
C. 9.15
D. 15.15
E. 11.15
Cargos
Numero Salario
Directores
930.000
Supervisores
510.000
Economistas
370.000
Contadores
350.000
Auxiliares
26
246.000
Obreros
110
190.000
El valor de la media y el Q2
1. 250.000
2. 360.000
3. 229052
4 370.000
15). Los siguientes datos representan las edades de los pacientes admitidos al
hospital departamental de Villavicencio durante el mes de agosto de este ao:
37 62 47 54
81 1
54
63
16 3
64
11 39 16 4
34
22 24
80 4
35 58
24
71 84 8
7
10
6
10
>datos=c(37,62,47,54,54,8,63,7,81,1,16,3,64,2,24,
[1] 37 62 47 54 54 8 63 7 81
10,11,39,16,4,34,22,24,6,80,4,35,58,71,84,8,10)
1 16 3 64 2 24 10 11 39 16 4
> datos
34 22 24 6 80 4 35 58 71 84
8 10
> mean(datos)
> Varianza<-function(x=NA)
+{
+ n=length(x)
+ media=sum(x)/n
+ v<-sum((x-media) ^2)/n
+ return(v)
+}
> Varianza(datos)
[1] 32.46875
[1] 707.374
16). Una compaa recoge informacin sobre los precios de libros de texto de
matemticas. En el 2000, el precio promedio para todos los textos de matemticas
era de $45.400, con una desviacin tpica de $100. Los precios de 32 libros de
matemticas seleccionados al azar durante este ao son:
50 40 41 48 48 42 49 50
48 45 56 41 57 42 45 46
45 66 45 45 55 66 42 50
46 46 55 48 45 58 47 35
El precio promedio de los libros para este ao es mayor que el precio de los libros
en el ao 2000 POR QUE, el coeficiente de variacin es tambin mayor.
I.
II.
X=3,2,0,5
Media=2.5
Varianza=3.25
Y=12,8,0,20
Media =10
Varianza=52
Coeficiente variacin X
> Cv<-function(x=NA)
[1] 0.7211103
+{
+ n=length(x)
+ media=sum(x)/n
+v<-(sqrt(sum((x-media) ^2)/n))/media
+ return(v)
+}
> datos=c(12,8,0,20)
> Cv(datos)
> Cv<-function(x=NA)
[1] 0.7211103
+{
+ n=length(x)
+ media=sum(x)/n
+v<-(sqrt(sum((x-media) ^2)/n))/media
+ return(v)
+}
> datos=c(3,2,0,5)
> Cv(datos)
A. 60.6 %
E. 55.6%
B. 70.6%
C. 75.6%
D. 65.6%
A. 100
B. 96
C. 45
D. 99
E. 9
22). Una cantidad que se toma en cuenta para evaluar proyectos azarosos es la
desviacin estndar. sta mide la dispersin de los resultados del proyecto
azaroso. Es decir, si hay dos proyectos: A y B. Y si la desviacin estndar del
rendimiento del proyecto A es mayor que la del B. El proyecto A es ms arriesgado,
el B es ms Estable. Si ambos tienen valor esperado parecido el A tiene
posibilidades de rendir mucho ms que el B pero, tambin el A tiene posibilidad de
generar mayores prdidas que el B.
La Afirmacin anterior es verdadera porque:
Generalmente
Kg./Cm2
100_ 200
200_ 300
10
300_ 400
21
400_ 500
33
500_ 600
18
600_ 700
700_ 800
interesa
establecer
comparaciones
de
la
unidades
de
medida.
Concluimos que:
100
101
120
115
130
150
112
145
138
121
126
115
140
137
143
118
147
149
150
115
100
127
135
149
146
137
122
118
135
129
>datos=c(100,101,120,115,130,150,1
[1] 100 101 120 115 130 150 112 145 138 121
12,145,138,121,126,115,140,137,14
126 115 140 137 143 118 147 149 150 115 100
3,118,147,149,150,115,100,127,135,
149,146,137,122,118,135,129)
[30] 129
> datos
> rang=max(datos)-min(datos)
[1] 50
> rang
> m=round(1+3.3*log10(30))
[1] 6
>m
> c=rang/m
[1] 8.333333
>c
Aproximamos=9
> nuevo=c*m
[1] 54
> nuevo
> inicio=min(datos)-2
> final=max(datos)+2
inicio final
[1,]
98 152
> cbind(inicio,final)
>intervalos=cut(datos,breaks=c(98, [1] (98,107]
(98,107]
(116,125] (107,116]
107,116,125,134,143,152))
> intervalos
(134,143] (143,152]
> f=table(intervalos)
intervalos
>f
(98,107]
(107,116]
(116,125]
(125,134]
(134,143] (143,152]
3
> n=sum(f)
[1] 30
>n
> F=cumsum(f)
(98,107]
(107,116]
>F
(134,143] (143,152]
3
(116,125]
12
(125,134]
16
23
30
> liminf=c(98,107,116,125,134,143) [1] 102.5 111.5 120.5 129.5 138.5 147.5
>
limsup=c(107,116,125,134,143,152)
> marca=(limsup+liminf)/2
> marca
> x=f*marca
intervalos
>x
(98,107]
(107,116]
(116,125]
(125,134]
602.5
518.0
(134,143] (143,152]
307.5
969.5
cbind(f,F,marca,x)
446.0
1032.5
f F marca
[1] 129.2
> n/2
[1] 15
> Fa=12
[1] 131.75
> fo=4
> li=125
> Q2=li+((2*n/4-Fa)/fo)*c
> Q2
> d2=(marca-media)^2*f
intervalos
> d2
(98,107]
(107,116]
(116,125]
(125,134]
378.45
0.36
(134,143] (143,152]
2138.67
1253.16
605.43 2344.23
cbind(f,F,marca,d2)
f F marca
d2
0.36
[1] 224.01
> varianza
> ds=sqrt(varianza)
[1] 14.96696
> ds
> cv=ds/media
[1] 0.1158434
> cv
A. 6.2%
B. 795.82%
C. 2.6%
D. 5.4%
E. 1.8%