_대문 | 방명록 | 최근글 | 홈피소개 | 주인놈 |
FrontPage › dplyr
|
|
[edit]
1 inner join #> data1 id mid 1 23 43 2 4 56 3 78 29 4 54 99 > data2 id final 1 4 77 2 23 2 3 54 19 4 70 31 > dplyr::inner_join(data1, data2, by="id") id mid final 1 23 43 2 2 4 56 77 3 54 99 19 [edit]
3 기본 예제 ##install.packages("dplyr") library("dplyr") df <- tbl_df(iris) df class(df) #필터 filter(df, Species == "setosa", Sepal.Length >= 4) filter(df, Species == "setosa" | Species == "versicolor") #정렬 arrange(df, Sepal.Length, desc(Sepal.Width)) #특정 컬럼만 조회 select(df, Sepal.Length, Species) select(df, -Species) select(df, Sepal.Width:Petal.Width) select(df, -(Sepal.Width:Petal.Width)) #열추가 mutate(df, compute = Sepal.Length * Sepal.Width, total.Sepal.Length = sum(Sepal.Length)) transform(df, compute = Sepal.Length * Sepal.Width, total.Sepal.Length = sum(Sepal.Length)) #집계 summarise(df, total=sum(Sepal.Length)) summarise(group_by(df, Species), total=sum(Sepal.Length)) #chain 기능 group_by(df, Species) %>% filter(Sepal.Length >= 5) %>% summarise(total=sum(Sepal.Length))
|
진실한 의식을 갖춘 영혼은 자신보다 훨씬 뛰어난 무엇을 발견할 줄 압니다. 칭찬이란 이해입니다. 근본적으로 누구나 위대하고 훌륭합니다. 누군가를 아무리 칭찬한다 해도 지나치지 않습니다. 타인 속에 있는 위대함과 아름다움을 발견하는 눈을 기르십시오. 《보여줄 수 있는 사랑은 아주 작습니다》 (칼릴지브란) |