hdsceokevin / koreanbaseballnews

To provide the Korean Baseball news inforamtion

KoreanBaseballNews

The goal of KoreanBaseballNews is to provide the Korean Baseball news information.

Installation

You can install the devloping version of KoreanBaseballNews from github with:

# install.packages('remotes')
remotes::install_github("MrKevinNa/KoreanBaseballNews")

Example

# 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  "[email protected]" "[email protected]" "[email protected]" "[email protected]" ...
#>  $ 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 ...