R table de markdown avec une légende

j'essaye de créer une table en dehors d'un morceau de code en utilisant la notation normale markdown et d'y ajouter une légende. Voici un exemple de fichier (tiré de ici:

---
output: pdf_document
---

| First Header  | Second Header | Third Header         |
| :------------ | :-----------: | -------------------: |
| First row     | Data          | Very long data entry |
| Second row    | **Cell**      | *Cell*               |
| Third row     | Cell that spans across two columns  ||
[Table caption, works as a reference][section-mmd-tables-table1]

cela produit malheureusement une corde plutôt triste:

<!-La suppression de la ligne de légende entre crochets produit la table fine (mais sans la légende, évidemment):

cela peut être réalisé si je fais mon données dans une donnée réelle.cadre et utilisé kable comme le montre ici mais je cherche à éviter d'avoir à faire ça.