영업 수치나 각 데이터를 볼 때, 우선은 단순 집계입니다만,
대표격의 히스토그램은, 어째서인가 EXCEL나 스프레이가 폰코트로,
R이 아니면 만들기 어렵습니다.

(Python과 JupyterNotebook도 있다고 생각하지만,
속공! 를 목적으로 한다면 역시 R이라고 개인적으로 생각하고 있습니다. )

그런 hist 기능입니다만, 층별로 보는 방법으로 조금 검색에 시간이 걸렸기 때문에 메모.
(옵션도 이외에 순차 검색하므로, 드디어 메모.)

히스토그램의 계층화

여기에서는 두 가지 방법을 소개합니다.
하나는 노멀 hist로 색을 바꾸어 겹치는 방법.
두 번째는 라이브러리에서 lattice를 사용한 방법.

자주 사용하는 옵션을 아래에 추가해 두므로, 커스터마이즈용으로.

> hist(d[d$性別=="W",]$カラム名,　breaks = 25, col = "#ff00ff40",ylim = c(0,5))
> hist(d[d$性別=="M",]$カラム名,　breaks =100, col = "#0000ff40",add = TRUE)

> library(lattice)
> histogram(~カラム名|性別,data=d,col=0)

자주 사용하는 옵션

영업씨용이므로 일단 세세하게 쓸 때입니다.

hist_command.R

#ノーマル
> hist(d$カラム名)

#切り数を追加：breaks
> hist(d$カラム名,breaks = 25)

#頻度（割合）ラベルを表示：label
> hist(d$カラム名,breaks = 25, label = TRUE)

#頻度を割合に変換：freq
> hist(d$カラム名,breaks = 25, label = TRUE, freq = FALSE)

#表示する範囲を指定：xlim、ylim
> hist(d$カラム名,breaks = 25, label = TRUE, freq = FALSE, xlim = c(0,1000), ylim = c(0,0.003))

#軸名と題名を追加（日本語だと表示されないので注意）：xlab、ylab、main
> hist(d$カラム名,breaks = 25, label = TRUE, freq = FALSE, xlim = c(0,1000), ylim = c(0,0.003), xlab = "x", ylab = "y", main = "Histgram")

#RGB値で色を追加(数字直接指定でも、"red"などもOK)：col
> hist(d$カラム名,breaks = 25, label = TRUE, freq = FALSE, xlim = c(0,1000), ylim = c(0,0.003), xlab = "x", ylab = "y", main = "Histgram", col = "#ff00ff40")

#”性別”列の”W”だけに絞る：d[d$性別=="W",]$カラム名
> hist(d[d$性別=="W",]$カラム名,　breaks = 25, label = TRUE, freq = FALSE, xlim = c(0,1000), ylim = c(0,0.003), xlab = "x", ylab = "y", main = "Histgram", col = "#ff00ff40")

#一つ前のグラフと重ね合わせる：add
> hist(d[d$性別=="W",]$カラム名, add = TRUE, breaks = 25, label = TRUE, freq = FALSE, xlim = c(0,1000), ylim = c(0,0.003), xlab = "x", ylab = "y", main = "Histgram", col = "#ff00ff40")