Prácticas de Estadística en R - Departamento de Estadística e ...
Prácticas de Estadística en R - Departamento de Estadística e ...
Prácticas de Estadística en R - Departamento de Estadística e ...
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
4.6 Ejercicios <strong>de</strong> exám<strong>en</strong>es 29<br />
2. (Exam<strong>en</strong> 05) Escribe una función que, dados un vector numérico x y un número<br />
natural M, realice el sigui<strong>en</strong>te cálculo: Sumar una a una las compon<strong>en</strong>tes <strong>de</strong>l vector<br />
x y <strong>de</strong>t<strong>en</strong>erse una vez que pasemos <strong>de</strong> M. En este mom<strong>en</strong>to, <strong>de</strong>volver al usuario<br />
lo sigui<strong>en</strong>te:<br />
a) La suma obt<strong>en</strong>ida.<br />
b) Un vector que cont<strong>en</strong>ga los elem<strong>en</strong>tos <strong>de</strong> x que hemos usado para obt<strong>en</strong>er<br />
dicha suma.<br />
La forma más cómoda <strong>de</strong> <strong>de</strong>volver varios valores es a través <strong>de</strong> una lista:<br />
return(list(suma=variable_suma,vector=vector_elem<strong>en</strong>tos_usados))<br />
3. (Exam<strong>en</strong> 05). Importa <strong>de</strong> la página http://onlae.terra.es/in<strong>de</strong>xp.htm los datos<br />
correspondi<strong>en</strong>tes a los resultados <strong>de</strong> la primitiva <strong>en</strong> el 2005 (hasta el 5 <strong>de</strong> marzo).<br />
Importar sólo <strong>de</strong>s<strong>de</strong> la columna <strong>de</strong> recaudaciones <strong>en</strong> a<strong>de</strong>lante. Después calcula lo<br />
sigui<strong>en</strong>te:<br />
a) Media <strong>de</strong> acertantes por categoría. (media por columnas)<br />
b) Media <strong>de</strong> acertantes por jornada. (media por filas)<br />
c) Media <strong>de</strong> acertantes por categoría los sorteos con bote.<br />
d) Total <strong>de</strong> dinero recaudado.<br />
e) Total repartido <strong>en</strong> premios.<br />
4. (Exam<strong>en</strong> 05). Escribe una función que dado un número compruebe si es natural<br />
o no y a<strong>de</strong>más:<br />
Si el número no es natural <strong>de</strong>berá mostrarse un m<strong>en</strong>saje <strong>de</strong> error.<br />
Si el número es natural <strong>de</strong>berá <strong>de</strong>volverse un vector con sus divisores.<br />
Será <strong>de</strong> ayuda usar la función as.integer.<br />
5. (Exam<strong>en</strong> 05). Cargar los objetos <strong>de</strong>l archivo plantas.RData y calcular, para el<br />
data.frame plantas, lo sigui<strong>en</strong>te:<br />
a) Media <strong>de</strong> la anchura <strong>de</strong> sépalo.<br />
b) Media <strong>de</strong> la anchura <strong>de</strong> sépalo agrupada por especie.<br />
c) Media <strong>de</strong> la anchura <strong>de</strong> sépalo cuando la anchura <strong>de</strong>l pétalo es superior a 1.4.<br />
d) Media <strong>de</strong> la anchura <strong>de</strong> sépalo agrupada por especie cuando la anchura <strong>de</strong>l<br />
pétalo es superior a 1.4.<br />
e) Media <strong>de</strong> la longitud <strong>de</strong>l sépalo cuando la anchura <strong>de</strong>l sépalo es inferior a 3.5.<br />
f ) Media <strong>de</strong> la longitud <strong>de</strong>l sépalo cuando la anchura <strong>de</strong>l sépalo es inferior a 3.5<br />
y la anchura <strong>de</strong>l pétalo es superior a 0.2.