いろんなデータの分布をR(R言語)で可視化 ヒストグラムと散布図 日本の主な火山

Rコード

# 分布 ヒストグラムと散布図
# 使用するデータは、『データブック・オブ・ザ・ワールド 世界各国要覧と最新統計 2016 Vol.28』
# p.5

# 日本の主な火山
# 火山の名称は、この目的上、必要ないので省略

# 文字化けする場合
par(family = "Osaka")

日本の主な火山 <- data.frame(高度 = c(2291, 2077, 398, 1585, 2038,
                                    2236, 1841, 1816, 1915, 2454,
                                    3776, 1438, 758, 775, 2171,
                                    2568, 3026, 3067, 2702, 1729,
                                    1126, 1592, 1117))

日本の主な火山


summary(日本の主な火山$高度)


length(日本の主な火山$高度)


x <- hist(日本の主な火山$高度, col = "steelblue", right = FALSE, main = "日本の主な火山の高度 単位 : m")
x


plot(日本の主な火山$高度, ylab = "日本の主な火山$高度 単位 : m")

R Console

> # 分布 ヒストグラムと散布図
> # 使用するデータは、『データブック・オブ・ザ・ワールド 世界各国要覧と最新統計 2016 Vol.28』
> # p.5
> 
> # 日本の主な火山
> # 火山の名称は、この目的上、必要ないので省略
> 
> # 文字化けする場合
> par(family = "Osaka")
> 
> 日本の主な火山 <- data.frame(高度 = c(2291, 2077, 398, 1585, 2038,
+                                     2236, 1841, 1816, 1915, 2454,
+                                     3776, 1438, 758, 775, 2171,
+                                     2568, 3026, 3067, 2702, 1729,
+                                     1126, 1592, 1117))
> 
> 日本の主な火山
   高度
1  2291
2  2077
3   398
4  1585
5  2038
6  2236
7  1841
8  1816
9  1915
10 2454
11 3776
12 1438
13  758
14  775
15 2171
16 2568
17 3026
18 3067
19 2702
20 1729
21 1126
22 1592
23 1117
> 
> 
> summary(日本の主な火山$高度)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
    398    1512    1915    1935    2372    3776 
> 
> 
> length(日本の主な火山$高度)
[1] 23
> 
> 
> x <- hist(日本の主な火山$高度, col = "steelblue", right = FALSE, main = "日本の主な火山の高度 単位 : m")
> x
$breaks
[1]    0  500 1000 1500 2000 2500 3000 3500 4000

$counts
[1] 1 2 3 6 6 2 2 1

$density
[1] 8.695652e-05 1.739130e-04 2.608696e-04 5.217391e-04 5.217391e-04 1.739130e-04 1.739130e-04
[8] 8.695652e-05

$mids
[1]  250  750 1250 1750 2250 2750 3250 3750

$xname
[1] "日本の主な火山$高度"

$equidist
[1] TRUE

attr(,"class")
[1] "histogram"
> 
> 
> plot(日本の主な火山$高度, ylab = "日本の主な火山$高度 単位 : m")

ヒストグラムスクリーンショット

f:id:my_notes:20170610030312p:plain

散布図のスクリーンショット

f:id:my_notes:20170610030338p:plain

参考文献

データブック オブ・ザ・ワールド―世界各国要覧と最新統計〈2016 Vol.28〉

データブック オブ・ザ・ワールド―世界各国要覧と最新統計〈2016 Vol.28〉