Generate table for total number of SV events per sample
So you have data in "long format" and want to convert it to "wide format". You can use spread() from tidyr for that:

require(tidyr)
# Assuming your input is called `foo`
spread(foo, Sample, value)