위키
포럼
도구
바뀐글
랜덤

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

 
(사용자 2명의 중간 판 17개는 보이지 않습니다)
1번째 줄: 1번째 줄:
==개요==
==개요==
;R table()
;R table()
{{소스헤더|벡터}}
 
<source lang='r'>
==벡터==
<syntaxhighlight lang='r' run>
x <- c(3,1,4,1,5,2,6,5)
x <- c(3,1,4,1,5,2,6,5)
table(x)
table(x)
## x
</syntaxhighlight>
## 1 2 3 4 5 6
<syntaxhighlight lang='r' run>
## 2 1 1 1 2 1
</source>
<source lang='r'>
table( c(3,1,4,1,5,2,6,5) )
table( c(3,1,4,1,5,2,6,5) )
##
</syntaxhighlight>
## 1 2 3 4 5 6
<syntaxhighlight lang='r' run>
## 2 1 1 1 2 1
table( c("a","b","b","c","c","c","d") )
</source>
</syntaxhighlight>
{{소스헤더|데이터프레임$컬럼}}
 
<source lang='r'>
==데이터프레임 컬럼==
<syntaxhighlight lang='r' notebook>
table(iris$Species)
</syntaxhighlight>
<syntaxhighlight lang='r' notebook>
v <- c(1, 'hello', 1, 'world', 'hello')
v <- c(1, 'hello', 1, 'world', 'hello')
table(v)
table(v)
## v
</syntaxhighlight>
##    1 hello world
<syntaxhighlight lang='r' notebook>
##    2    2    1
summary(warpbreaks)
</source>
</syntaxhighlight>
<source lang='r'>
<syntaxhighlight lang='r' notebook>
table(warpbreaks$wool,warpbreaks$tension)
</syntaxhighlight>
<syntaxhighlight lang='r' notebook>
scores <- read.table( header=TRUE, stringsAsFactors=FALSE, text="
scores <- read.table( header=TRUE, stringsAsFactors=FALSE, text="
Class  Name variable value
Class  Name variable value
33번째 줄: 38번째 줄:
     B  Dave    Math    90
     B  Dave    Math    90
")
")
scores
##  Class  Name variable value
## 1    A Alice  English    90
## 2    A  Bob  English    80
## 3    B  Dave  English    60
## 4    A Alice    Math    60
## 5    B Carol    Math    80
## 6    B  Dave    Math    90
table( scores$variable )
table( scores$variable )
## English    Math
</syntaxhighlight>
##      3      3
<syntaxhighlight lang='r' notebook>
table( scores$value )
</syntaxhighlight>


table( scores$value )
==table()과 ddply()==
## 60 80 90
<syntaxhighlight lang='r' notebook=3>
##  2  2  2
library(plyr)
</source>
table(baseball[1:100,]$year)
</syntaxhighlight>
<syntaxhighlight lang='r' notebook=3>
ddply(baseball[1:100,], ~year, nrow)
</syntaxhighlight>
<syntaxhighlight lang='r' notebook=3>
ddply(baseball[1:100,], 'year', nrow)
</syntaxhighlight>
<syntaxhighlight lang='r' notebook=3>
ddply(baseball[1:100,], .(year), nrow)
</syntaxhighlight>


==같이 보기==
==같이 보기==
{{z컬럼3|
* [[R xtabs()]]
* [[R ddply()]]
* [[R factor()]]
* [[R ftable()]]
* [[R unique()]]
* [[R is.table()]]
* [[R as.table()]]
* [[R tabulate()]]
* [[R tabulate()]]
* [[R ftable()]]
* [[R summary()]]
* [[R factor()]]
* [[R xtabs()]]
* [[R margin.table()]]
* [[R prop.table()]]
* [[R prop.table()]]
* [[R addmargins()]]
* [[R addmargins()]]
* [[R summary()]]
* [[R margin.table()]]
* [[R ddply()]]
* [[R 분할표]]
* [[R 그룹별 건수 구하기]]
* [[함수 array_count_values()]]
* [[함수 array_count_values()]]
}}


==참고==
==참고==

2021년 10월 26일 (화) 19:38 기준 최신판

1 개요[ | ]

R table()

2 벡터[ | ]

x <- c(3,1,4,1,5,2,6,5)
table(x)

table( c(3,1,4,1,5,2,6,5) )

table( c("a","b","b","c","c","c","d") )

3 데이터프레임 컬럼[ | ]

table(iris$Species)

v <- c(1, 'hello', 1, 'world', 'hello')
table(v)

summary(warpbreaks)

table(warpbreaks$wool,warpbreaks$tension)

scores <- read.table( header=TRUE, stringsAsFactors=FALSE, text="
Class  Name variable value
    A Alice  English    90
    A   Bob  English    80
    B  Dave  English    60
    A Alice     Math    60
    B Carol     Math    80
    B  Dave     Math    90
")
table( scores$variable )

table( scores$value )

4 table()과 ddply()[ | ]

library(plyr)
table(baseball[1:100,]$year)

ddply(baseball[1:100,], ~year, nrow)

ddply(baseball[1:100,], 'year', nrow)

ddply(baseball[1:100,], .(year), nrow)

5 같이 보기[ | ]

6 참고[ | ]

원본 주소 "https://zetawiki.com/w/index.php?title=R_table()&oldid=790906"
문서 댓글 ({{ doc_comments.length }})
{{ comment.name }} {{ comment.created | snstime }}