R Scripts/duplicate-shotings.R


1
2
3
4
5
6
7
8
9

vic_times = vic_times_lcc[vic_ids,]
rows=c()
for(i in 1:dim(vic_times[1])){
  row = as.numeric(vic_times[i,2:7])
  if(max(table(row))>1){
    rows = c(rows,i)
  }
}