Display histogram using R

Data

Name Life Period
태조 73 6
정종 62 2 
태종 45 18
세종 53 32
문종 38 2  
단종 16 3 
세조 51 13
예종 28 1
성종 37 25 
연산군 30 12
중종 56 12
인종 30 38
명종 33 1
선조 56 22
광해군 66 41
인조 54 15
효종 40 26
현종 33 10
숙종 59 46
경종 36 4
영조 82 52
정조 48 24 
순조 44 34   
헌종 22 15
철종 32 14
고종 67 44 
순종 52 3

Souce Code

kings <- read.table("chosun kings.txt", header=T)
str(kings);
attach(kings)
windows(width=5.5, height=4.5)
hist(Period)

Histogram of Period