Conditional mean statement r

dataset <- data.frame(continuous = rnorm(n = 10),
                      binary = sample(x = 0:1, size = 10, replace = TRUE))

dataset
#>     continuous binary
#> 1  -0.01978487      0
#> 2  -1.14185292      0
#> 3   0.20931787      0
#> 4  -0.63720730      0
#> 5   1.07750407      1
#> 6  -1.59274225      0
#> 7  -0.48722740      1
#> 8  -0.64151044      0
#> 9  -0.64111755      0
#> 10  0.99598287      1

# your method
mean(dataset[dataset$binary == 1, 1])
#> [1] 0.5287532
mean(dataset[dataset$binary == 0, 1])
#> [1] -0.6378425

# using by
by(data = dataset$continuous, INDICES = dataset$binary, FUN = mean)
#> dataset$binary: 0
#> [1] -0.6378425
#> -------------------------------------------------------- 
#> dataset$binary: 1
#> [1] 0.5287532

Source: community.rstudio.com

Similar codes

-2 votes129 views2 answers
What percentage of the row will the following column occupy on desktop devices: <div class="col-xs-3 col-sm-4 col-md-6 col-lg-12"></div>
R
1 vote129 views1 answer
How to combine all columns into one column in r
R
0 vote165 views1 answer
Read.table tab separator
R
1 vote122 views1 answer
Show factor levels in r
R
0 vote142 views1 answer
How to remove all attributes from a variables in r
R
1 vote142 views1 answer
R dataframe filter endswith
R
0 vote175 views1 answer
Open xlsx with r
R
1 vote133 views1 answer
Convert datetime from string r
R
0 vote122 views1 answer
Imputation in r
R
0 vote141 views1 answer
Combine ro columns in r
R