Say a have an `igraph` object:

```
library(igraph)
library(igraphdata)
data(karate)

get_diameter(karate)
+ 6/34 vertices, named, from 4b458a1:
[1] Actor 16 John A   Actor 20 Mr Hi    Actor 6  Actor 17
farthest_vertices(karate)
$vertices
+ 2/34 vertices, named, from 4b458a1:
[1] Actor 16 Actor 17

$distance
[1] 13

```

I have easily found the vertices that are the farthest apart from each other. How do I extract the edges sequence that connects the vertices **Actor 16** to **Actor 17**?