"R apply()"의 두 판 사이의 차이

3번째 줄: 3번째 줄:


<source lang='r' run>
<source lang='r' run>
options(echo=TRUE)
options(echo=T)
x <- matrix(1:12,3,4)
x <- matrix(1:12,3,4)
x
x
10번째 줄: 10번째 줄:
</source>
</source>


<source lang='r'>
<source lang='r' run>
options(echo=T)
mydf <- read.table( header=TRUE, stringsAsFactors=FALSE, text="
mydf <- read.table( header=TRUE, stringsAsFactors=FALSE, text="
English Math
English Math
19번째 줄: 20번째 줄:
")
")
mydf
mydf
##  English Math
## 1      30  60
## 2      40  70
## 3      50  80
## 4      60  90


rowMeans(mydf)
rowMeans(mydf)
## [1] 45 55 65 75
apply(mydf, 1, mean)
apply(mydf, 1, mean)
## [1] 45 55 65 75


colMeans(mydf)
colMeans(mydf)
## English    Math
##      45      75
sapply(mydf, mean)
sapply(mydf, mean)
## English    Math
##      45      75
apply(mydf, 2, mean)
apply(mydf, 2, mean)
## English    Math
##      45      75
</source>
</source>



2020년 2월 3일 (월) 02:33 판

1 개요

R apply()
options(echo=T)
x <- matrix(1:12,3,4)
x
apply(x,1,mean)
apply(x,2,mean)
options(echo=T)
mydf <- read.table( header=TRUE, stringsAsFactors=FALSE, text="
English Math
     30   60
     40   70
     50   80
     60   90
")
mydf

rowMeans(mydf)
apply(mydf, 1, mean)

colMeans(mydf)
sapply(mydf, mean)
apply(mydf, 2, mean)

2 같이 보기

3 참고

문서 댓글 ({{ doc_comments.length }})
{{ comment.name }} {{ comment.created | snstime }}