R 챕터4 연습문제

첨부파일 YSG R ch4 Ex.R 파일 다운로드 # # 1. 다음의 벡터 EMP는 ‘입사연도이름급여’순으로 사원의 정보가 기록된 데이터이다.

벡터 # EMP를 이용하여 다음과 같은 출력 결과가 나타나도록 함수를 정의하시오. # EMP <- c(“2014홍길동220”, “2002이순신300”, “2010유관순260”) # stringr 패키지: str_extract(), str_replace()함수 # 숫자변한함수: as.numeric()함수 # 한글 문자 인식 정규표현식 패턴: [가-힣] emp_pay<-function(x) { library(stringr) pay <- numeric() name <- character() idx <- 1 for(n in x) { name[idx] <- str_extract(n, '[가-힣]{3}') pay1 <- str_extract(n, '[가-힣]{3}[0-9]{3}') pay1 <- str_replace(pay1, '[가-힣]{3}', ''...