R - dplyr stylized 인쇄 또는 붙여 넣기

Question

"양식화 된"dplyr 결과가 가능한지 궁금합니다.

나는 내가이 dplyr 코드에서와 같은 결과를 인쇄 할 수 있는지 궁금 할 때마다 2 예

library(dplyr) 

for(i in 1:10){ 
    m = mean(mtcars[sample(1:nrow(mtcars), size = 2), 'cyl'] ) 
    print(paste('Mean Boot', i, ':', m)) 
} 

[1] "Mean Boot 1 : 8" 
[1] "Mean Boot 2 : 7" 
[1] "Mean Boot 3 : 8" 
[1] "Mean Boot 4 : 4" 
... 

을 선택, 부트 스트랩이 과정 10 시간을 의미 실행하고 상상한다.

for(i in 1:10){ 
    mtcars %>% sample_n(2) %>% 
    summarise(m = mean(cyl)) %>% 
    print(paste('Mean Boot', i, ':', m)) 
} 

모든 단서와 같은 뭔가? `요약에 대한

Answer 1

우리는

for(i in 1:10){ 
    mtcars %>% 
    sample_n(2) %>% 
    summarise(m= paste('Mean Boot', i, ':', mean(cyl))) %>% 
    .$m %>% 
    print 
} 
#[1] "Mean Boot 1 : 6" 
#[1] "Mean Boot 2 : 5" 
#[1] "Mean Boot 3 : 7" 
#[1] "Mean Boot 4 : 6" 
#[1] "Mean Boot 5 : 8" 
#[1] "Mean Boot 6 : 6" 
#[1] "Mean Boot 7 : 4" 
#[1] "Mean Boot 8 : 7" 
#[1] "Mean Boot 9 : 8" 
#[1] "Mean Boot 10 : 6"