Excel: 「以上」と「未満」or「より多く」と「以下」

I.授業で統計学の初歩をまなびました

 

授業で統計学のさわりをやりました。

今日の授業が8回目になります。前期15回の授業のちょうど真ん中で、今日は前半を担当する私と後半の担当者の共同授業で、統計の初歩を教えることになっています。

今年も「ハンバーガー統計学へようこそ」を使わせていただきました。下は以前に大学のブログに書き込んだものです。

 

Rの基本:Rの楽しい学び方4

 

授業では、階級別にフライドポテトの本数を数える作業があるのですが、学生からExcelで計算するにはどうするのかとの質問がありました。

COUNTIFを用いる方法を説明しましたが、うまく説明できませんでしたので、ここに回答します。

また、Excelのヒストグラムの描き方やRのヒストグラムの描き方も合わせてメモしておきます。

 

I.Excelで階級別度数を算出する式

 

長さ別のセルの数を数えればよいので、COUNTIFを用いて次のようにしました。

 

 

II.Rでヒストグラムを描く

 

下の図は、RStudioでグラフを描いたところですが、Rだと本数が書かれたヒストグラムを2行の式で描けます。

 

 

Rウィジェットでヒストグラムを描きます。

 

# read the wakuwaku data wakuwaku0<-read.table(header=T, sep=",", text=' id,long 1,3.5 2,4.2 3,4.9 4,4.6 5,2.8 6,5.6 7,4.2 8,4.9 9,4.4 10,3.7 11,3.8 12,4 13,5.2 14,3.9 15,5.6 16,5.3 17,5 18,4.7 19,4 20,3.1 21,5.8 22,3.6 23,6 24,4.2 25,5.7 26,3.9 27,4.7 28,5.3 29,5.5 30,4.7 31,6.4 32,3.8 33,3.9 34,4.2 35,5.1 36,5.1 37,4.1 38,3.6 39,4.2 40,5 41,4.2 42,5.2 43,5.3 44,6.4 45,4.4 46,3.6 47,3.7 48,4.2 49,4.8 ') # read the mogumogu data mogumogu0<-read.table(header=T, sep=",", text=' id,long 1,4.5 2,4.2 3,3.9 4,6.6 5,0.8 6,5.6 7,3.2 8,6.9 9,4.4 10,4.7 11,3.8 12,3 13,3.2 14,4.9 15,7.6 16,3.3 17,7 18,3.7 19,3 20,4.1 21,5.8 22,4.6 23,4 24,2.2 25,7.7 26,3.9 27,6.7 28,3.3 29,7.5 30,2.7 31,5.4 32,5.8 33,5.9 34,3.2 35,5.1 36,3.1 37,6.1 38,4.6 39,2.2 40,4 41,6.4 42,5.2 43,3.3 44,6.4 45,6.4 46,2.6 47,2.6 48,5.2 49,5.8 ') # make a histogram for mogumogu hist(mogumogu0$long, label=T) # make a histogram for wakuwaku hist(wakuwaku0$long, label=T)

 

 

Rだと簡単なのですが、本数が上のExcelの計算と少し違いますね。

 

III.Rのヒストグラムは「…より多く−以下」

 

長さのグループの範囲を「…より多く−以下」に変更すると、次のようにRのヒストグラムの本数と同じになります。

 

 

Google sheetsに書き込みました

 

https://docs.google.com/spreadsheets/d/1BekWTQrJw82Gqe2YtvBEpVTstf5HiDL-UDDaTkXJa3s/edit?usp=sharing

 

 

 

About shibatau

I was born and grown up in Kyoto. I studied western philosophy at the University and specialized in analytic philosophy, especially Ludwig Wittgenstein at the postgraduate school. I'm interested in new technology, especially machine learning and have been learning R language for two years and began to learn Python last summer. Listening toParamore, Sia, Amazarashi and MIyuki Nakajima. Favorite movies I've recently seen: "FREEHELD". Favorite actors and actresses: Anthony Hopkins, Denzel Washington, Ellen Page, Meryl Streep, Mia Wasikowska and Robert DeNiro. Favorite books: Fyodor Mikhailovich Dostoyevsky, "The Karamazov Brothers", Shinran, "Lamentations of Divergences". Favorite phrase: Salvation by Faith. Twitter: @shibatau

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.