Upgrade to Pro — share decks privately, control downloads, hide ads and more …

2018methoken-R-workshop

 2018methoken-R-workshop

LET関西支部メソドロジー研究部会2018年度第1回研究会にて行ったR入門者講習のスライドです。

Yu Tamura

June 02, 2018
Tweet

More Decks by Yu Tamura

Other Decks in Programming

Transcript

  1. Rೖ໳ͷೖ໳
    2018೥6݄2೔
    LETؔ੢ࢧ෦ϝιυϩδʔݚڀ෦ձ
    2018೥౓ୈ1ճݚڀձ
    ԙɹؔ੢େֶઍཬࢁΩϟϯύε

    View Slide

  2. ͸͡Ίʹ
    • ຊ೔͸τϥϒϧଟൃ஍ଳͱࢥΘΕΔͱ͜Ζʹ΋Ռ
    ׶ʹ௅ΉαϑΝϦπΞʔͱͳ͍ͬͯ·͢
    • ͨͩ͠ਅͷRॳ৺ऀͷํͰ΋৺഑ͳ͞Βͣʹ
    • ͜ͷڭࣨͷ൒෼Ҏ্͸RͰ͖ΔਓͰ͢
    • पΓʹ͍Δ༏͍͠Φτφͷํ͕ͨͪࠔͬͨΒॿ͚ͯ͘
    Ε·͢
    • ໨Λ߹ΘͤΑ͏ͱ͠ͳ͍ਓ΄Ͳॿ͚͕ͨΓͰ͢
    • ࣸਅࡱӨ͸͝ԕྀͳ͞Βͳ͍Ͱ͍ͩ͘͞

    View Slide

  3. ͸͡Ίʹʢ͖ͭͮʣ
    • ຊ೔ͷWSͷ૝ఆडߨऀ
    • Rʹ·ͬͨ͘৮ͬͨ͜ͱ͕ͳ͍ਓ
    • RΛ৮ͬͨ͜ͱ͸͋Δ͚Ͳɼ๨Εͨਓ
    • ຊ೔ͷWSͷΰʔϧ
    • Rʹ͍ͭͯͷجຊతͳ஌ࣝΛಘΔʢ஌ࣝʣ
    • RͰؔ਺ͳͲ΋࢖͍ͭͭجຊతͳܭࢉ͕Ͱ͖Δʢٕೳʣ
    • RͰ؆୯ͳ࡞ਤ͕Ͱ͖Δʢٕೳʣ
    • ࢥߟɾ൑அɾදݱͷ؍఺ʹ͍ͭͯ͸someday in the future

    View Slide

  4. Today’s Menu
    • RͬͯͳΜ΍ͶΜ
    • RStudioͬͯͷ͕͋ΜͶΜ
    • ·ͣ͸Πϯετʔϧ΍Ͱ
    • ΄ͳجຊૢ࡞΍ͬͯΈΑ͔
    • ؔ਺ͬͪΎ͏ศརͳ΋Μ͕͋ͬͯͳ
    • ΄Μ·࡞ਤָͳΜ΍
    • ύοέʔδͯ
    4

    View Slide

  5. Today’s Menu
    • RͬͯͳΜ΍ͶΜ
    • RStudioͬͯͷ͕͋ΜͶΜ
    • ·ͣ͸Πϯετʔϧ΍Ͱ
    • ΄ͳجຊૢ࡞΍ͬͯΈΑ͔
    • ؔ਺ͬͪΎ͏ศརͳ΋Μ͕͋ͬͯͳ
    • ΄Μ·࡞ਤָͳΜ΍
    • ύοέʔδͯ
    5

    View Slide

  6. • ओʹ౷ܭղੳ໨తͰ࢖͍ͬͯΔਓଟ਺
    • ͳͷͰຊ೔ͷ͓࿩΋౷ܭղੳʹͭͳ͕Δ͓࿩
    • ͍ΘΏΔʮ౷ܭιϑτʯͱࢥ͍ͬͯͩ͘͞
    • จॻ࡞੒΋࠷ۙͷྲྀߦΓ
    • ແྉ͔ͭΦʔϓϯιʔε
    • ແྉͰ୭Ͱ΋࢖͑Δ
    • ֦ுੑ΋ߴ͍ʢύοέʔδ͕͍ͬͺ͍ʣ
    RͬͯͳΜ΍ͶΜ
    6
    R͸ϓϩάϥϛϯάݴޠ

    View Slide

  7. ా ଜɹ༞
    ؔ ੢ େ ֶ
    7

    View Slide

  8. • ໊લɿాଜ༞ʢͨΉΒΏ͏ʣ
    • ॴଐɿؔ੢େֶ֎ࠃޠֶ෦
    • ઐ໳ɿୈೋݴޠशಘɼ৺ཧݴޠֶ
    • Rྺɿ͓ͦΒ͘6೥͘Β͍
    • SapporoRͱ͍͏ࡳຈʹߦ͖͍ͨΦτφͷͨΊ
    ͷΠϕϯτͷୈ1ճ໨ͷͱ͖ʹॳΊͯ৮ͬͨ
    • ※ͨͩ͠ࢲ͸ΞϝϦΧʹ͍·ͨ͠
    ಥવͷ
    8
    ࣗݾ঺հ

    View Slide

  9. • RͳΒͳΜͰ΋Ͱ͖Δͱݴͬͯ΋աݴͰ͸ͳ͍
    • ΈΜͳ͕RΛ΍͍ͬͯΔ͔Β
    • RͷڭՊॻ͸Πϯλʔωοτͱݴͬͯ΋͍͍
    • Θ͔Βͳͯ͘೰ΜͰΔਓ͸Ұਓ͡Όͳ͍͠ɼॿ͚ͯ͘
    ΕΔਓ΋ͨ͘͞Μ͍Δ
    • ࠶ݱͱڞ༗͕༰қ
    • ಉ͡σʔλͱಉ͡εΫϦϓτ͕͋Ε͹෼ੳ݁Ռ͕࠶ݱ
    Մೳ
    • εΫϦϓτͱͯ͠࢒͢͜ͱͰɼ෼ੳ΍σʔλͷՄࢹԽ
    ͳͲ͕͍ͭͰ΋Ͳ͜Ͱ΋୭ͱͰ΋
    RͬͯͳΜ΍ͶΜ
    9
    ͳͥRΛ΍ΕͱݴΘΕΔ͔

    View Slide

  10. • ύιίϯ͕ۤख
    • RStudio࢖͑͹ͳΜͱ͔ͳΔͷͰ͸ͱ
    • σΟϨΫτϦͱ͔۠੾Γจࣈͱ͔͘Β͍Θ͔͍ͬͯΕ͹͍͍ͷͰ͸
    • ίϚϯυΛଧͪࠐΉͱ͍͏ͷ͕ۤख
    • ϙνϙνͰ͸࠶ݱ΋ڞ༗΋Ͱ͖ͳͯ͘ࠔΔ…
    • ࣗ෼Ͱߟ͑ͯଧͭ͜ͱ΋͋Δ͕ɼجຊతʹ͸ʮ୭͔ͷਅࣅʯΛ͢Ε
    ͹े෼
    • ӳޠ͕ۤख
    • ͱΓ͋͑ͣɼ௲ΓͷޡΓʹର͢Δawareness͚͍͖ͩ͋͛ͯ·͠ΐ
    ͏
    • ೔ຊޠࢿྉ͚ͩͰ΋࢖͑ΔΑ͏ʹ͸ͳΔͱࢥ͍·͕͢
    RͬͯͳΜ΍ͶΜ
    10
    RίϫΠίϫΠපͷݪҼ

    View Slide

  11. Today’s Menu
    • RͬͯͳΜ΍ͶΜ
    • RStudioͬͯͷ͕͋ΜͶΜ
    • ·ͣ͸Πϯετʔϧ΍Ͱ
    • ΄ͳجຊૢ࡞΍ͬͯΈΑ͔
    • ؔ਺ͬͪΎ͏ศརͳ΋Μ͕͋ͬͯͳ
    • ΄Μ·࡞ਤָͳΜ΍
    • ύοέʔδͯ
    11

    View Slide

  12. • RStudioͱ͸
    • RΛ࢖͍΍͘͢͢ΔͨΊͷιϑτ
    • Rͱಉ༷ʹແঈ
    • ͳͥRStudioʁ
    • https://speakerdeck.com/tam07pb915/nagoyar17
    • ॳ৺ऀ͸ɼʮ෼ੳʯͱ͔Ҏલͷͱ͜ΖͰͭ·͖͕ͮ
    ͪ…
    • ͦͷͭ·͖ͮͲ͜Ζʹ༏͘͠ख౰Λͯ͋ͬͨ͠Γɼ
    ࡞ۀޮ཰͕͕͋ΔΑ͏ͳػೳΛ૷උͯ͋͠Δ
    RStudioͬͯͷ͕͋ΜͶΜ
    12
    ॳ৺ऀͦ͜RStudioΛ

    View Slide

  13. Today’s Menu
    • RͬͯͳΜ΍ͶΜ
    • RStudioͬͯͷ͕͋ΜͶΜ
    • ·ͣ͸Πϯετʔϧ΍Ͱ
    • ΄ͳجຊૢ࡞΍ͬͯΈΑ͔
    • ؔ਺ͬͪΎ͏ศརͳ΋Μ͕͋ͬͯͳ
    • ΄Μ·࡞ਤָͳΜ΍
    • ύοέʔδͯ
    13

    View Slide

  14. 1. ݕࡧΤϯδϯͰʮr projectʯͱೖྗ͢Δ͔ɼhttp://www.r-project.org΁
    2. download RΛΫϦοΫʢจষதʹ͋Γ·͢ʣ
    3. ਖ਼௚Ͳ͜Ͱ΋͍͍ΜͰ͕͢ɼಛʹཧ༝͕ͳ͚Ε͹Japan͔Β1ͭબ୒
    ʢͲ͜Ͱ΋OKʣ
    4. ࣗ෼ͷύιίϯͷOSΛΫϦοΫ
    1. MacͳΒ.pkgͱ͍͍ͭͯΔ΋ͷͰɼWindows͸install R for the first time
    ΛΫϦοΫͯ͠.exeͷ࣮ߦϑΝΠϧ
    2. όʔδϣϯ͸ͱΓ͋͑ͣ࠷৽൛Ͱ
    5. ͋ͱ͸μ΢ϯϩʔυͨ͠ϑΝΠϧΛμϒϧΫϦοΫͰ։͍ͯɼࢦࣔʹ
    ͕ͨͬͯ͠ਐΊΔ͚ͩ
    6. ಛʹԿ΋͢Δඞཁͳ͘ɼʮ࣍΁ʯΛԡ͚ͩ͢ͰΑ͍
    ·ͣ͸Πϯετʔϧ΍
    14
    RΛ͍ΕͯΈ·͠ΐ͏

    View Slide

  15. View Slide

  16. View Slide

  17. View Slide

  18. View Slide

  19. ՋΛ࣋ͯ༨ͨ͠ํ
    • ࠓΠϯετʔϧͨ͠RΛΞϯΠϯετʔϧͯ͠ɼ
    ΋͏Ұ౓ಉ͡खॱͰRΛΠϯετʔϧͰ͖Δ͔
    ΍ͬͯΈ·͠ΐ͏

    View Slide

  20. • Ξοϓσʔτ͍ͨ͠৔߹͸࠶౓৽͍͠΋ͷΛΠ
    ϯετʔϧ
    • ৽͍͠όʔδϣϯͩͱɼΑ͘࢖͏ύοέʔδ͕
    ରԠ͍ͯ͠ͳ͍ͳͲͷ৔߹͕͋Δ
    • RͷόʔδϣϯͱύοέʔδͷόʔδϣϯΛཁ֬
    ೝʢࠓճͷߨशͰ͸ؾʹ͠ͳͯ͘େৎ෉Ͱ͢
    • Windows OSͷΑ͏ʹৗʹߋ৽ߋ৽ͱ͔͢Δඞཁ
    ͸ͳ͍
    ·ͣ͸Πϯετʔϧ΍
    20
    Rͷόʔδϣϯʹ͍ͭͯ

    View Slide

  21. View Slide

  22. View Slide

  23. • Windows
    • ελʔτ->ϓϩάϥϜ-> R
    • σϑΥϧτͷΠϯετʔϧઃఆͰ͸σεΫτοϓʹγϣʔτΧο
    τΛ࡞ΔͷͰ͔ͦ͜ΒͰ΋OK
    • i386 -> 32Ϗοτ൛
    • x64 -> 64Ϗοτ൛
    • ίϯτϩʔϧύωϧ->γεςϜͱηΩϡϦςΟ->γεςϜͰϏο
    τ਺ͷ֬ೝ͕Մೳ
    • Mac
    • Application -> R.app
    • Launchpad -> RͷΞΠίϯΛΫϦοΫ
    ·ͣ͸Πϯετʔϧ΍
    23
    Rͷىಈͱऴྃ

    View Slide

  24. • ͳΜ͔͍Ζ͍Ζॻ͍ͯ͋ͬͯ΋ͱΓ͋͑ͣɼ
    ʮ>ʯ͕Ұ൪Լʹग़͍ͯΕ͹OK
    • RΛऴྃͤ͞Δͱ͖
    • ଞͷΞϓϦέʔγϣϯͱಉ༷ʹɼʮด͡Δʯ
    Ϙλϯ
    • >ʹଓ͚ͯq()ͱೖྗ
    • ʮ࡞ۀεϖʔε(workspace imageʣΛอଘ͠
    ·͔͢ʁʯͱฉ͔ΕΔ-> ࠓ͸ʮ͍͍͑ʯ
    ·ͣ͸Πϯετʔϧ΍
    24
    Rͷىಈͱऴྃ

    View Slide

  25. 1. ݕࡧΤϯδϯͰʮr studioʯͱೖྗ͢Δ͔ɼhttps://
    www.rstudio.com΁
    2. Download RStudioΛΫϦοΫ
    3. RStudio DesktopͷDownloadΛΫϦοΫ
    4. ࣗ෼ͷύιίϯͷOSʹ͋ͬͨΠϯετʔϥʔΛΫ
    ϦοΫ
    5. ͋ͱ͸μ΢ϯϩʔυͨ͠ϑΝΠϧΛμϒϧΫϦοΫͰ
    ։͍ͯɼࢦࣔʹ͕ͨͬͯ͠ਐΊΔ͚ͩ
    6. ಛʹԿ΋͢Δඞཁͳ͘ɼʮ࣍΁ʯΛԡ͚ͩ͢ͰΑ͍
    ·ͣ͸Πϯετʔϧ΍
    25
    RStudioΛ͍ΕͯΈ·͠ΐ͏

    View Slide

  26. View Slide

  27. View Slide

  28. View Slide

  29. ίϯιʔϧ
    ม਺ͷ֬ೝ
    ΧϨϯτσΟϨ
    ΫτϦ΍ϓϩο
    τɼύοέʔδ
    ɼ
    ϔϧϓը໘ͳͲ

    View Slide

  30. 9K

    View Slide

  31. • ʮRɹΩʔϫʔυʯͰάάΔ
    • ݕࡧΤϯδϯͰͳ͔ͳ͔ώοτ͠ͳ͍৔߹͸…
    • seekR (http://seekr.jp)
    • RjpWiki (http://www.okadajp.org/RWiki/)
    • R-Tips (http://cse.naro.affrc.go.jp/takezawa/r-
    tips/r.html)
    • RʹΑΔ౷ܭॲཧʢhttp://aoki2.si.gunma-u.ac.jp/
    R/ʣ
    • ͳͲɼRʹಛԽͨ͠ௐ΂ํ͕͓͢͢Ί
    9K
    31
    RͰࠔͬͨͱ͖

    View Slide

  32. Today’s Menu
    • RͬͯͳΜ΍ͶΜ
    • RStudioͬͯͷ͕͋ΜͶΜ
    • ·ͣ͸Πϯετʔϧ΍Ͱ
    • ΄ͳجຊૢ࡞΍ͬͯΈΑ͔
    • ؔ਺ͬͪΎ͏ศརͳ΋Μ͕͋ͬͯͳ
    • ΄Μ·࡞ਤָͳΜ΍
    • ύοέʔδͯ
    32

    View Slide

  33. • RStudioΛىಈʢىಈͷ࢓ํ͸Rͱಉ͡ʣ
    • RStudioͰʮ৽͘͠ʯԿ͔Λ࢝ΊΔͱ͖ʹ͸ඞͣ
    ʮϓϩδΣΫτʯΛ࡞Δ
    جຊૢ࡞
    33
    RStudioͷ४උ

    View Slide

  34. • RStudioͰԿ͔Λ෼ੳ͢Δͱ͖ͷ؀ڥʁͷΑ͏ͳ΋ͷͷ୯Ґ
    • ಛఆͷσΟϨΫτϦʢϑΥϧμʣʹ࡞ΒΕΔ
    • ΋ͱ΋ͱ͋ΔϑΥϧμͰ΋ྑ͍͠ϓϩδΣΫτΛ࡞Δࡍʹ৽͘͠
    ϑΥϧμΛ࡞ͬͯ΋Α͍
    • ݚڀ΍͓࢓ࣄ͝ͱʹϑΥϧμ෼͚͞Ε͍ͯͨΒɼͦͷϑΥϧμʹ
    ϓϩδΣΫτΛ࡞ͬͯஔ͘ͱΑ͍
    • ʮR࿅शʯΈ͍ͨͳϑΥϧμΛ࡞ͬͯͦ͜ʹϓϩδΣΫτஔ͍ͯ
    ΋OK
    34
    ϓϩδΣΫτʁʁʁ

    View Slide

  35. 35
    ৽͘͠࡞ΔͳΒݚڀ΍࢓ࣄ͝ͱͷ໊
    લΛ͚ͭͨσΟϨΫτϦΛ͚ͭΔ
    (->New Directory->Empty Projectʣ
    ΋͏͢Ͱʹ࡞ۀʹؔ࿈͢ΔϑΝΠϧ
    ͳͲͷೖͬͨϑΥϧμ͕͋ΔͳΒͦ
    ͜ʹ࡞Δ(->Exsiting Directory)
    RStudioͷ४උ
    جຊૢ࡞

    View Slide

  36. • ϓϩδΣΫτΛ৽͘͠࡞ͬͨΒɼ·ͣ࠷ॳʹඞͣ৽͍͠RεΫϦϓτ
    ϑΝΠϧΛ࡞ΔʢࢀরɿʮίϯιʔϧϕλଧͪଔۀɿεΫϦϓτΤ
    σΟλΛ࢖͓͏ʯʢhttps://speakerdeck.com/tam07pb915/nagoyar14)
    • ͦͯ͠ඞ໊ͣલΛ͚ͭͯอଘ
    • εΫϦϓτΤσΟλΛ࢖͏ํ͕ઈରʹྑ͍ʢੜRͰ΋ʣ
    • ίϯιʔϧʹଧͪࠐΉͷΛͱΓ͋͑ͣ΍ΊΔʢ͋ͱʹ࢒͢ඞཁͷ
    ͳ͍࡞ۀҎ֎ʣ<-झຯͷΑ͏ʹR࢖͏ਓҎ֎͸εΫϦϓτΤσΟλ
    • ্໼ҹ࿈ଧͰཤྺදࣔ͠ͳͯ͘΋εΫϦϓτΤσΟλʹίʔυΛॻ
    ͍͍͚ͯ͹ཤྺ͸࢒Δ
    • ԿߦͰ΋ҰؾʹίʔυΛ࣮ߦͰ͖Δ
    جຊૢ࡞
    36
    RStudioͷ४උ

    View Slide

  37. ίϯιʔϧͬͯͳΜͧ
    ͜Ε
    37

    View Slide

  38. Windows൛ͩͱ͜͜
    38

    View Slide

  39. RStudioͩͱ͜͜
    39

    View Slide

  40. εΫϦϓτΤσΟλ
    40

    View Slide

  41. ϑΝΠϧ->৽͍͠εΫϦϓτ
    41

    View Slide

  42. ͢Δͱ͜Μͳײ͡ʹ
    ͍͕ͭ͜εΫϦϓτΤσΟλ
    42

    View Slide

  43. Macͩͱ͜Μͳײ͡
    ͜ΕΫϦοΫ͢Δ͚ͩͰOK
    43

    View Slide

  44. RStudioͩͱ͜Μͳײ͡
    File -> New File ->R Script·ͨ͸ΞΠίϯ͔Β·ͨ͸Ctrl+Shift+N
    44

    View Slide

  45. ΤσΟλʹଧͪࠐΜͰ
    Ctrl+Rʢ·ͨ͸F5ʣͰ࣮ߦ
    ʢMacͳΒ⌘ʴreturnɼRStudioͳΒCtrl
    + Enterʣ
    45

    View Slide

  46. ϑΝΠϧ->อଘʢ·ͨ͸Ctrl+Sʣ
    ֦ுࢠ͸ͳΜͰ΋͍͍͕ɼtxtʹ͢Δ
    ͱ͖͸ϑΝΠϧͷछྨΛมߋ
    46

    View Slide

  47. ※·ͩR࢖ͬͯͳ͍

    View Slide

  48. Today’s Menu
    • RͬͯͳΜ΍ͶΜ
    • RStudioͬͯͷ͕͋ΜͶΜ
    • ·ͣ͸Πϯετʔϧ΍Ͱ
    • ΄ͳجຊૢ࡞΍ͬͯΈΑ͔ʢŗşƄŘƃʣ
    • ؔ਺ͬͪΎ͏ศརͳ΋Μ͕͋ͬͯͳ
    • ΄Μ·࡞ਤָͳΜ΍
    • ύοέʔδͯ
    48

    View Slide

  49. • “>”͕දࣔ͞Ε͍ͯΔʹೖྗड෇த
    • εΫϦϓτΤσΟλʹ໋ྩΛॻ͖ɼCtrl + Enter
    (⌘ + EnterʣͰ࣮ߦ
    • શ֯μϝθολΠʢಛʹશ֯εϖʔε͸ݟ͑ͳ͍
    ͷͰؾ͍ͮͨΒೖ͍ͬͯͨΓ͢Δʣ
    • େจࣈͱখจࣈ͸͔ͬ͠Γ۠ผ
    • ()ͷલޙ΍ه߸ͷલޙͷ൒֯εϖʔε͸ؔ܎ͳ͍
    جຊૢ࡞
    49
    ஫ҙࣄ߲

    View Slide

  50. • ࢖͏ԋࢉه߸͸࣍ͷ௨Γ
    • ଍͠ࢉɿʴʢΩʔϘʔυʹΑͬͯҧ͍·͕͢ӈͷํʣ
    • Ҿ͖ࢉɿ-ʢϋΠϑϯͰ͋ͬͯμογϡ΍Ξϯμʔόʔʹ͋Βͣʣ
    • ֻ͚ࢉɿ*ʢΩʔϘʔυʹΑͬͯҧ͍·͕͢ӈͷํʣ※MacͷUSΩʔϘʔυͳΒ8
    • ׂΓࢉɿ/ʢΩʔϘʔυʹΑͬͯҧ͍·͕͢ӈԼʣ
    • ྦྷ৐ɿ^ʢΩʔϘʔυʹΑͬͯҧ͍·͕͢ӈͷํʹ͋Γ·͢ΑͶʣ※MacͷUS
    ΩʔϘʔυͳΒ6
    جຊૢ࡞
    50
    ࢛ଇԋࢉ

    View Slide

  51. • ࣜΛೖྗͯ͠ɼEnterΛԡ͢
    جຊૢ࡞
    51
    ࢛ଇԋࢉ
    9+7
    60-13
    4*3
    50/10
    (24+6)*44/10

    View Slide

  52. • ࣜΛೖྗͯ͠ɼEnterΛԡ͢
    جຊૢ࡞
    52
    ࢛ଇԋࢉ
    9+7 16
    60-13 47
    4*3 12
    50/10 5
    (24+6)*44/10 132

    View Slide

  53. • ࣜΛೖྗͯ͠ɼEnterΛԡ͢
    جຊૢ࡞
    53
    ྦྷ৐
    5^2
    #5ͷ2৐
    10^4
    #10ͷ4৐
    #←͜Ε͸ίϝϯτΞ΢τͷҹͰ͢ɻ#ͷ͋ͱʹଓ͚ͯ
    จষΛॻ͘ͱɼ໋ྩͱ࣮ͯ͠ߦ͞Ε·ͤΜʢ˞ผʹ͜
    ͜Ͱ͸ଧͨͳͯ͘OKʣ

    View Slide

  54. ※͜Ε͸͋͘·ͰRʹ׳Εͯ΋
    Β͏ͨΊͷ࿅शͰ͢ɻຊ൪͸
    ͔࣍Β

    View Slide

  55. • ໋ྩͷ్தͰEnterΩʔΛԡͯ͠͠·ͬͨΑ͏Ͱ͢
    • +->ʮ·ͩೖྗऴΘͬͯ΁ΜͰʁʯͱݴ͍ͬͯ·͢
    • +ʹଓ͚ͯೖྗͯ͠OK
    • ؾʹͳΔํ͸ɼEscΩʔʢΩʔϘʔυࠨ্ʣΛԡͯ͠
    ͍ͩ͘͞
    ؔ਺
    55
    >͕+ʹͳͬͨϯΰ
    > 9+
    +

    View Slide

  56. Today’s Menu
    • RͬͯͳΜ΍ͶΜ
    • RStudioͬͯͷ͕͋ΜͶΜ
    • ·ͣ͸Πϯετʔϧ΍Ͱ
    • ΄ͳجຊૢ࡞΍ͬͯΈΑ͔
    • ؔ਺ͬͪΎ͏ศརͳ΋Μ͕͋ͬͯͳ
    • ΄Μ·࡞ਤָͳΜ΍
    • ύοέʔδͯ
    56

    View Slide

  57. • ݱ࣮ͷ΋ͬͱෳࡶͰେྔͷσʔλΛॲཧ͢Δͷ͕ؔ਺
    • ؔ਺
    • ༩͑ΒΕͨҾ਺ʹରͯ͠ॲཧΛฦ͢
    • RͰͳʹ͔΍Γ͍ͨ->ͦΕ͕Ͱ͖Δؔ਺ʢ΍ͦͷؔ
    ਺͕࢖͑Δύοέʔδʣ୳͠
    • ()Ͱׅͬͯ()಺ʹҾ਺ΛೖΕΔ
    • q()΋ؔ਺
    ؔ਺
    57
    ؔ਺ͱ͸

    View Slide

  58. • sqrtؔ਺
    • ͯ͞ɼ͜Ε͸ͳΜͷؔ਺Ͱ͠ΐ͏ʁ
    ؔ਺
    58
    ؔ਺Λ࢖ͬͯΈΔ
    > sqrt(2)ɹɹ
    > sqrt(3)
    > sqrt(100)
    > sqrt(144)

    View Slide

  59. • sqrtؔ਺
    • ͯ͞ɼ͜Ε͸ͳΜͷؔ਺Ͱ͠ΐ͏ʁ
    ؔ਺
    59
    ؔ਺Λ࢖ͬͯΈΔ
    > sqrt(2)ɹɹɹ1.414214
    > sqrt(3) 1.732051
    > sqrt(100) 10
    > sqrt(144) 12
    A.ɹฏํࠜ

    View Slide

  60. • ݱ࣮ͷσʔλॲཧʹ͔ܽͤͳ͍΋͏Ұͭͷେࣄ
    ͳཁૉ͕ม਺
    • ม਺
    • 1ͭҎ্ͷ਺ࣈ΍จࣈྻͳͲͷ஋Λ·ͱΊ͓ͯ
    ͘༰Ε෺
    • ม਺ʢ༰Ε෺ʣͷ໊લΛݺͼग़͢ͱ਺ࣈͷηο
    τ͕ݺͼग़ͤΔ
    ؔ਺
    60
    ม਺ͱ͸

    View Slide

  61. ؔ਺
    61
    ม਺ͱ͸
    1
    2
    3
    4
    ΓΜ͝ʢ਺ࣈʣ1ݸͣͭͰ͸ͳ͘ɼͦΕ͕ೖͬͨΧΰʹؔ਺Λద༻ͨ͠Γ͍ͯ͘͠

    View Slide

  62. • kagoͱ͍͏ม਺ʹ1~4ͷ਺ࣈΛ୅ೖͯ͠Έ·͠ΐ͏
    • c()ؔ਺ɿෳ਺ͷཁૉΛ·ͱΊΔؔ਺
    • <-ʢෆ౳߸+ϋΠϑϯʣɿ໼ҹʢˡʣͷҙຯʢٯ޲͖΋Մʣ
    • <-͸=Ͱ΋୅༻Մೳ
    • ʮ1ͱ2ͱ3ͱ4Λ·ͱΊͯkagoͱ͍͏ม਺ʹ୅ೖ͍ͯͩ͘͠͞Ͷʯͱ
    ͍͏໋ྩ
    • ม਺ͷ໊લΛଧͬͯEnter -> ʮม਺ͷத਎ݟ͍ͤͯͩ͘͞ʯ
    ؔ਺
    62
    ม਺ʹ਺஋Λ୅ೖ
    > kago <-c(1,2,3,4)
    > kago
    ม਺࡞Δ ->த਎֬ೝͱ͍͏
    ྲྀΕΛบʹ͢Δ

    View Slide

  63. • kagoͷத਎͸͜Μͳײ͡
    • ͜ͷkagoʹରͯ͠sqrtؔ਺Λ࣮ߦͯ͠Έ·͢
    ؔ਺
    63
    ม਺ʹରͯؔ͠਺Λ࣮ߦ
    kago
    [1] 1 2 3 4
    sqrt(kago)
    [1] 1.000000 1.414214
    1.732051 2.000000

    View Slide

  64. ؔ਺
    64
    ม਺ʹରͯؔ͠਺Λ࣮ߦ
    sqrt(1)
    sqrt(2)
    sqrt(3)
    sqrt(4)
    sqrt(kago)
    ͲͪΒָ͕͔͸Ұ໨ྎવ

    View Slide

  65. • summary()ؔ਺ɿجຊ౷ܭྔͷࢉग़
    • table()ؔ਺ɿ౓਺෼෍දͷ࡞੒
    • sum()ؔ਺ɿ߹ܭ஋ͷࢉग़
    • length()ؔ਺ɿσʔλͷݸ਺ͷࢉग़
    ؔ਺
    65
    جຊతͳؔ਺͚ͩͰ΋…

    View Slide

  66. • mean()ؔ਺ɿฏۉ஋ͷࢉग़
    • max()ؔ਺ɿ࠷େ஋ͷࢉग़
    • min()ؔ਺ɿ࠷খ஋ͷࢉग़
    • median()ؔ਺ɿதԝ஋ͷࢉग़
    • sd()ؔ਺ɿඪ४ภࠩͷࢉग़
    ؔ਺
    66
    جຊతͳؔ਺͚ͩͰ΋…

    View Slide

  67. • help()ؔ਺
    • ྫɿhelp(mean)ͷΑ͏ʹʢʣ಺ʹؔ਺ΛೖΕΔ
    • ؔ਺ͷઆ໌͕ݟΕΔʢRStudioͳΒӈԼͷϖΠϯʹݱΕ·͢ʣ
    • આ໌͸ӳޠͰ͕͢…
    • usage: ࢖͍ํͷ֓ཁ
    • argument: Ҿ਺ʹऔΔ΋ͷͷઆ໌
    • Example: ࢖͍ํͷྫ
    • ͳͲɼܗ͕ܾࣜ·͍ͬͯΔͷͰݟΔϙΠϯτ͑͞ԡ͑͞Ε͹ා͘ͳ
    ͍Ͱ͢
    ؔ਺
    67
    جຊతͳؔ਺͚ͩͰ΋…

    View Slide

  68. • ؔ਺Λ࢖͏ͷ͸R࡞ۀͷجຊͷ
    • ͋ͱͰ·͍͔ͨͭؔ͘਺࢖͍·͢ͷͰ3ͭ͘Β͍
    ͸֮͑ͯؼ͍ͬͯͩ͘͞
    • ()ͷதʹҾ਺ΛೖΕ·͢
    • ͲΜͳҾ਺ΛऔΔ͔ɼ͍ͭ͘ͷҾ਺ΛऔΔ͔ͳ
    Ͳ͸ؔ਺ʹΑͬͯҧ͍·͢
    ؔ਺
    68
    ؔ਺ʹ͍ͭͯͷ·ͱΊ

    View Slide

  69. • ߦྻͱ͸
    • ཁૉΛॎͱԣʹฒ΂ͨදܗࣜͷ΋ͷʢͱཧղ͠
    ͍ͯͩ͘͞ʣ
    • ͜͏͍͏ͷͰ͢ˠ
    ؔ਺
    69
    ߦྻΛѻͬͯΈΔ
    1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  70. 1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  71. ߦ

    View Slide

  72. Ϊϣʔ

    View Slide

  73. Ϊϣʔ

    View Slide

  74. 1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  75. 1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  76. 1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  77. 1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide


  78. View Slide

  79. Ϩ
    π

    View Slide

  80. Ϩ
    π

    View Slide

  81. 1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  82. 1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  83. 1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  84. 1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  85. • matrix (ཁૉɼnrowɼncolʣ
    • ཁૉɿߦྻͷத਎
    • nrowɿߦ਺ʢྫɿnrow = 3ʣ
    • ncolɿྻ਺ʢྫɿncol = 4ʣ
    ؔ਺
    85
    ߦྻΛ࡞੒͢Δmatrixؔ਺

    View Slide

  86. • matrixؔ਺ͰԼͷߦྻΛ࡞੒ͯ͠Έ·͠ΐ͏
    ؔ਺
    86
    ߦྻΛ࡞੒͢Δmatrixؔ਺
    1 5 9 13
    2 6 10 14
    3 7 11 15
    4 8 12 16

    View Slide

  87. • ͱͯ͠΋͍͍͕…
    ؔ਺
    87
    ߦྻΛ࡞੒͢Δmatrixؔ਺
    1 5 9 13
    2 6 10 14
    3 7 11 15
    4 8 12 16
    matrix(c(1,2,3,4,5,6,7,8,9,+
    10,11,12,13,14,15,16),nrow=+
    4,ncol=4)
    matrix(1:16,nrow=4,ncol=4)
    1:16͸ʮ1͔Β16·Ͱʯ
    ͱ͍͏ҙຯʹͳΔ

    View Slide

  88. • ฒ΂ํΛߦํ޲༏ઌʹ͍ͨ͠৔߹
    ؔ਺
    88
    ߦྻΛ࡞੒͢Δmatrixؔ਺
    matrix(1:16,nrow=4,ncol=4,byrow=T)
    1 2 3 4
    5 6 7 8
    9 10 11 12
    13 14 15 16

    View Slide

  89. • ͜Ε͚ͩͰ͸ɼߦྻΛ͋ͱͰ࢖͏͜ͱ͕ෆՄೳ
    ؔ਺
    89
    ߦྻͷཁૉʹΞΫηε
    >matrix(1:16,nrow=4,ncol=4,byrow=T)
    [,1] [,2] [,3] [,4]
    [1,] 1 5 9 13
    [2,] 2 6 10 14
    [3,] 3 7 11 15
    [4,] 4 8 12 16

    View Slide

  90. • hyouͱ͍͏ม਺ʹอଘ
    • ม਺ʹอଘ͢Δͱɼmatrixؔ਺Λ࣮ߦͯ͠΋ߦྻ
    ͕ίϯιʔϧʹදࣔ͞Ε·ͤΜ͕ͦΕͰOK
    • ໋ྩΛ࣮ߦͯ͠ɼR͕͓ͱͳ͍͠ͱ͖͸͏·͘
    ͍͍ͬͯ·͢
    ؔ਺
    90
    ߦྻͷཁૉʹΞΫηε
    >hyou<-matrix(1:16,nrow=4,ncol=4,byrow=T)

    View Slide

  91. • 2ߦ໨ʹΞΫηε->hyou[2,]
    • 2ྻ໨ʹΞΫηε->hyou[,2]
    ؔ਺
    91
    [,1] [,2] [,3] [,4]
    [1,] 1 2 3 4
    [2,] 5 6 7 8
    [3,] 9 10 11 12
    [4,] 13 14 15 16
    ߦྻͷཁૉΛऔΓग़͢

    View Slide

  92. • 2ߦ໨ʹΞΫηε->hyou[2,]
    • 2ྻ໨ʹΞΫηε->hyou[,2]
    ؔ਺
    92
    > hyou[2,]
    [1] 5 6 7 8
    > hyou[,2]
    [1] 2 6 10 14
    ߦྻͷཁૉΛऔΓग़͢

    View Slide

  93. • ෳ਺ߦɾෳ਺ྻΛ·ͱΊͯऔΓग़͍ͨ͠৔߹͸c
    ؔ਺Λ࢖͏ʢʮ1ߦ໨͔Β3ߦ໨ʯ౳͸ίϩϯʣ
    ؔ਺
    93
    ߦྻͷཁૉΛऔΓग़͢
    >hyou[c(2,4),] #2ߦ໨ͱ4ߦ໨
    [,1] [,2] [,3] [,4]
    [1,] 5 6 7 8
    [2,] 13 14 15 16

    View Slide

  94. • ߦʢΪϣʔʣ͸ԣɼྻʢϨπʣ͸ॎ
    • matrix(ཁૉ, nrow, ncolʣ
    • औΓग़͢ͱ͖͸[]Λ࢖͏
    • hyou[2,] #2ߦ໨
    • hyou[,2] #2ྻ໨
    • hyou[2,2] #2ߦ໨ͷ2ྻ໨
    ؔ਺
    94
    ߦྻͷ·ͱΊ

    View Slide

  95. ʮݱ࣮ͷσʔλݟͨ͜ͱ͋Μ
    ͷʁͶ͑ʁmatrixؔ਺Ͱଧͪ
    ࠐΉͷʁഅࣛͳͷʁʯ

    View Slide

  96. ʮߦྻ͡Όจࣈͱ͔ѻ
    ͑ͳ͍Ͱ͠ΐʁʯ

    View Slide

  97. σʔλϑϨʔϜ

    View Slide

  98. • จࣈ΍਺ࣈͳͲɼܕͷҧ͏σʔλΛදܗࣜͰฒ
    ΂ͨ΋ͷ
    • σʔλϑϨʔϜͷಡΈࠐΈʹνϟϨϯδͯ͠Έ·
    ͠ΐ͏
    ؔ਺
    98
    σʔλϑϨʔϜܗࣜ

    View Slide

  99. • read.table() ؔ਺
    • “ϑΝΠϧ໊”
    • headerɿݟग़͠ߦͷ༗ແ
    • sepɿ۠੾Γจࣈͷࢦఆ
    • read.table(“ϑΝΠϧ໊”, header = T or F, sep=“\t”or
    “,”)
    • csvϑΝΠϧͷͱ͖͸read.csv()ؔ਺
    ؔ਺
    99
    ֎෦σʔλͷಡΈࠐΈ
    ʮλϒʯͷҙຯɻWindows
    ͳΒ¥t

    View Slide

  100. • σʔλɿhttp://bit.ly/R-workshop_20180602
    • ϑΝΠϧ -> ܗࣜΛࢦఆͯ͠μ΢ϯϩʔυ->ΧϯϚ۠੾Γͷ஋
    ʢcsvɼݱࡏͷγʔτʣ
    • ϑΝΠϧ໊ͷޙΖͷ΄͏ʹ͋Δʮ - γʔτ1 ʯ͸࡟আ͍ͯͩ͘͠͞
    • RStudioͷϓϩδΣΫτϑΝΠϧ͕͋ΔϑΥϧμʹDL
    • ݸਓతʹ͸ɼExcelͳͲͷγʔτΛಡΈࠐΉ৔߹͸csvϑΝΠϧͱͯ͠
    γʔτΛผʹอଘ͢Δ͜ͱΛ͓͢͢ΊʢΫϦοϓϘʔυ͔Βͩͱɼಡ
    ΈࠐΜͩσʔλ͕ޙ͔ΒΘ͔Βͳ͍ͨΊʣ
    • ޙʹ࢒͢ඞཁͷͳ͍࡞ۀͳΒɼγʔτͷͳ͔ͷ਺஋Λίϐʔͯ͠ΫϦο
    ϓϘʔυ͔ΒಡΈࠐΉ
    ؔ਺
    100
    ֎෦σʔλͷಡΈࠐΈ

    View Slide

  101. • ࣍ͷΑ͏ͳίʔυͰσʔλΛಡΈࠐΈ
    • ϑΝΠϧ໊͸””Ͱ͘͘Δ͜ͱ
    • ϑΝΠϧ໊ʹ֦ுࢠΛඞؚͣΊΔ͜ͱ
    ؔ਺
    101
    ֎෦σʔλͷಡΈࠐΈ
    dat <-
    read.table(“XXXX.csv”,header=T,
    sep=“,”)
    #·ͨ͸
    dat <-read.csv(“XXXX.csv”,header=T)

    View Slide

  102. • ಡΈࠐΜͩσʔλͷ਺ߦ͚ͩͰݟ͍ͨ৔߹ʹ͸
    head()ؔ਺Λ࢖༻
    • head(dat,10)ͷΑ͏ʹɼΧϯϚͰ۠੾ͬͯ೚ҙͷ਺Λ
    ༩͑Δͱɼͦͷߦ਺෼͚ͩදࣔ
    • RStudioͳΒӈ্ͷϖΠϯͰdatͱ͍͏ม਺͕࡞ΒΕ
    ͨ͜ͱ͕֬ೝͰ͖ɼΫϦοΫ͢Δͱத਎͕ݟΕ·͢
    ؔ਺
    102
    ಡΈࠐΜͩσʔλͷ֬ೝ
    >dat
    >head(dat)

    View Slide

  103. • meanؔ਺Ͱฏۉ஋ΛٻΊͯΈ·͠ΐ͏
    ؔ਺
    103
    ಡΈࠐΜͩσʔλʹؔ਺Λద༻
    >mean(dat)

    View Slide

  104. • ͜͏ͳͬͯ͠·͏…
    ؔ਺
    104
    ಡΈࠐΜͩσʔλʹؔ਺Λద༻
    >mean(dat)
    Warning message:
    In mean.default(dat) : argument is
    not numeric or logical: returning
    NA

    View Slide

  105. • meanؔ਺ʹ༩͑ΒΕΔͷ͸ɼϕΫτϧʢ1ߦ·ͨ͸1ྻͷΈʣ
    • ؔ਺ʹΑͬͯѻ͑Δσʔλͷܕ͕ҧ͏
    • dat[,2]ͷΑ͏ʹɼʮdatͷ2ྻ໨ʯͱ͢Δ
    • datͷޙΖʹ$Λ͚ͭͯɼdat$ClassA_Gr
    • σʔλϑϨʔϜܗࣜͰ͸$ͷޙʹྻ໊ΛࢦఆͰ͖Δ
    ؔ਺
    105
    ಡΈࠐΜͩσʔλʹؔ਺Λద༻
    >mean(dat[,2])
    >mean(dat$ClassA_Gr)

    View Slide

  106. • ྻ͝ͱʹͰ͖ͳ͍ͷʁʁʁ
    ؔ਺
    106
    ಡΈࠐΜͩσʔλʹؔ਺Λద༻
    >mean(dat$ClassA_Gr)
    >mean(dat$ClassA_Vo)
    >mean(dat$ClassB_Gr)
    >mean(dat$ClassB_Vo)

    View Slide

  107. • apply()ؔ਺ɿྻ·ͨ͸ߦ͝ͱʹؔ਺Λద༻
    • datͷ··ͩͱɼIDྻ·Ͱܭࢉ͞Εͯ͠·͏
    • dat[,-1]ͱ͢Δͱɼʮ1ྻ໨͸ൈ͍ͯͶʯͷҙຯ
    ؔ਺
    107
    ಡΈࠐΜͩσʔλʹؔ਺Λద༻
    >apply(dat, 2, mean)
    1͸ߦ͝ͱɼ2͸ྻ͝ͱ
    >apply(dat[,-1], 2, mean)
    ClassA_Gr ClassA_Vo ClassB_Gr ClassB_Vo
    74.60 69.96 71.56 73.92

    View Slide

  108. Today’s Menu
    • RͬͯͳΜ΍ͶΜ
    • RStudioͬͯͷ͕͋ΜͶΜ
    • ·ͣ͸Πϯετʔϧ΍Ͱ
    • ΄ͳجຊૢ࡞΍ͬͯΈΑ͔
    • ؔ਺ͬͪΎ͏ศརͳ΋Μ͕͋ͬͯͳ
    • ΄Μ·࡞ਤָͳΜ΍
    • ύοέʔδͯ
    108

    View Slide

  109. • ώετάϥϜ
    • ࢄ෍ਤ
    • ശͻ͛ਤ
    ࡞ਤ
    109
    ΍ͬͯΈΔ͜ͱ

    View Slide

  110. • ώετάϥϜ
    • ࢄ෍ਤ
    • ശͻ͛ਤ
    ࡞ਤ
    110
    ΍ͬͯΈΔ͜ͱ

    View Slide

  111. ࡞ਤ
    111
    ώετάϥϜ
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    >hist(dat$ClassA_Gr)

    View Slide

  112. • ώετάϥϜ
    • ࢄ෍ਤ
    • ശͻ͛ਤ
    ࡞ਤ
    112
    ΍ͬͯΈΔ͜ͱ

    View Slide

  113. ࡞ਤ
    113
    ࢄ෍ਤ
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    >plot(dat$ClassA_Gr,dat$ClassA_Vo)
    ࢄ෍ਤ͸جຊతʹ2ม਺ͷରԠؔ܎ͷਤࣔͳͷͰɼ2ͭ
    ͷϕΫτϧΛΧϯϚͰ۠੾ͬͯೖྗ

    View Slide

  114. ࡞ਤ
    114
    ࢄ෍ਤͷ޻෉
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    >plot(dat$ClassA_Gr,dat$ClassA_Vo)
    ࢄ෍ਤ͸جຊతʹ2ม਺ͷରԠؔ܎ͷਤࣔͳͷͰɼ2ͭ
    ͷϕΫτϧΛΧϯϚͰ۠੾ͬͯೖྗ
    σϑΥϧτͰ͸x࣠ͱy͕࣠σʔλʹ߹Θ
    ͤͯઃఆ͞Εͯ͠·͏…

    View Slide

  115. ࡞ਤ
    115
    ࢄ෍ਤͷ޻෉
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    >plot(dat$ClassA_Gr,dat$ClassA_Vo,x
    lim=c(0,100),ylim=c(0,100))
    xlim͸x࣠ͷ෯Λࢦఆ͢Δʢ͜͜Ͱ͸0͔Β100·Ͱʣ
    ylim͸y࣠ͷ෯Λࢦఆ͢Δʢ͜͜Ͱ͸0͔Β100·Ͱʣ
    ݟͨ໨͕શવมΘͬͯ·͢ΑͶɻਤࣔ͸
    ศརͰ͕͢ɼʮݟͤํʯͰ͍ͣͿΜσʔ
    λ͕ҧ͏΋ͷͷΑ͏ʹݟ͑ͯ͠·͏ͷͰ
    ஫ҙ

    View Slide

  116. ࡞ਤ
    116
    ࢄ෍ਤͷ޻෉
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    >plot(dat$ClassA_Gr,dat$ClassA_Vo,x
    lim=c(0,100),ylim=c(0,100),xlab=“Gr
    ammar”,ylab=“Vocabulary”)
    xlab͸x࣠ͷϥϕϧΛࢦఆ͢Δ
    ylab͸y࣠ͷϥϕϧΛࢦఆ͢Δ

    View Slide

  117. • ώετάϥϜ
    • ࢄ෍ਤ
    • ശͻ͛ਤ
    ࡞ਤ
    117
    ΍ͬͯΈΔ͜ͱ

    View Slide

  118. ࡞ਤ
    118
    ശͻ͛ਤ
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    Histogram of dat$ClassA_Gr
    dat$ClassA_Gr
    Frequency
    55 60 65 70 75 80 85 90
    0 1 2 3 4 5 6 7
    >boxplot(dat[,-1])

    View Slide

  119. • RStudio
    • Export -> Save image or PDF (or Copy to
    Clipboard)
    • R
    • ϑΝΠϧ->ผ໊Ͱอଘ->metafile
    • อଘͷܗࣜ͸͍Ζ͍Ζબ΂Δ͕ɼmetafile͕͖Ε͍
    ͳͷͰ͓͢͢Ίʢͨͩ͠PDFͰมͳઢೖΔͳͲͷ
    όά͕ىͬͨ͜Γ͢Δʣ
    ࡞ਤ
    119
    ඳ͍ͨਤͷอଘ

    View Slide

  120. Today’s Menu
    • RͬͯͳΜ΍ͶΜ
    • RStudioͬͯͷ͕͋ΜͶΜ
    • ·ͣ͸Πϯετʔϧ΍Ͱ
    • ΄ͳجຊૢ࡞΍ͬͯΈΑ͔
    • ؔ਺ͬͪΎ͏ศརͳ΋Μ͕͋ͬͯͳ
    • ΄Μ·࡞ਤָͳΜ΍
    • ύοέʔδͯ
    120

    View Slide

  121. • R͕ఏڙ͍ͯ͠Δύοέʔδ͸ͨͬ͘͞Μ͋Δ
    • ͍Ζ͍Ζͳ͜ͱΛ΍Ζ͏ͱࢥ͏ͱύοέʔδΛ
    Πϯετʔϧ͠ͳ͍ͱ͍͚ͳ͍
    • Πϯετʔϧͨ͋͠ͱʹԼͷ͓·͡ͳ͍͕ඞཁ
    ύοέʔδ
    121
    ศར͞Λ૿΍͢ύοέʔδ
    >install.packages(“ύοέʔδ໊”)
    >library(ύοέʔδ໊)
    library()ؔ਺Ͱ͸””ͳ͠Ͱ͍͚Δ͕
    install.packages()ؔ਺͸ແཧͳͷͰ஫ҙ

    View Slide

  122. • beeswarmύοέʔδͰ๘܈ਤΛඳ͖·͠ΐ͏
    • ശͻ͛ਤʹॏͶॻ͖΋Ͱ͖Δ
    ύοέʔδ
    122
    ศར͞Λ૿΍͢ύοέʔδ
    >install.packages(“beeswarm”)
    >library(beeswarm)
    >beeswarm(dat)
    >boxplot(dat[,-1])
    >beeswarm(dat[,-1],add=T)

    View Slide

  123. View Slide

  124. ͓͠·͍

    View Slide