GPT를 RSTUDIO에서 사용하고 워드클라우드까지 해 보기(chatgpt)

OPEN AI의 API KEY를 발급받으면 사용하는 만큼만 지불하기 때문에 매월 $20 씩 내지 않아도 된다. 
 
그래서 나같이 가끔씩 이용하면서 코딩 연습하는 사람들에겐 API KEY 발급 받아 사용하는게 더 좋을 것 같다.
혹시 KEY 유출이 될 수 있을지 몰라 MAX $10을 걸어 놓고 사용한다.
 

 
 
그리고 r에서 chatgpt 를 사용한 경험들을 공유하고자 한다. 
 
1. 우선 chatgpt 패키지 설치
 
install.packages("chatgpt")
library(chatgpt)
 
https://github.com/jcrodriguez1989/chatgpt

GitHub - jcrodriguez1989/chatgpt: Interface to ChatGPT from R

 
2. 그리고 발급받은 api_key 실행
Sys.setenv(OPENAI_API_KEY = "api_key")
 
3. 그리고 chatgpt 에서 물어보듯이 물어봄. 이렇게 하면 워드 클라우드로 만드는 코드와 연계하기 좋음
명령어는 ask_chatgpt
 
cat(ask_chatgpt("'대한민국의 저출산율 대책은 무엇인가?'에 대한 주제로 발표를 5분간 하려고 한다. 스크립트를 만들어주세요."))
 
 
4. 결과
 

*** ChatGPT input:

'대한민국의 저출산율 대책은 무엇인가?'에 대한 주제로 발표를 5분간 하려고 한다. 스크립트를 만들어주세요.

안녕하세요!

저출산이라는 문제는 매우 심각한 사회 문제입니다. 이번 발표에서는 대한민국의 저출산율 대책에 대해 알아보겠습니다.

우리나라의 출산율은 매년 낮아지고 있습니다. 이러한 상황에서 대한민국 정부는 다양한 대책을 시행하고 있습니다.

우선, 정부는 출산율을 높이기 위해 사회적 인프라를 강화하고 있습니다. 이를 위해 예비부모들이 가족을 꾸리기 좋은 환경을 조성하고, 가족친화적인 사회 분위기를 만들기 위한 정책을 추진하고 있습니다.

또한, 경제 및 사회적 문제로 인해 출산을 미루는 경우가 많은데, 이를 해결하기 위해 정부는 부모들이 출산 후에도 일자리와 경제적 안정을 유지할 수 있도록 지원하는 제도를 강화하고 있습니다. 예를 들어, 육아휴직 제도의 확대와 육아통장 등 다양한 지원 제도를 제공하고 있습니다.

또한, 저출산 문제는 노인 인구비중의 증가로 이어지는 문제이기도 합니다. 따라서 정부는 노인 인구 삶의 질을 높이고, 혼자 사는 노인들의 삶의 양질 보장을 위한 정책을 추진하여 저출산 문제와 노인 인구 증가 문제를 동시에 해결하고자 합니다.

마지막으로, 저출산 문제는 국가적인 문제이기 때문에문제 해결을 위해 전 국민의 참여가 필요합니다. 민간 참여와 국가 참여를 포괄한 다양한 이슈를 논의하고, 문제를 해결해야 합니다.

이상으로 대한민국의 저출산율 대책에 대해 알아보았습니다. 감사합니다.

 
5. 워드 클라우드까지 해 봄. 한국 R 사용자 모임에서 만든 bitTA 패키지를 사용하였다. 
 
remotes::install_github("bit2r/bitTA")
install_mecab_ko()
install.packages("RcppMeCab")
 
library(bitTA)
library(dplyr) # load dplyr package
library(wordcloud2) # load wordcloud2 package

str <- "
*** ChatGPT input:

'대한민국의 저출산율 대책은 무엇인가?'에 대한 주제로 발표를 5분간 하려고 한다. 스크립트를 만들어주세요.

안녕하세요!

저출산이라는 문제는 매우 심각한 사회 문제입니다. 이번 발표에서는 대한민국의 저출산율 대책에 대해 알아보겠습니다.

우리나라의 출산율은 매년 낮아지고 있습니다. 이러한 상황에서 대한민국 정부는 다양한 대책을 시행하고 있습니다.

우선, 정부는 출산율을 높이기 위해 사회적 인프라를 강화하고 있습니다. 이를 위해 예비부모들이 가족을 꾸리기 좋은 환경을 조성하고, 가족친화적인 사회 분위기를 만들기 위한 정책을 추진하고 있습니다.

또한, 경제 및 사회적 문제로 인해 출산을 미루는 경우가 많은데, 이를 해결하기 위해 정부는 부모들이 출산 후에도 일자리와 경제적 안정을 유지할 수 있도록 지원하는 제도를 강화하고 있습니다. 예를 들어, 육아휴직 제도의 확대와 육아통장 등 다양한 지원 제도를 제공하고 있습니다.

또한, 저출산 문제는 노인 인구비중의 증가로 이어지는 문제이기도 합니다. 따라서 정부는 노인 인구 삶의 질을 높이고, 혼자 사는 노인들의 삶의 양질 보장을 위한 정책을 추진하여 저출산 문제와 노인 인구 증가 문제를 동시에 해결하고자 합니다.

마지막으로, 저출산 문제는 국가적인 문제이기 때문에문제 해결을 위해 전 국민의 참여가 필요합니다. 민간 참여와 국가 참여를 포괄한 다양한 이슈를 논의하고, 문제를 해결해야 합니다.

이상으로 대한민국의 저출산율 대책에 대해 알아보았습니다. 감사합니다."

get_spacing(str)


str %>%
  morpho_mecab(indiv = FALSE) %>%
  table() %>%
  wordcloud2::wordcloud2(fontFamily = "NanumSquare")
 
 
6. 결과