EDA

R 연동하기 Rserve Package 설치 준비 (이미 하신분은 생략 가능) xcode command line tools 설치 ($ xcode-select –install) clang, gfortran 설치 (https://cran.r-project.org/bin/macosx/tools/ ) (optional) gettext 설치 ($ brew install gettext OR $ brew reinstall gettext) (optional) 아래 명령어 실행 cd /usr/binsudo ln -fsclang llvm-gcc-4.2sudo ln -fsclang++ llvm-g++-4.2 (optional) XQuartz 설치 (https://xquartz.org

getTable <- function(url=url){ tem <- read_html(url,encoding = "UTF-8") dat <- tem %>% html_nodes(".bus_board_txt1") %>% html_text tit <- tem %>% html_nodes('.bus_board_tit1') %>% html_text tit <- stri_trim_both(tit) tit <- tit[1:(which(nchar(tit)==0)[2]-1)] tit <- gsub(" ","",tit) tit <- gsub("[u00A0]","",tit) year <- tit[-1] dat<-data.fram

############### install.packages('quantmod')# install.packages('PerformanceAnalytics')# install.packages('e1071')library(PerformanceAnalytics);library(quantmod);library(e1071)#KOSPI 지수 데이터를 가져옵니다.kospi<-getSymbols('005930.KS', src='yahoo', auto.assign = FALSE) # KOSPI: symbol = '^KS11' #kospi<-getSymbols('KRX:KOSPI', src='google', auto.assign = F, return.class='data.frame') # getSymbols('0

아래 코드는 https://github.com/mrchypark/sejongFinData 에서 발췌하였습니다. 세종 기업 데이터에서 재무제표를 웹에 게시하고 있습니다. 여기서 삼성 전자를 검색해보니 1997년 데이터부터 제공을 하고 있더라고요. 일단, 기업의 종목번호 정보를 파악해야 합니다. http://www.sejongdata.com/query/value.html 여기에 보면 기업명과 종목번호정보 및 시가총액 등의 정보를 파악할 수 있습니다. 아래는 이 테이블을 R로 읽어오기 위한 코드입니다. if (!require("rvest")) install.packages("rvest")if (!require("stringi")) install.packages("stringi")install.packa