自分と、12分以上の人などを除く23人を集計、目安は8分程度だったと記憶

申告時間の平均などと分布(単位はmin)、切り上げているので実際はこれより期待値でみて30秒少ない(という想定)、

ex)自己申告1min→実際には[0,60]sec

mean(na.omit(df$sinkoku)) [1] 5.7 median(na.omit(df$sinkoku)) [1] 5.5

d2c91c14-927b-4ddd-aaa2-09d8cbcb632b.png

実際の演奏時間に関して、外れ値が・・・

mean(na.omit(df$Time)) [1] 6.083333 median(na.omit(df$Time)) [1] 6

46d0c197-0cf2-4330-946d-31ba888f09d8.png

差の分布と平均など。25秒程度自己申告よりオーバー

mean(na.omit(d)) [1] 0.365942 median(na.omit(d)) [1] 0.5