こんにちは!第6回講義がスタートしましたね!
ビジネスデータ分析Ⅰの第6回は課題提出がありますね
目次
なにやるの?
![](http://ryoma-style.com/wp-content/uploads/2020/03/tsuchimoto0I9A6468_TP_V-1024x682.jpg)
自由に企業を選んで、「有価証券報告書」を分析してグラフを作るみたいですね!!!
!?!?!?!?
わかったような、わからなかったような・・・
過去記事は、以下になります!
![](http://ryoma-style.com/wp-content/uploads/2020/10/business_1_1-520x300.jpg)
![](http://ryoma-style.com/wp-content/uploads/2020/05/shigoto_zaitaku_kodomo_man-400x300.png)
テーマを決めよう!
まずは、グラフを作る前に、テーマを決める必要があります。
- 自動車会社
- ゲームの会社
- ふりかけの会社(食品のほうが良かったかな?)
- 飲み物の会社
- ファストフードの会社
好きな企業(上場企業)をピックアップしよう!
テーマを決めましたか?さらに、有価証券報告書が公開されている、上場企業を選ぶ必要があります。
外資系「●●●ジャパン」とか、グループ会社「トヨタ*****」とか、「ジャパネット」や「シャトレーゼ」等、上場していないが有名な企業もあるので、上場している企業を探す必要があります。
ただ、検索サイトで見つかれば、上場企業。見つからなかったら、非上場企業なんだな。と思えばOKです。
とにかく次へ進みましょう。
有価証券報告書を検索、ダウンロードしよう!
このサイトから有価証券報告書をダウンロードします。
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_001.png)
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_002.png)
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_003.png)
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_004.png)
また、トヨタ以外もいくつかの気になる企業をダウンロードしましょう。
検索しても出てこない場合は、名前が間違っている。もしくは、非上場企業ということになります。
その場合は、別の企業を選びましょう。
ダウンロードしたファイルを解凍する
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_005.png)
有価証券報告書を開く
01050xx~で始まるファイルを開きましょう。
0105000は、文書なので0105010以降のファイルを開くと良さそうです。※授業の通りです。
XBRL-publicDocのフォルダに入っています
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_006.png)
エクセルにデータを貼り付ける
色々な財務データをピックアップする必要があります。
数字をマウスで選択して、右クリックしてコピーします。
例:
- 流動資産
- 固定資産
- 総資産
- 流動負債
- 固定負債
- 自己資本
講義をよく確認してみてね。
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_007.png)
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_008.png)
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_009.png)
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_010-1024x128.png)
画面を隠していますが、これらの数値をエクセルに貼り付けます。例:コンビニのデータです。
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_011.png)
csv形式で保存する
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_012.png)
R Studioを立ち上げる
ここからは、グラフを書きます。講義の通りですね?
※説明のため、講義のファイル「convenience~.csv」を使用しますが、提出物は各自が用意したものになりそうですね。
先程、csv形式で保存しましたよね?
ファイルを読み込む
過去記事も参考にどうぞ
![](http://ryoma-style.com/wp-content/uploads/2020/10/business_1_1-520x300.jpg)
![](http://ryoma-style.com/wp-content/uploads/2020/05/shigoto_zaitaku_kodomo_man-400x300.png)
1 2 3 4 5 6 7 |
*ワーキングディレクトリを設定 setwd("C:\\tou\\bus\\") *ワーキングディレクトリを確認 getwd() (1)"C:/tou/bus" これが表示される |
バックスラッシュで指定:setwd(“C:/tou/bus/”)
もしくは、スラッシュ2つ(半角¥2つ)setwd(“C:\\tou\\bus\\”)
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_013.png)
1 |
stores<-read.csv("convenience201802.csv", fileEncoding="UTF-8-BOM", header=TRUE, row.names=1) |
※文字化けしてますが、
stores<-read.csv(“convenience201802.csv”, fileEncoding=”UTF-8-BOM”, header=TRUE, row.names=1) |
1 2 3 |
stores$流動比率=stores$流動資産/stores$流動負債 barplot(stores$流動比率, names.arg = row.names(stores)) abline(a=1, b=0) |
![](http://ryoma-style.com/wp-content/uploads/2020/10/busdata1_6_014.png)
結果のグラフを読み取って、企業分析して自分なりのコメントが必要になりそうですね。
自分で企業をチョイスしてデータ作るところからの課題なので。
まとめ
![](http://ryoma-style.com/wp-content/uploads/2020/03/kakurerukijishironeko171027_TP_V4.jpg)
- EDINETで有価証券報告書のダウンロードを行いました
- csvファイルを作成しました
- R Studioでグラフを書きました