Tarea II

Presentación del ejercicio
Imagine que está haciendo un pequeño análisis sobre algunas de las canciones más escuchadas en 2025. Tiene información de cinco canciones populares, incluyendo el nombre del artista, la canción y las reproducciones en millones.

A continuación se presentan los datos:

Datos

Artistas <- c("Alejandro Sanz", "Duran Duran", "Luis Miguel", "Auténticos decadentes", "Maluma")
Canciones <- c("Contigo", "Come Undone", "Suave", "No me importa el dinero", "Hawaii")
Reproducciones <- c(7.67, 250.8, 267.2, 120, 1585)

Ahora calcularemos los ingresos que obtienen los artistas por estas canciones:

# Crear vector de ingresos (Reproducciones * 0.003)
ingresos <- Reproducciones * 0.003
ingresos

## [1] 0.02301 0.75240 0.80160 0.36000 4.75500

M1 <- cbind(Artistas, Canciones, Reproducciones, ingresos)
M1

##      Artistas                Canciones                 Reproducciones ingresos 
## [1,] "Alejandro Sanz"        "Contigo"                 "7.67"         "0.02301"
## [2,] "Duran Duran"           "Come Undone"             "250.8"        "0.7524" 
## [3,] "Luis Miguel"           "Suave"                   "267.2"        "0.8016" 
## [4,] "Auténticos decadentes" "No me importa el dinero" "120"          "0.36"   
## [5,] "Maluma"                "Hawaii"                  "1585"         "4.755"

Finalmente se presenta un pequeño análisis descriptivo:

# ANÁLISIS ESTADÍSTICO BÁSICO

# Estadísticas para Reproducciones
summary(Reproducciones)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    7.67  120.00  250.80  446.13  267.20 1585.00

min(Reproducciones)

## [1] 7.67

max(Reproducciones)

## [1] 1585

range(Reproducciones)

## [1]    7.67 1585.00

mean(Reproducciones)

## [1] 446.134

median(Reproducciones)

## [1] 250.8

length(Reproducciones)

## [1] 5

sd(Reproducciones)

## [1] 645.3299

var(Reproducciones)

## [1] 416450.6

quantile(Reproducciones, 0.25)

## 25% 
## 120

quantile(Reproducciones, 0.75)

##   75% 
## 267.2

IQR(Reproducciones)

## [1] 147.2

sort(Reproducciones)

## [1]    7.67  120.00  250.80  267.20 1585.00

# Estadísticas para Ingresos
summary(ingresos)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
## 0.02301 0.36000 0.75240 1.33840 0.80160 4.75500

min(ingresos)

## [1] 0.02301

max(ingresos)

## [1] 4.755

range(ingresos)

## [1] 0.02301 4.75500

mean(ingresos)

## [1] 1.338402

median(ingresos)

## [1] 0.7524

length(ingresos)

## [1] 5

sd(ingresos)

## [1] 1.93599

var(ingresos)

## [1] 3.748056

quantile(ingresos, 0.25)

##  25% 
## 0.36

quantile(ingresos, 0.75)

##    75% 
## 0.8016

IQR(ingresos)

## [1] 0.4416

sort(ingresos)

## [1] 0.02301 0.36000 0.75240 0.80160 4.75500

# Covarianza entre reproducciones e ingresos
cov(Reproducciones, ingresos)

## [1] 1249.352

Conclusión: El análisis muestra que hay una gran diferencia entre los ingresos generados por las diferentes canciones, donde la más exitosa genera considerablemente más que el promedio.