DATOR


histogram(),과소평활과대평활

library('ggplot2')
setwd("e:/00-R/Exploration")
data.file <- file.path('data', '01_heights_weights_genders.csv')
heights.weights <- read.csv(data.file, header = TRUE, sep = ',')
par(mfcol=c(2,2))
windows(50,60)
ggplot(heights.weights, aes(x = Height)) +  geom_histogram(binwidth = 1)# 과소평활



ggplot(heights.weights, aes(x = Height)) +  geom_histogram(binwidth = 5)# 과대평활

Tag

Leave Comments