koos808

패키지 확인(check)하고 없으면 설치하기 requiredPackages = c('lubridate','data.table','dplyr','zoo','ranger','reshape2', 'jsonlite','cumstats','stringi') for(p in requiredPackages){ if(!require(p,character.only = TRUE)) install.packages(p) library(p,character.only = TRUE) }

현재 열고 있는 Scripts path 가져오기 dirname(rstudioapi::getActiveDocumentContext()$path) library(rstudioapi) ; dirname(getActiveDocumentContext()$path)

write.csv/fwrite 하기 전 폴더 없으면 생성하라는 코드 : 폴더 생성 code if(!dir.exists(file.path("my_path/folder"))) { dir.create(file.path("my_path/folder"),recursive = T, mode = "0777") }

리스트 병합 : merge all_model_merged = Reduce(function(...) merge(..., all.x = TRUE, by = c("MODEL","date")), SFA_list)

문자열 중 원하는 문자로 시작하는 데이터만 추출 filename[str_detect(filename,'^train')] => filename 벡터에서 train으로 시작하는 문자만 뽑겠다.

컴퓨터/서버에 설치되어 있는 R Packages Version 간편하게 확인하기 session

한줄이면 끝나는 여러 패키지 불러오기(library many packages) step1 - to_install

문자열 대소문자, 일괄 바꾸기 x