Carregamento da Biblioteca

library(readxl)
AptosCriciuma <- read_excel("C:/Users/npdes/Base_de_dados-master/AptosCriciuma.xls")
View(AptosCriciuma)

Estatísticas Descritivas:

area=c(AptosCriciuma$Area)
mean(area)
## [1] 103.3
sd(area)
## [1] 48.00011

A variável quantitativa “Área” é extraída do conjunto de dados e armazenada na variável area. São então calculadas a média (mean()) e o desvio padrão (sd()) da variável, fornecendo informações estatísticas descritivas sobre a distribuição da área dos apartamentos.

Visualização da Distribuição:

hist(AptosCriciuma$Area,col="#FF1493",main = "Gráfico - Histograma Área dos apartamentos de Criciuma",
     ylab="Frequência",xlab= "Área")

Por fim, é gerado um histograma da variável “Área” dos apartamentos de Criciúma. O histograma utiliza a função hist(), onde é possível visualizar a distribuição da área e sua frequência.

Conclusão:

O código fornece uma análise básica de uma variável quantitativa, exibindo estatísticas descritivas e um histograma para representar a distribuição da área dos apartamentos em Criciúma com base nos dados fornecidos.