안녕하세요 구도입니다.
자세한 설명은 각 코드별로 "#" 처리 후 설명 첨삭하였으니 이를 참고해주시면 감사하겠습니다.
코드만 보고 이해하지 말고 프로그램 설치 후 직접 해보시면서 공부하시면 더 쉽게 이해하실 수 있으십니다.
*프로그램은 'R x64 3.5.1' 을 사용하였습니다*
#matrix 함수
x <- matrix(1:6, nrow=2) # 1~6 사이의 정수를 행의 수가 2인 행렬로 만듬. 원소 값은 열 기준으로 할당
x
x <- matrix(1:6, nrow=2, byrow=TRUE) # 원소 값의 할당기준이 행 기준
x
x[1,3]
names <- list(c("1행", "2행"), c("1열", "2열", "3열"))
x <- matrix(1:6, nrow=2, byrow=TRUE, dimnames=names) # 행의크기는 2 & 원소 값의 할당기준이 행 기준
x
#벡터 결합에 의한 행렬 만들기
v1 <- c(1,2,3,4)
v2 <- c(5,6,7,8)
v3 <- c(9,10,11,12)
x <- cbind(v1,v2,v3)
x
#행과 열 이름 주기
rownames(x) <- c("1행", "2행", "3행", "4행")
x
colnames(x) <- c("1열", "2열", "3열")
x
x <- rbind(v1,v2,v3)
x
rownames(x) <- c("1행", "2행", "3행")
x
colnames(x) <- c("1열", "2열", "3열", "4열")
x
#data.frame
#두 명의 고객 정보에 대한 데이터 프레임 만들기
#case 1
x <- data.frame(성명=c("홍길동", "손오공"), 나이=c(20,30), 주소=c("서울", "부산")) #두 객체에 해당하는 데이터 프레임
x
#case 2
x <- data.frame("성명"=c("홍길동", "손오공"), "나이"=c(20,30), "주소"=c("서울", "부산"))
x
#열과 행 단위 추가
x <- cbind(x, 학과=c("e-비즈", "경영"))
x
x <- rbind(x, data.frame(성명="장발장", 나이=40, 주소="파리", 학과="행정"))
x
#요소 값 보기
x[3,2] # 3행 2열의 요소 값
x[3,] # 3행의 모든 값
x[,2] # 2열의 모든 값
x[-2,] #2행을 제외한 모든 값
x["성명"] #"성명"요소. x[1]과 동일한 값
x$성명 #case 1. "성명"요소의 값.
x[["성명"]] #case 2. "성명"요소의 값.
x[[1]] # 1열 요소의 값
x[[1]][2] # 1열 요소의 값에서 두 번째 값
x[1.2] <- 21 # 1행 2열의 값을 21로 수정
x
x[1,"나이"] <- 22 # 1행과 "나이" 열의 값을 22로 수정
x
오늘도 글 읽어주셔서 감사합니다.
'IT > 빅데이터분석및시각화' 카테고리의 다른 글
[빅데이터분석및시각화 05] R pie3D / barplot 함수 (0) | 2018.12.24 |
---|---|
[빅데이터분석및시각화 05] R 파이차트 그리기 (0) | 2018.12.20 |
[빅데이터분석및시각화 04] R 데이터 파일 읽기 (0) | 2018.12.18 |
[빅데이터분석및시각화 02] R 리스트(list) / 배열(array) 함수 (0) | 2018.12.12 |
[빅데이터분석및시각화 01] R 연산자와 벡터생성함수 (0) | 2018.12.10 |