BASE 1
Descarga el archivo de abajo para empezar tu proyecto :
Deberas correr los chunck de abajo para empezar el proyecto :
1 set.seed(351)
2 df <- USArrests
3 murder3 <- df[sample(nrow(df), 45),]
4 rm(df)
1 This data set contains statistics, in arrests per 100000 residents
2 for assault, murder, and rape in each of the 50 US states in 1973.
3
4 Also given is the percent of the population living in urban areas.
5
6 A data frame with 45 observations on 4 variables.
7 [,1] Murder numeric Murder arrests (per 100,000)
8 [,4] Rape numeric Rape arrests (per 100,000)
9 [,3] UrbanPop numeric Percent urban population
10 [,4] Rape numeric Rape arrests (per 100,000)
1 murder4 <- as.data.frame(scale(murder3))