Fabricio Murillo Flores FabricioMF72@gmail.com
Gustavo Trejos Marin maringfa@gmail.com
jeffrey Gonzalez jeffreygonzalezs@gmail.com
1- Cargue el archivo realEstatedata.csv proveído por el profesor.Pongale el nombre que usted desee.
library(dlookr)
## Warning: package 'dlookr' was built under R version 4.0.3
## Warning: package 'mice' was built under R version 4.0.3
library(dplyr)
## Warning: package 'dplyr' was built under R version 4.0.3
df <- read.csv("realEstatedata2.csv", sep = ";")
View(df)
uarde un nuevo dataframe filtrando solamente por categoría casas(utilice dplyr para fitrar). Para las variables precio y m2_de_construccion realice lo siguiente:
dfMuestra <- df %>% sample_n(size = 50)
kableExtra::kable(head(dfMuestra,10)) %>%
kableExtra::kable_styling(bootstrap_options = c("striped", "hover"))%>%
kableExtra::scroll_box(width = "900px", height = "500px")
| id | altura | ano_de_construccion | balcon_terraza | banos | categoria | costos_de_mantenimiento | direccion_exacta | enviado | localizacion | m2 | m2.1 | m2_de_construccion | niveles | parking | piscina | piso_numero | precio | precio_m2_de_construccion | precio_m2_de_terreno | precio_m2 | recamaras | tamano_del_lote | tipo_de_pisos | description | feature | land_sq_meter | title |
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 17647077 | 3.0 | 2020 | terraza | 3.5 | 57000 | Condominio Maleku | Ciudad Curridabat | NA | 214.00 | 2 | 2 | no | 295000.00 | 1,378.50 | 1,520.61 | 4 | 194 | Porcelanato | NA | ||||||||
| 16309523 | NA | 3.5 | Casas | NA | 28/10/2020 | Santa Ana Sabanilla | NA | 380.00 | NA | 4 | 600000.00 | 1,578.94 | 4 |
Linda casa espaciosa ubicada en el barrio Ricos y Famosos cerca de la playa 3 confortables habitaciones sala y comedor independientes comodos balcones con hermosas vistas 2 5 banos patio interno piscina exclusiva bellos jardines cochera para dos vehiculos seguridad permanente Internet Wifi television por cable aire acondicionado y ventiladores Muy cerca de San Jose y de las mejores playas Parque Manuel Antonio playa Hermosa playa Herradura etc Casa recien remodelada en Residencial Bosques de Lindora Descripcion 4 cuartos 3 1 2 banos sala y comedor principales Sala de tv Terraza amplia Cuarto de servicio completo con bano Lavanderia Garage para 2 carros techado 2 carros externos Aire acondicionado central en cuartos y mini splits en areas sociales Lote de 734 m2 Comoda casa de una sola planta ubicada en el exclusivo condominio Bosques de Lindora Cuenta con amplia area social con doble sala y doble altura Comedor formal Cocina con sobre de granito Habitacion de huespedes independiente al lado de la terraza con bano completo 1 2 medio de visitas en lobby Excelente seguridad Precio Alquiler Venta 3 500 dolares con IVA y mantenimiento incluido casa club piscina cancha de tenis parque infantil jardineria incluida en el mantenimiento seguridad 24 7 con acceso controlado |
NA | Casas en Jaco HERMOSA Y COMFORTABLE CASA Casas en Santa Ana Casa Bosques de Lindora | |||||||||||
| 15430884 | 2015 | terraza | NA | Sector la Favorita | Rohrmoser | NA | NA | 1 | no | 1 | 285000.00 | 1,357.14 | 791.66 | 3 | 360 | Ceramica | NA | ||||||||||
| 15732594 | 2.50 | NA | terraza | 2 | NA | Cartago El Guarco Tejar Urb El Cacique del Quijongo 500 Este y 300 Sur CASA D 8 y Lote D 37 | NA | 118.18 | 1 | 5 | NA | 3 | 300 | Cerca de Escuela Pet Friendly Cerca del Trafico Parking bajo techo | NA | ||||||||||||
| 17699305 | 1995 | terraza | 3.5 | NA | Sabanilla | NA | NA | 1 | si | 550000.00 | 407.40 | 5 | NA | ||||||||||||||
| 17460449 | NA | 4 | Casas | NA | 27/10/2020 | Herradura | NA | NA | NA | 298000.00 | 1,336.51 | 754.43 | 3 | 395 | Hermosa casa en exclusivo Condominio en Heredia cercano a zonas Francas parques empresariales centros comerciales restaurantes escuelas y colegios privados facil y cercano salida autopista General canas excelente ubicacion Condominio con amplias areas comunes 2 canchas de tennis cancha de futbol 5 gimnasio salon de eventos rancho de bbq amplias zonas de caminata Casas separadas seguridad 24 horas Financiamiento disponible | Gimnasio Patio Garaje techado Sala y Comedor Area Social Area de BBQ | NA | Casas en Ulloa venta de casa 4 Habitaciones exclusivo Condominio Heredia | |||||||||
| 17257848 | NA | Casas | NA | 23/10/2020 | Baru | NA | NA | NA | 525000.00 | 656.25 |
Provincia ALAJUELA Canton ALAJUELA Distrito GUACIMA Direccion exacta Rincon Chiquito Condominio Malinches Filial 44 Folio Real 2 117349 F 000 Numero de plano A 1753871 2014 Precio real 51 744 000 00 Precio en oferta 45 001 756 80 Descuento 13 03 Area del terreno 100 06 m2 Area de construccion 100 06 m2 Distribucion Segunda Planta Sala Comedor Cocina 2 Dormitorios Bano Area de Pilas 2 Espacios de Parqueo Excelentes condiciones de financiamiento estas propiedades se financian con Tasa del 7 10 fija dos anos Esto quiere decir que por cada millon la cuota mensual seria de 6 720 30 colones mas polizasNo se le cobra el avaluo No se cobra comision sobre el credito El tramite de credito es en 10 dias una vez presentado todos los documentos |
Area Social Area de BBQ | NA | Casas en Guacima Grupo Mutual vende Apartamentos nuevos en Cond Malinches en la Guacima filial 44 | |||||||||||||
| 17673867 | 2 y 3 plantas | 2018 | balcon | 2.5 | Casas | 190 | San Jose provincia Escazu | 31/10/2020 | Escazu | NA | 220.00 | 2 | 2 | si | 1 | 289000.00 | 1,313.63 | 1,632.76 | 3 | 177 | Porcelanato |
CONDOMINIO BONAVISTA ESCAZU con las mejores vistas de la ciudad Disfrute de las mejores vistas de San Jose nuestro condominio esta ubicado a tan solo 800 metros del Restaurante Tiquicia Descarga nuestro Brochure Digital Aqui wwww condominiobonavistacr com Casas Nuevas con acabados modernos El proyecto cuenta solamente con 30 casas Ubicado a solo 1 5 km del centro de Escazu Del antiguo Country Day School 1 3 KM al Sur Seguridad 24 horas Tapia perimetral y circuito cerrado de vigilancia Piscina Gimnasio Area de Spa con sauna y Jacuzzi Yoga Deck Mirador Casa club con area social completamente equipada con banos vestidor y deck con vista Distribucion Damos oportunidad de escoger el diseno interior color del porcelanato color sobre de granito color de muebles de cocina y closets pintura interior El desarrollador SI permite cambios menores de distribucion http condominiobonavistacr com |
Estufa Calentador de agua | NA | Casas en Escazu CONDOMINIO BONAVISTA ESCAZU VENTA DE CASAS LISTAS PARA ENTREGAR | ||
| 16774766 | NA | 2 | Casas | NA | 19/10/2020 | Liberia | NA | 157.00 | NA | 2 | 40983.61 | â‚¡520,833 | 2 | Ubicado en el condominio bosques del cafe Casa modelo B 4 anos de construccion Preciosas amenidades Casa club Piscina Play Areas verdes Vista Senderos proximamente Modalidad lote y construccion 48 m de construccion lote de 250m2 dos banos dos cuarto principal 12 76m2 y el segundo 10 2m2 muy amplios con posibilidad de ampliar la casa sala comedor y cocina Lugar tranquilo seguro a 4 minutos de Liberia centro La venta de la casa es de contado sea bancario o recursos propios no se recibe vehiculo ni propiedades | Microondas Estufa Lavaplatos Dispensador de agua caliente Calentador de agua | NA | Casas en San Rafael Town House Bosques del Cafe Casas en Liberia Venta Casa Totalmente nueva en Liberia | ||||||||||
| 17821050 | NA | Casas | NA | Rio Oro de Santa Ana | 6/10/2020 | Santa Ana | NA | NA | NA | 310000.00 | 1,409.09 | 1,937.50 | 160 | Gran oportunidad hermosa casa rodeada de montanas en un terreno de 735 mtrs con todos los servicios basicos amplio jardin y patio con arboles frutales Cuenta con un pequeno taller con mesa de trabajo y gran cantidad de herramienta El bano y el servicio sanitario estan por separado cuenta con 3 cuartos y un cuarto de estudio los pisos son en ceramica y los cielos razos en cipres la cocina cuenta con mueble en granito y el mueble aereo en fina madera de pinotea | Area de BBQ | NA | Casas en Paraiso casa |
MediaA <-sum(df$precio,na.rm = TRUE) / nrow(df)
MediaB <- mean(df$m2_de_construccion,na.rm = TRUE)
MediaA;MediaB
## [1] 158681.1
## [1] 258.4013
mean(df$m2_de_construccion, na.rm = TRUE)
## [1] 258.4013
mean(df$precio, na.rm = TRUE)
## [1] 255937.3
Obtenga la desviación estándar de ambas variables.Interprete.
df %>% group_by(categoria) %>%
filter(categoria== "Casas") %>%
summarise( desviacion = sd(precio, na.rm = TRUE)) %>%
arrange(-desviacion)
## # A tibble: 1 x 2
## categoria desviacion
## <chr> <dbl>
## 1 Casas 221149.
Obtenga un resumen de los tipos de datos del dataframe original, en el que muestre que tipo de variable es cada columna
summary(df)
## id altura ano_de_construccion balcon_terraza
## Min. : 5255768 Length:300 Min. :1990 Length:300
## 1st Qu.:16635820 Class :character 1st Qu.:2010 Class :character
## Median :17320444 Mode :character Median :2016 Mode :character
## Mean :16888119 Mean :2013
## 3rd Qu.:17699418 3rd Qu.:2018
## Max. :17823454 Max. :2020
## NA's :205
## banos categoria costos_de_mantenimiento
## Length:300 Length:300 Min. : 54.0
## Class :character Class :character 1st Qu.: 195.2
## Mode :character Mode :character Median : 14300.0
## Mean : 49763.1
## 3rd Qu.: 71250.0
## Max. :275000.0
## NA's :248
## direccion_exacta enviado localizacion m2
## Length:300 Length:300 Length:300 Length:300
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## m2.1 m2_de_construccion niveles parking
## Min. :119 Min. : 1.0 Min. :1.000 Length:300
## 1st Qu.:119 1st Qu.: 145.0 1st Qu.:1.000 Class :character
## Median :119 Median : 189.5 Median :2.000 Mode :character
## Mean :119 Mean : 258.4 Mean :1.634
## 3rd Qu.:119 3rd Qu.: 266.2 3rd Qu.:2.000
## Max. :119 Max. :4500.0 Max. :4.000
## NA's :298 NA's :112 NA's :177
## piscina piso_numero precio
## Length:300 Length:300 Min. : 450
## Class :character Class :character 1st Qu.: 136700
## Mode :character Mode :character Median : 177999
## Mean : 255937
## 3rd Qu.: 289000
## Max. :1500000
## NA's :114
## precio_m2_de_construccion precio_m2_de_terreno precio_m2
## Length:300 Length:300 Length:300
## Class :character Class :character Class :character
## Mode :character Mode :character Mode :character
##
##
##
##
## recamaras tamano_del_lote tipo_de_pisos description
## Length:300 Length:300 Length:300 Length:300
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
##
## feature land_sq_meter title
## Length:300 Min. :957.1 Length:300
## Class :character 1st Qu.:957.1 Class :character
## Mode :character Median :957.1 Mode :character
## Mean :957.1
## 3rd Qu.:957.1
## Max. :957.1
## NA's :299
str(df)
## 'data.frame': 300 obs. of 28 variables:
## $ id : int 10885302 11089430 11717462 11743717 11980900 11984117 12579647 12930992 13256737 13707929 ...
## $ altura : chr "" "" "" "" ...
## $ ano_de_construccion : int NA 2018 NA NA NA NA NA NA NA NA ...
## $ balcon_terraza : chr "terraza" "terraza" "terraza" "" ...
## $ banos : chr "3.5" "" "2.5" "2.5" ...
## $ categoria : chr "" "" "" "Casas" ...
## $ costos_de_mantenimiento : int 220 NA NA NA NA NA 240000 NA NA NA ...
## $ direccion_exacta : chr "" "" "" "" ...
## $ enviado : chr "21/10/2020" "2/11/2020" "" "25/10/2020" ...
## $ localizacion : chr "Santa Ana" "Santa Ana" "" "San Rafael" ...
## $ m2 : chr "" "" "" "" ...
## $ m2.1 : int NA NA NA NA NA NA NA NA NA NA ...
## $ m2_de_construccion : num 217 NA 254 150 95 NA 326 202 800 250 ...
## $ niveles : int NA 4 2 NA NA NA NA NA NA NA ...
## $ parking : chr "2" "" "2" "3" ...
## $ piscina : chr "si" "si" "no" "" ...
## $ piso_numero : chr "" "" "" "" ...
## $ precio : num 269000 360000 NA 298000 95082 ...
## $ precio_m2_de_construccion: chr "1,239.63" "1,333.33" "" "66.22" ...
## $ precio_m2_de_terreno : chr "996.29" "1,607.14" "" "" ...
## $ precio_m2 : chr "" "" "" "" ...
## $ recamaras : chr "3" "3" "3" "" ...
## $ tamano_del_lote : chr "270" "224" "" "" ...
## $ tipo_de_pisos : chr "" "Porcelanato" "Porcelanato" "" ...
## $ description : chr "" "" "" "Casa hermosa muy comoda con excelente distribucion amplios espacios buena ventilacion y mucha luz natural \"| __truncated__ ...
## $ feature : chr "" "" "Dispensador de agua caliente Calentador de agua" "Dispensador de agua caliente Calentador de agua" ...
## $ land_sq_meter : num NA NA NA NA NA NA NA NA NA NA ...
## $ title : chr "" "" "" "Casas en Santa Ana VENTA CASA SANTA ANA 165 000 SANTA ANA RC171" ...
Basado en el resultado anterior, indique cuáles variables no tienen el tipo correcto(por ejemplo su naturaleza es numérica y R los interpreta como fct o str).
"En este caso todos los tipos de datos son correctos"
## [1] "En este caso todos los tipos de datos son correctos"