How to output a results in datafram format with a wrong/correct answers by group in R

cat cat 0
Viewed 29

I have a data frame with two columns. First column contains categories such as "Syestem 1", "Syestem 2", and the second column has numbers that represent the correct/wrong answers. Correct means 1, and wrong means 0.

For example:

SYSTEM Q1
S1 0
S1 1
S2 1
S2 0
S2 1

How to write R code to produce this table below

System Coorect answers Wrong answers Total answrs
S1 1 1 2
S2 2 1 3

I used group by, filter, and if condition, but it seems not to be working. Please help me address this issue in R.

r
1 Answers

Using group_by and summarise you could do:

dat <- data.frame(
  SYSTEM = c("S1", "S1", "S2", "S2", "S2"),
  Q1 = c(0L, 1L, 1L, 0L, 1L)
)

library(dplyr)

dat |>
  group_by(SYSTEM) |>
  summarise(`Correct answers` = sum(Q1 == 1), `Wrong answers` = sum(Q1 == 0), `Total answers` = n())
#> # A tibble: 2 × 4
#>   SYSTEM `Correct answers` `Wrong answers` `Total answers`
#>   <chr>              <int>           <int>           <int>
#> 1 S1                     1               1               2
#> 2 S2                     2               1               3
user1kwS0
Related