R: Struggling to use regular expression to alter objects within a vector

Question

I have taken the top results from a larger database to make this simple and placed them in the vector below:

trialsid <- c(t16740429-1, t16740429-2, t16740