# file I/O : 파일 입출력
no <- c(1,2,3,4)
name <- c("aa","bb","cc","dd")
price <- c(500,1000,300,700)
qty <- c(5,2,7,9)
data <- data.frame(No=no, Name=name, Price=price, QTY=qty)
data
ls()
#89
save(no,name,data,file="파일경로/test.dat") # 주소 설정할 때 \ 표시 아니고 슬래시 / 사용, dat 파일 형태로 저장
#삭제 함수
rm(data,no,name)
ls()
#저장된 data 불러오기
load("파일경로/test.dat")
ls()
a <- file("test.txt",open="w", encoding = "UTF-8")
cat("임시로 만든다.\n",file= a)
cat("동해물과 백두산이 마르고 닳도록\n", file=a)
cat("하느님이 보우하사 우리나라만세\n", file=a)
cat("무궁화 삼천리 화려강산\n", file=a)
cat("대한사람 대한으로 길이보전하세\n", file=a)
close(a)
s <- readLines("test.txt", encoding = "UTF-8")
#csv() : , 컴마로 구분되어 있는 자료형 / false 면 header 생성,
x <- read.csv("파일경로/a.csv")
x
#범주형 아닌데 범주로 받아오면 안될 때 사용 -> x 는 factor로 가져오고 , y는 chr로 가져옴 isas도 대체 가능
y <- read.csv("파일 경로/a.csv",stringsAsFactors = F) # 문자를 포함하고 있는 것을 factor로 인식하지 마세요
yx
#header : 머리글 가지고 있냐 아니냐 기본 T 임 -> 열머리글 있다는 소리, 그렇기 때문에 열 머리글 없으면 첫번째 행의 값을 열머리로 정함
z <- read.csv("파일경로/b.csv",stringsAsFactors = F, header = F)
z
names(z) <- c("id", "name", "score") # 이름 부여한다. z의 열머리글에
z
data
help("read.csv")