install.packages("readr")
library(readr)
data01 <- read_csv("1.csv",locale=locale('ko',encoding='cp949'))
write.csv(data01, '1.csv', row.names=F, fileEncoding = 'cp949')
1, 2 -> 패키지 설치, 불러오기
3 -> CSV 불러오기.( '1.csv'는 csv명, 'ko'는 한국어, cp949로 인코딩)
4 -> 저장하기.(data01은 데이터 이름, row.names=F는 열에 번호 제거해줌(필요없으면 삭제하세요), cp949로 인코딩)