Sum function in a reactive environment R shiny

Question

The objective is to find the number of errors for each employee. I write the following code:

library(shiny)
library(tidyverse)
library(DT)
library(shinythemes