h-elena

> getCircleArea <- function(r){

+   area=3.14*r^2

+   return(area) #반환값이 없을 경우 생략 가능

+ }

> getCircleArea(3)

[1] 28.26

#열 추가

> 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 대전 영어

> y<-list("이름"="홍길동", "학번"=123456, "나이"=20)

> y

$이름

[1] "홍길동"

$학번

[1] 123456

$나이

[1] 20

> y["이름"]

$이름

[1] "홍길동"

> y[["이름"]]

[1] "홍길동"

> y$이름

[1] "홍길동"

> x<-list("홍길동", 232133, c(1, 2, 3), "232")

> x

[[1]]

[1] "홍길동"

[[2]]

[1] 232133

[[3]]

[1] 1 2 3

[[4]]

[1] "232"

> y<-list("이름"="홍길동", "학번"=123456, "나이"=20)

> y

$이름

[1] "홍길동"

$학번

[1] 123456

$나이

[1] 20

>names<-list(c("row1", "row2"), c("col1", "col2", "col3"))

>x<-array(c(1, 2, 3, 4, 5, 6),dim=c(2,3),dimnames = names)

> x

     col1 col2 col3

row1    1    3    5

row2    2    4    6

* , 와 " 을 유의하자!

배열보다 고차원 개념으로 다차원 행렬을 만들 수 있음

> x<-array(1:6, dim=c(2,3))

> x

     [,1] [,2] [,3]

[1,]    1    3    5

[2,]    2    4    6

> x <- array(1:24, dim=c(2, 3,4))

> x

, , 1

     [,1] [,2] [,3]

[1,]    1    3    5

[2,]    2    4    6

, , 2

     [,1] [,2] [,3]

[1,]    7    9   11

[2,]    8   10   12

, , 3

     [,1] [,2] [,3]

[1,]   13   15   17

[2,]   14   16   18

, , 4

     [,1] [,2] [,3]

[1,]   19   21   23

[2,]   20   22   24

행렬 이름 넣기

rownames(x) <- c("a", "b", "c")

colnames(x) <- c("!", "@", "#")

dimnames(x)=list(c("바", "꾸", "기"), c("리", "스", "트"))

행과 열을 반대로 만들기

(=원소 값의 할당 순서는 행 기준이다.)

matrix(c(1:9), nrow=3, byrow=TRUE)

> matrix(c(1:9), nrow=3)

     [,1] [,2] [,3]

[1,]    1    4    7

[2,]    2    5    8

[3,]    3    6    9

#변수가 생성되지 않고, 이름만 가짐(결측치 or 정의되지 않은 값)

> x <- NULL

> is.null(x)

[1] TRUE

#NA 결측치 (ex 설문지 무응답) - Not available

#무한대(불능)

> x <- 10/0

> x

[1] Inf

#숫자가 아님(부정) - Not a Number

> x <- 0/0

> x

[1] NaN