石田修二研究室　＞　データ統計処理　＞　グラフ　＞    （サイト内検索）

地方自治体における公衆無線LANの整備状況

横棒グラフのサンプルということで。

総務省の地方自治体における公衆無線ＬＡＮ整備についてを参考に作ってみました。

par(family="HiraKakuProN-W3") # Mac
par(las=1)
par(mar=c(5,11.5,8,2.5))
par(cex=0.9)
n1 =rev(c(51,50,78,30,17,56,35,40,24,42,4))
n2 =rev(c("北海道総合通信局 管内",
            "東北総合通信局 管内",
            "関東総合通信局 管内",
            "信越総合通信局 管内",
            "北陸総合通信局 管内",
            "東海総合通信局 管内",
            "近畿総合通信局 管内",
            "中国総合通信局 管内",
            "四国総合通信局 管内",
            "九州総合通信局 管内",
            "沖縄総合通信事務所 管内"))
t=barplot(n1, horiz=TRUE, xlim=c(0,80),
          names.arg = n2, col="gray")
text(n1, t, labels = n1, pos = 4, xpd=TRUE) #データラベル
axis(side=1, labels="団体数", at=80,
     hadj=0.6, padj=1.5) # y軸ラベル

リンクはご自由にどうぞ。

【石田修二研究室】　【データ統計処理】　【グラフ】

Last modified: 2015-09-01 05:26:49