Fusionar múltiples espacios en un solo espacio; eliminar espacios finales / iniciales

Quiero fusionar múltiples espacios en un solo espacio (el espacio también puede ser tabulador) y eliminar espacios finales / iniciales.

Por ejemplo...

string <- "Hi        buddy        what's up    Bro" 

a

"Hi buddy what's up bro"

Revisé la solución dada enRegex para reemplazar múltiples espacios con un solo espacio. Tenga en cuenta que no ponga \ t o \ n como espacio exacto dentro de la cuerda del juguete y alimente eso como patrón engsub. Quiero eso en R.

Tenga en cuenta que no puedo poner espacio múltiple en la cuerda del juguete. Gracias