Lab 8

.pdf

School

UPR Bayamon *

*We aren’t endorsed by this school

Course

3017

Subject

Statistics

Date

May 2, 2024

Type

pdf

Pages

8

Uploaded by GrandElement6597 on coursehero.com

Universidad de Puerto Rico Recinto de Bayamón Laboratorio 8: Software Estadístico R Adrián C. Meléndez Feliciano 841-21-2386 SICI-3017-EL1 Prof. Elio Lozano 5 de Diciembre del 2023
s de comenzar la Nombre: Adrián C. Meléndez Feliciano Fecha: 5 de diciembre del 2023 Sección: EL1 Conteste las siguientes preguntas y entregue este pre-laboratorio a su profesor ante experiencia del laboratorio A. Un archivo students.txt tiene encabezado (primera fila) con los siguientes atributos: Name, LastName, Code, Sex y Age. Este archivo tiene el carácter “:” como separador y se encuentra en el directorio C:\temp (Windows) o /temp (MacOS). Escribir una instrucción en R para leer los datos de este archivo en la variable estudiantes. Escribir otra instrucción en R para guardar los datos que se encuentran en la variable estudiantes en un archivo students.csv que estará dentro del directorio C:\temp (Windows) o /temp (MacOS). # Leer datos del archivo students.txt estudiantes <- read.table("C:/temp/students.txt", header = TRUE, sep = ":", quote = "", stringsAsFactors = FALSE) # Guardar datos en un archivo students.csv write.csv(estudiantes, file = "C:/temp/students.csv", row.names = FALSE) B. Utilizando la data chol.txt, Cual es la media de AGE, mediana de HEIGHT, varianza de WEIGHT y la desviación estándar de CHOL? Age media: 35.715 Height Mediana: 172 Weight Varianza: 109.037 Chol Desviación Estándar: 44.76673 C. Crear una gráfica utilizando los datos de “airquality” que se encuentra en R. ¿Cual es la instrucción para crear una gráfica de puntos scatter entre las variables airquality$ozone (eje X) y airquality$Wind (eje Y)? La grafica tendrá etiquetas para el eje X (Ozone Levels), para el eje Y (Wind speed), para el titulo (Ozone Levels vs Wind Speed), y cualquier color. # Crear la gráfica de puntos (scatter plot) plot(airquality$ozone, airquality$Wind, xlab = "Ozone Levels", ylab = "Wind speed", main = "Ozone Levels vs Wind Speed", col = "blue") # Puedes ajustar el color según tus preferencias Pre Laboratorio. Lenguaje de Programación Estadístico R
D. Escribir una función en R para hallar el pago mensual de un préstamo hipotecario. La función recibe como parámetros el capital del préstamo inicial (P), el porciento de interés anual (apr) y la cantidad de años (years). Utilizar las siguientes fórmulas para hallar el pago mensual (payment). 𝑎?? ????ℎ?𝑦𝑅𝑎?? = 12 ???𝑖??? = 𝑦?𝑎?? 12 ? = (1 + ????ℎ?𝑦𝑅𝑎?? ) ???𝑖??? 1 𝑃 ????ℎ?𝑦𝑅𝑎?? ( ? + 1) ?𝑎𝑦???? = ? calcular_pago_mensual <- function(P, apr, years) { # Calcular la tasa de interés mensual monthly_rate <- apr / 12 / 100 periods <- years * 12 r <- ((1 + monthly_rate)^periods) 1 payment <- P * monthly_rate * (r + 1) / r return(payment)
Your preview ends here
Eager to read complete document? Join bartleby learn and gain access to the full version
  • Access to all documents
  • Unlimited textbook solutions
  • 24/7 expert homework help