Após ter sofrido acusações de subvalorização de casas vendidas entre os meses de Maio e Junho por sua imobiliária, o empresário Sam Easton pediu para uma avaliadora local,Pat McCloskey, que mantem um banco de dados sobre venda de imóveis de acordo com os meses de venda, o preço vendido, tamanho do imóvel, número de quartos, idade do imóvel, sua localização e a imobialiária que vendeu.
Sam pediu esses dados para comprovar se ele tem vendido mais barato que o resto das imobiliárias, comparando o preço das vendas de casas de 4 anos, em Arlington, que tem aproximadamente 203 metros quadrados e 3 quartos com o preço das casas de 9 anos, em Forth Worth, com aproximadamente 172 metros quadrados e 3 quartos.
Deve ser considerado que o artigo foi realizado durante uma crise imobiliária e feito no período de 12 meses, isso gera uma desvalorização dos preços da casa e tambem devemos considerar que só possuímos os dados de 4 meses (Março a Junho).
library(readxl)
## Warning: package 'readxl' was built under R version 3.5.3
Easton_Imobiliaria <- read_excel("C:/Users/labccet/Downloads/Base_de_dados-master/Easton Imobiliaria.xlsx")
View(Easton_Imobiliaria)
summary(Easton_Imobiliaria)
## Mês Preço Tamanho Quartos
## Min. :3.000 Min. : 99000 Min. : 99.31 Min. :2.000
## 1st Qu.:3.000 1st Qu.:121800 1st Qu.:154.13 1st Qu.:3.000
## Median :4.000 Median :138600 Median :169.27 Median :3.000
## Mean :4.421 Mean :140057 Mean :173.48 Mean :3.111
## 3rd Qu.:5.000 3rd Qu.:157200 3rd Qu.:192.40 3rd Qu.:3.000
## Max. :6.000 Max. :190650 Max. :266.82 Max. :4.000
## Idade Localização Corretora
## Min. : 1.000 Min. :1.00 Min. :0.00000
## 1st Qu.: 5.000 1st Qu.:1.00 1st Qu.:0.00000
## Median : 6.000 Median :2.00 Median :0.00000
## Mean : 6.139 Mean :1.74 Mean :0.09978
## 3rd Qu.: 8.000 3rd Qu.:2.00 3rd Qu.:0.00000
## Max. :13.000 Max. :3.00 Max. :1.00000
par(bg="#afadf0")
boxplot(Preço~Corretora, data= Easton_Imobiliaria, id=list(method="y"),main="Preço X Corretora",col="#b53f4f")
Concluo que não possui grande discrepância entre os valores da Corretora Easton comparando com as outras.
par(bg="#f1f2da")
boxplot(Preço~Localização, data= Easton_Imobiliaria, id=list(method="y"),main="Preço X Localização",col="#ace8e7")
Concluo que dependendo da área o preço será mais alto,logo é injusto o artigo julgar sem se importar com a localização e a crise imobiliária.
par(bg="#ffd9fe")
boxplot(Preço~Mês, data= Easton_Imobiliaria, id=list(method="y"),main="Preço X Mês",col="#b587de")
Concluo que o preços dos imóveis decresceram com o tempo por causa da crise, logo é injusto o artigo julgar pela média dos últimos 12 meses.
library(ggplot2)
## Warning: package 'ggplot2' was built under R version 3.5.3
ggplot(Easton_Imobiliaria) +
aes(x = Preço, y = Tamanho, colour = Corretora) +
geom_point(size = 1.54) +
scale_color_gradient() +
labs(title = "Tamanho X Preço ") +
theme_minimal()
4 anos
Tem 203m²
Foi vendida por US$ 88.500
As casas são desvalorizadas e o valor médio para a venda é aprox. US$ 130000.
A casa de Arlington está abaixo do preço mínimo de 99000.
9 anos
Tem 172 m²
Foi vendida por US$ 79500
As casas são desvalorizadas e o valor médio é aprox.US$ 120000 a 140000
Com base nos gráficos, Os imóveis de Arlington e Fort Worth, com 3 quartos vendidos entre Março a Junho tem como valor médio entre US$ 120000 a 140000.
Os boxplots demonstraram a crise economica existente nesse mercado e o desvalorizamento das regiões, sendo Dallas a mais valorizada e as redondezas desvalorizadas.
Logo, ocorreu uma diminuição dos valores dos imóveis, mas o artigo publicado falando sobre foi injusto, pois ele não considerou a crise imobliária nem a desvalorizamento das regiões, fazendo média como se não existisse diferença entre eles.
O imóvel de Arlington e Forth Worth estava em uma região desvalorizada mas nos outros casos (sendo visto no gráfico de tamanho vs preço) a empresa de Easton seguiu as outras corretoras na média de preço.
Finalizo que ocorreu uma diminuição do preço do imóvel mas isso não o desvalorizou. A Easton tem acompanhado o ritmo da crise, sendo realistas, os preços são realmente menores que a média mas não com uma grande discrepância do que os outros concorrentes,logo a Easton está acompanhando o mercado.