Count Total time from occurences of event

As @mishabalyasin notes, your question is currently not in a reproducible format (and then gives some solid advice, :+1:).

Just to give you more detail re. reproducible examples:

It will help us help you if you can turn this into a self-contained reprex (short for minimal reproducible example).

Right now the best way to install reprex is:

# install.packages("devtools")
devtools::install_github("tidyverse/reprex")

If you've never heard of a reprex before, you might want to start by reading the tidyverse.org help page. The reprex dos and don'ts are also useful.

If you run into problems with access to your clipboard, you can specify an outfile for the reprex, and then copy and paste the contents into the forum.

reprex::reprex(input = "fruits_stringdist.R", outfile = "fruits_stringdist.md")

For pointers specific to the community site, check out the reprex FAQ, linked to below.