Prácticas de Estadística en R - Departamento de Estadística e ...

4.6 Ejercicios de exámenes 31
Añade el título y el nombre de los ejes.
Marca el centro de la elipse con un punto.
7. (Examen 06). El archivo grupo.RData contiene el data.frame grupo, con información
referente a las edades y sexo de 47 personas. Carga el archivo y calcula lo
siguiente:
a) Edad media de todo el grupo. (guarda el resultado en media.grupo)
b) Edad media según sexo. (guarda el resultado en media.sexo)
Para cargar los objetos del archivo simplemente utiliza (cuidado con el path):
load("grupo.RData")
attach(grupo)
8. (Examen 06). En el fichero matrices.txt están guardadas dos matrices A y B,
que podrían ser la solución de dos juegos de sudoku.
a) Importa los datos del fichero y guarda las matrices en dos objetos de R.
b) Calcula el producto matricial de las dos matrices y el producto componente
a componente.
c) Utiliza la función apply para comprobar que en una matriz que sea solución
de un sudoku como los del fichero todas las filas y columnas suman lo mismo.
Nota: Si trabajas con objetos data.frame puede que sea de utilidad la función
as.matrix.
9. (Examen 06). Escribe una función expendedora en R que simule el comportamiento
de una máquina expendedora de bebidas. La máquina debe ofrecer al usuario
la posibilidad de elegir entre:
Agua (1 euro)
Cola (1,50 euros)
Zumo natural (2.5 euros)
a) El usuario debe seleccionar una bebida. El programa le pedirá que introduzca
una cantidad de dinero por teclado.
b) Si la cantidad de dinero introducida no es suficiente para la bebida seleccionada
se le indicará cuánto falta.
c) Si la cantidad de dinero introducida coincide con el precio de la bebida seleccionada
se le indicará que la operación realizada es correcta.
d) Si la cantidad de dinero introducida es mayor que el precio de la bebida
seleccionada se le indicará la cantidad de dinero a devolver.