ChatGPTの現状理解と R関数&パッケージ作成への活用

##ChatGPTの現状理解とR関数&パッケージ作成への活用

1. ChatGPTの現状理解
OpenAI社について
ChatGPTとは？
GPT-3.5とGPT-4
フロンプトとは？
ChatGPTの得意なこと・苦手なこと（事例とTipsも）
2. R関数&パッケージ作成への活用
GPT API keyの取得
gptstudioパッケージを使って、RStudio上でChatGPTを使用する事例の紹介

Transcript

1. 4BUPTIJ
   ,VNF
   !TLVNF $IBU(15ͷݱঢ়ཧղͱ
   3ؔ਺ύοέʔδ࡞੒΁ͷ׆༻ #JP1BDLBUIPO
   
   
    .":
2. ࠓ೔ͷ࿩୊ఏڙ  $IBU(15ͷݱঢ়ཧղ
    0QFO"*ࣾʹ͍ͭͯ
    $IBU(15ͱ͸ʁ
    (15ͱ(15
    ϑϩϯϓτͱ͸ʁ
    $IBU(15ͷಘҙͳ͜ͱɾۤखͳ͜ͱʢࣄྫͱ5JQT΋ʣ
    3ؔ਺ύοέʔδ࡞੒΁ͷ׆༻
    (15
   "1*
   LFZͷऔಘ
    HQUTUVEJPύοέʔδΛ࢖ͬͯɺ34UVEJP্Ͱ $IBU(15Λ࢖༻͢Δࣄྫͷ঺հ
3. IUUQTPQFOBJDPNCMPHDIBUHQU Ͳ͏΍ͬͯ࢖͏͔ʁʁ
   ʮ5SZ
   $IBU(15ʯ͔Β6*൛͕ར༻Մೳ αϜɾΞϧτϚϯ͕૑ۀͨ͠"*اۀͰɺ"*νϟοτ Ϙοτ$IBU(15ͷ։ൃɾఏڙͰੈքతʹ༗໊ʹ ChatGPT͸ʮΠϯλʔωοτͷొ৔ҎདྷͷΠϯύΫτʯͱ΋
4. $IBU(15ͷ࣮ߦ؀ڥ
   6*ฤ IUUQTDIBUPQFOBJDPN NPEFMHQU ຊ୊Λ࿩͢લʹɺॳΊͯͷํ޲͚ʹ$IBU(15ͷ࣮ԋಈըΛʜ
5. $IBU(15ͷ࣮ߦ؀ڥ
   6*ฤ ຊ୊Λ࿩͢લʹɺॳΊͯͷํ޲͚ʹ$IBU(15ͷ࣮ԋಈըΛʜ
6. $IBU(15ͱ͸ʁ IUUQTKBXJLJQFEJBPSHXJLJ$IBU(15
   ͱ͔ͷग़య ✦
   $IBU
   (FOFSBUJWF
   1SFUSBJOFE
   5SBOTGPSNFS
   (15 ͷུ
   ✦
   0QFO"*͕ࣾ೥݄ʹެ։ͨ͠"*νϟοτϘοτɻ
   ✦
   ओʹɺ(15ͷνϟοτػೳΛࢦ͢ɻ
   ✦
   ୯ʹʮ(15ʯͱݴ͏ͱɺϞσϧࣗମ͋Δ͍͸ଞͷػೳ΋ࢦ͢ɻ ✦େن໛ݴޠϞσϧʢ--.
   -BSHF
   -BOHVBHF
   .PEFMʣͷͭ
   ✦
   ಛ௃
   ਓ͕ؒࣗવʹײ͡ΔจষΛੜ੒͢ΔೳྗΛ࣋ͭ
   ✦
   Ϟσϧߏங
   ڭࢣ͋Γֶश
   
   ڧԽֶश
   
   సҠֶश
   ✦
   ݱঢ়ɺ(15
   ೥݄
   ͱ
   ࠷৽൛ͷ(15
   ೥݄ ೔
   ͷ--.Ϟσϧ͕͋Δɻ
7. ৄ͘͠஌Γ͍ͨํ͸
   +PJDIJ
   *UPઌੜͷ:PV5VCFΛ IUUQTXXXZPVUVCFDPNXBUDI W/2.8P[$*2MJTU1-EX0Q'UI./J7+OCCU, 8156UL6)/4[
8. $IBU(15ͰԿ͕มΘ͔ͬͨʁ ✦
   "*ͷେऺԽʹ΄΅੒ޭ
   ɹʢैདྷͷδϨϯϚʣ
   ✦
   "*Ϟσϧ͕ެ։͞Εͯ΋ɺσʔλ͕ແ͘࢖͑ͳ͍ɻ
   
   ✦
   σʔλ͕͋ΕͲɺܭࢉϦιʔε͕଍ΓͣɺܭࢉͰ͖ͳ͍ɻ
   ✦
   ͦ΋ͦ΋݁Ռ͕࠶ݱ͠ͳ͍ʜ ✦
   ੈքதͷݴޠֶऀ͕੒͠ಘͳ͔ͬͨɺ࠷৽ͷݴޠॲཧٕज़ ͕݄υϧͷαϒεΫʢܭࢉίετࠐʑʣͰ࢖͑Δɻ
   ✦Ϟσϧߏங΍ֶशɺαʔόʔͷઃఆͳͲෆཁʢ'JOFUVOJOH͸ඞཁʣ
   ✦ݴޠֶɾࣗવݴޠॲཧͷ෼໺͸௒ઈΫϩʔζ
   
   ެ։༗Γಘͳ͍ɻ
   ✦Ϟσϧͷܭࢉίετ΍ετϨʔδͳͲͰԯ୯Ґͷඅ༻ʢٱถ༧૝ʣ
   ✦εύίϯͷແྉ഑෍ঢ়ଶʁʁʁ
9. $IBU(15 $IBU(15
   1MVT (15
   "1* ػೳ $IBU(15ͷΈ $IBU(15ͷΈ ଞͷ(15Ϟσϧ΋
   ࢖༻Մೳ ྉۚମܥ ແྉ αϒεΫ
   64υϧ݄ ैྔ՝ۚ --. (15 (15
   (15 (15
   (15 ࢖͍ํ (6*
   ʢνϟοτܗࣜʣ (6*
   ʢνϟοτܗࣜʣ $6*Ͱ"1*࣮ߦ $IBU(15
   QMVHJOT ෆՄ ར༻Մ
   αϒεΫ
   
   XBJUMJTUొ࿥
   $IBU(15
   6*্Ͱ
   SEQBSUZΞϓϦέʔγϣϯΛར༻ػೳ ೥݄೔ݱࡏ 0QFO"*ࣾ
   ఏڙαʔϏεҰཡ
10. (15ͱ(15͸Կ͕ҧ͏ʁ 0QFO"*ΑΓಠࣗධՁ͕ఏڙ͞Ε͍ͯΔ ✦ ਪ࿦
    ී௨Ϩϕϧ
    ✦ ૣ͍ ✦ ਪ࿦
    αΠίʔʹྑ͍
    ✦ ஗͍
11. IUUQTPQFOBJDPNXBJUMJTUHQUBQJ
    IUUQTPQFOBJDPNXBJUMJTUQMVHJOT (15
    "1*
    
    $IBU(15
    QMVHJOT
    ͷར༻͸ॱ൪଴ͪ
12. ϓϩϯϓτͱ͸ʁ IUUQTXBJJJOGPXPSEIUNM
    
    IUUQTQSUJNFTKQNBJOIUNMSEQIUNM
    IUUQTFXPSETKQX&&"%&#&&IUNM
    ͱ͔ ✦
    ίϚϯυϓϩϯϓτͷ͜ͱʁʁ
    ✦ ίϚϯυ
    ίϯϐϡʔλʹಛఆͷػೳͷ࣮ߦΛࢦࣔ͢Δ໋ྩ ͷ͜ͱɻ
    ✦ ϓϩϯϓτ
    γεςϜ͕ೖྗΛड͚෇͚ΒΕΔঢ়ଶͰ͋Δ͜ ͱΛࣔ͢ϚʔΫͷ͜ͱʢʮʯʮʯʮʯͱ͔ʣɻ ࠷ۙɺٸʹฉ͘Α͏ʹͳͬͨ ʢ"*ͷจ຺Ͱ͸ʣ
    "*Ϟσϧʹର͢Δࢦࣔ
    
    ࢦࣔΛग़ͨ͢Ίͷจষͷ͜ͱɻ
13. $IBU(15͕ಘҙͳ͜ͱ - ৘ใݕࡧ ɾ஌ܙା/ܝࣔ൘తͳ࢖͍ํ - هࣄཁ໿ɺ຋༁(ଟݴޠ ) - ίʔσΟϯά (͓ͦΒ͘ɺ΄΅શͯΧόʔ ) - ϓϩϯϓτͷ࡞੒ɾվળ (ࢦࣔจΛAIͱର࿩ܕͰ࡞੒ɾվળͰ͖Δ) ྫ
    1$"ͷ3ؔ਺Λ࡞੒͢Δϓϩϯϓτ
    ɹɹઃఆɾཁ݅ఆٛΛ͢Δ
14. - ϓϩϯϓτͷ࡞੒ɾվળ (ࢦࣔจΛAIͱର࿩ܕͰ࡞੒ɾվળͰ͖Δ) ྫ
    ίϝϯτ෦෼ͷ೔ӳ༁ ྫ
    վળ఺վળ൛ͷఏҊ $IBU(15͕ಘҙͳ͜ͱ
15. ϓϩϯϓτͷ࡞੒Ͱ͸ཁ݅ఆٛɾ۩ମੑ͕ॏཁ ʮ਺ཧղੳͷجຊʯ͸$IBU(15Ͱ΋ಉ͡
    ✦ Ϟσϧ͕େ͖͘ɾύϥϝʔλ͕ଟ͍ͱ݁Ռ͕ऩଋ͠ͳ͍ɻ
    ✦ ԾఆɾલఏΛஔ͍ͯɺ݁Ռͷग़ྗൣғΛऩଋͤ͞Δɻ
    ✦ ܭࢉίετΛ௿͘͢Δͱɺܭࢉ͕଎͘ͳͬͯɺ౴͑ʹૣ͘ḷΓண͘ɻ ग़ྗ͕৑௕
    ్தͰఀࢭ ͙͢ʹ݁Ռग़ྗ
16. "*ʹઃఆΛ༩͑Δ ྫ
    ૉਓɺϓϩɺਓ෺૾ɺܳೳਓɾ༗໊ਓͳͲ
17. $IBU(15͕ۤखͳ͜ͱ - Ϟσϧͷֶशσʔλ͕2021೥·Ͱ - هࣄʹͳ͍ͬͯͳ͍৘ใʢձһαΠτɺ஍Ҭωλ etcʣʹऑ͍
18. ࠓޙɺ$IBU(15
    QMVHJOTͰͷରԠʹظ଴ ࣌ʹ͸ฉ͖ฦ͢͜ͱ΋େ੾ $IBU(15͕ۤखͳ͜ͱ - Ϟσϧͷֶशσʔλ͕2021೥·Ͱ - هࣄʹͳ͍ͬͯͳ͍৘ใʢձһαΠτɺ஍Ҭωλ etcʣʹऑ͍
19. ࠓ೔ͷ࿩୊ఏڙ  $IBU(15ͷݱঢ়ཧղ
     0QFO"*ࣾʹ͍ͭͯ
     $IBU(15ͱ͸ʁ
     (15ͱ(15
     ϑϩϯϓτͱ͸ʁ
     $IBU(15ͷಘҙͳ͜ͱɾۤखͳ͜ͱʢࣄྫͱ5JQT΋ʣ
     3ؔ਺ύοέʔδ࡞੒΁ͷ׆༻
     (15
    "1*
    LFZͷऔಘ
     HQUTUVEJPύοέʔδΛ࢖ͬͯɺ34UVEJP্Ͱ $IBU(15Λ࢖༻͢Δࣄྫͷ঺հ
20. IUUQTQMBUGPSNPQFOBJDPNPWFSWJFX 0QFO
    "*
    %FWFMPQFS
    QBHF
21. IUUQTQMBUGPSNPQFOBJDPNBDDPVOUBQJLFZT (15
    "1*
    LFZTͷ࡞੒ 
    ,FZΛίϐϖ 
22. IUUQTDSBOSQSPKFDUPSHXFCQBDLBHFTHQUTUVEJPJOEFYIUNM
    IUUQTHJUIVCDPN.JDIFM/JWBSEHQUTUVEJP
    IUUQTHJUIVCDPN+BNFT)8BEFHQUUPPMT ؔ࿈ύοέʔδ 34UVEJP্Ͱ$IBU(15Λ࢖͑ΔΑ͏ʹ͢Δ"EEJOT
23. ύοέʔδͷΠϯετʔϧखॱ QBLύοέʔδͷΠϯετʔϧ
    
    JOTUBMMQBDLBHFT QBL
    (JU)VCͷύʔιφϧΞΫηετʔΫϯͷઃఆ
    
    4ZTTFUFOW (*5)6#@1"5ZPVS@UPLFO@IFSF
    HQUTUVEJPHQUUPPMTύοέʔδͷΠϯετʔϧ
    
    QBLQBL .JDIFM/JWBSEHQUTUVEJP
    
    QBLQBL +BNFT)8BEFHQUUPPMT
    
    MJCSBSZ HQUTUVEJP
    
    MJCSBSZ HQUUPPMT
    ࠷ޙʹɺ34UVEJPΛ࠶ىಈ͢Δ
24. 34UVEJP্Ͱͷઃఆ 0QFO"*
    "1*
    ,FZͷઃఆ
    
    4ZTTFUFOW 01&/"*@"1*@,&:
    
    "1*,&:
    "EEJOTͷݕࡧ૭ͷݺͼग़͠
    ɹ$.%$53-
    
    4)*'5
    
    1
    "EEJOTͷݕࡧ૭͔Βݕࡧ
    ࢖͍ํ
25. 34UVEJP্Ͱ࣮ߦͷखॱ 
    ίʔυ෦෼Λબ୒͢Δ 
    ֘౰ͷ"EEJOTΛબ୒͢Δ
    
    ࣮ߦ͞Εͯɺ׬ྃΛ଴ͭ 
    "EEJOTͷݕࡧ૭ͷݺͼग़͠
    ɹ$.%$53-
    
    4)*'5
    
    1
    
    TUFQT ࣮ࡍʹ࣮ԋ͠·͢ʂ
26. ·ͱΊ ✦ $IBU(15͸λεΫΛબ΂͹ɺ͔ͳΓύϑΥʔϚϯε͕ ߴ࣮͘ߦͰ͖Δ
    ✦ 3ؔ਺΍ύοέʔδ։ൃͰ΋ར༻Ͱ͖Δɻ
    ✦ ͨͩ͠ɺݱঢ়͸ɺ(15
    ✦ ֶशσʔλͱͯ͠৘ใ͕ͳ͍ͱͰ͖ͳ͍͜ͱ͕ଟ͍ɻ
    ✦ ྫ
    #-"45ݕࡧͷ࣮ߦ
27. ิ଍ࢿྉ
28. (PPHMF
    #BSE (PPHMF΋։ൃͯͨ͠ʁʁʁ IUUQTKBQBOHPPHMFCMPHDPNCBSEIUNM
29. (PPHMF
    #BSEͷ࣮ߦը໘ IUUQTCBSEHPPHMFDPN
30. #BSE͸௚ۙσʔλ΋࢖ΘΕ͍ͯΔ IUUQTCBSEHPPHMFDPN