R언어 입출력 (작업공간 설정, 파일 입출력, 키보드 입력, 콘솔출력)

아래 입출력 함수들 말고도, 여기에는 없지만 외부 패키지를 이용해서 엑셀, XML 등에서도 입출력이 가능하다.

1. 경로설정

• getwd() : 작업공간 확인
• setwd("절대경로") : 작업공간 설정

2. 입력

2-1. 키보드 입력

• scan() : 데이터를 직접 키보드로 입력할 수 있다. 입력을 중단하려면 빈칸을 두고 엔터를 치면 된다. 문자를 입력받으려면 인자에 what="" 를 넣어준다. 파일읽기에도 쓸수있는데, 첫번째 인자로 작업공간에 있는 파일명을 써주면 된다.

    > x <- scan()
    1: 10
    2: 30
    3: 99
    4: 
    Read 3 items
    > x
    [1] 10 30 99
  

• readline() : 다음 한줄을 입력으로 받는다.

    > x <- readline("설치하시겠습니까?")
    설치하시겠습니까? yes
    > x
    [1] "yes"
  

• edit(객체) : GUI적으로 데이터를 수정할 수 있다. 데이터프레임의 경우 엑셀시트와 유사한 윈도우창이 뜬다. 벡터의 경우 메모장같은 편집기가 뜬다.

  

    > x
    [1] 10 30 99
    > x <- edit(x)
    > x
    [1]  10  30 999
    > y <- data.frame()
    > y <- edit(y)
    > y
      var1 var2
    1   10   20
    2   50   99
  

2-2. 파일 입력

• readLines(파일 또는 객체) : 작업공간에 있는 파일또는 객체를 읽어서 배열로 만들어준다.
• read.table('파일명') : 작업공간에 있는 파일명을 읽어서 데이터 프레임으로 만들어준다. 인자로 header=T 를 주면 헤더부분이 있다는 걸 알려준다.
• read.csv('파일명', header=파일첫행을 헤더로 처리여부, stringAsFactors=문자열을 요인으로 저장여부) : 작업공간에 있는 csv 파일을 데이터프레임으로 읽어들인다.
• load(file='파일명') : 바이너리 파일을 읽어서 메모리에 로딩한다.

3. 출력

3-1. 콘솔 출력

• print(객체) : 객체를 콘솔에 출력한다.

• cat() : 문자열과 섞어서 여러 객체를 출력할 수 있다. 하지만 복잡한 데이터 구조는 출력할 수 없다. 인덱스를 이용해서 딱 지정해줘야하는 듯하다.

    > name <- "빨간색코딩"
    > age <- 25
    > cat("안녕? 나는", name, "이고, 만 나이는", age)
    안녕? 나는 빨간색코딩 이고, 만 나이는 25
  

3-2. 파일 출력

• writeLines()

• write.table(객체, '파일명') : 데이터프레임 객체를 파일로 저장해준다.

• write.csv(객체, file='파일명', row.names=행이름을 파일에 같이 저장할지 여부) : 데이터프레임을 csv 파일로 저장한다.

• save(저장할 객체명... , list=저장할 객체이름 벡터, file='파일명') : 메모리에 있는 객체를 바이너리 파일로 저장한다.

    > save(x, file='x.RData')
  
    # x.RData 를 편집기로 열어보면 아래처럼 나온다.
    1f8b 0800 0000 0000 0006 0b72 8930 e28a
    e062 6060 6062 6066 6164 6062 0632 5998
    8004 2303 0b03 2788 ae00 1202 4802 cc95
    a9c5 40ea 1f00 74d1 e66f 3b00 0000