#열 추가

> x<-cbind(x, 학과=c("경영", "영"))

> x<-cbind(x, 학과=c("경영", "영"))

> x<-cbind(x, 학과=c("경영", "영어"))

> x

    성명 나이 주소 학과 학과 학과

1 홍길동   20 서울 경영 경영 경영

2   둘리   30 대전   영   영 영어


#행 추가

> x<-rbind(x, data.frame(성명="장발장", 나이=40, 주소="파리", 학과="전산학"))

> x

    성명 나이 주소   학과

1 홍길동   20 서울   경영

2   둘리   30 대전   영어

3 장발장   40 파리 전산학


#열 삭제

> x <- x[,-c(4, 5)]

> x

    성명 나이 주소 학과

1 홍길동   20 서울 경영

2   둘리   30 대전 영어

+ Recent posts