The goal of KoreanBaseballNews is to provide the Korean Baseball news information.
You can install the devloping version of KoreanBaseballNews from github with:
# install.packages('remotes')
remotes::install_github("MrKevinNa/KoreanBaseballNews")
# load package
library(KoreanBaseballNews)
# read data year 2018 and assign it to KBBNews2018
KBBNews2018 <- KoreanBaseballNews2018
# check the structure of the object
str(object = KBBNews2018)
#> 'data.frame': 42390 obs. of 18 variables:
#> $ oid : chr "001" "001" "001" "001" ...
#> $ aid : chr "0009775779" "0009783524" "0009783968" "0009785759" ...
#> $ url : chr "https://sports.news.naver.com/kbaseball/news/read.nhn?oid=001&aid=0009775779" "https://sports.news.naver.com/kbaseball/news/read.nhn?oid=001&aid=0009783524" "https://sports.news.naver.com/kbaseball/news/read.nhn?oid=001&aid=0009783968" "https://sports.news.naver.com/kbaseball/news/read.nhn?oid=001&aid=0009785759" ...
#> $ date : chr "20180102" "20180101" "20180101" "20180103" ...
#> $ title : chr "kt 류택현·신명철·고영민 1군 코치로…최영필 합류" "정운찬 KBO 총재 시대…한국 야구 어떻게 달라질까" "정운찬 KBO총재 신년사 \"야구가 삶에 '힐링'이 될 수 있도록\"" "프로야구 스프링캠프 'D-30'…2018년 우승 향한 '위대한 도전'" ...
#> $ press : chr "연합뉴스" "연합뉴스" "연합뉴스" "연합뉴스" ...
#> $ email : chr "abbie@yna.co.kr" "cany9900@yna.co.kr" "hosu1@yna.co.kr" "cany9900@yna.co.kr" ...
#> $ rname : chr "최인영" "장현구" "배진남" "임헌정" ...
#> $ reporter: chr "연합뉴스\n최인영" "연합뉴스\n장현구" "연합뉴스\n배진남" "연합뉴스\n임헌정" ...
#> $ angry : num 2 13 21 5 96 3 0 2 0 12 ...
#> $ fan : num 3 0 1 13 26 4 0 0 0 1 ...
#> $ like : num 10 3 15 52 112 12 0 6 1 3 ...
#> $ sad : num 0 0 0 3 4 1 0 0 0 0 ...
#> $ want : num 1 1 0 5 7 2 0 0 0 4 ...
#> $ resp : num 16 17 37 78 245 22 0 8 1 20 ...
#> $ comt : num 27 42 78 84 532 55 0 7 8 27 ...
#> $ name : chr NA NA NA NA ...
#> $ team : chr "KT" NA NA NA ...