R: extraer el directorio de una ruta [duplicado]

Posible duplicado:
¿Cómo extraigo un archivo / folder_name solo de una ruta?

¿Puedo preguntarle cómo puedo obtener el último subdirectorio de una ruta? Por ejemplo, quiero obtener el subdirectorio "7" y el siguiente código falla:

Path <- "123\\456\\7"
Split <- strsplit(Path, "\\") # Fails because of 'Trailing backslash'
LastElement <- c[[1]][length(Split[[1]])]

Gracias de antemano

Respuestas a la pregunta(2)

Su respuesta a la pregunta