Wide table runs into caption contingent on label prefix when using tinytable

[fkohrt]

If I create a table using tinytable that is very wide, the caption is at risk of being struck through:

---
title: "Test Document"
author:
  - name: Test Author
    affiliations:
      city: Los Angeles
      region: CA
lang: en
format:
  apaquarto-pdf:
    documentmode: man
keep-tex: true
---

```{r}
#| label: "tbl-descriptive-statistics"
#| echo: false
#| tbl-cap: "Summary Statistics"

# Install dev version of `tinytable`
# remotes::install_github("vincentarelbundock/tinytable")

library(tinytable)
tt(head(iris))
```

Curiously, removing the tbl- prefix from the label resolves the issue:

Initially raised at vincentarelbundock/tinytable#327, where the following was also noted:

And for reference, here's the LaTeX that this produces. Note that the only code that tinytable generates is the \begin{tblr} block, and that the issue stems for a conflict between a vanilla tblr environment and the table and caption commands inserted by Quarto and/or apaquarto.

\begin{table}

{\caption{{Summary Statistics}{\label{tbl-descriptive-statistics}}}
\vspace{-20pt}}

\centering
\begin{tblr}[         %% tabularray outer open
]                     %% tabularray outer close
{                     %% tabularray inner open
colspec={Q[]Q[]Q[]Q[]Q[]},
}                     %% tabularray inner close
\toprule
Sepal.Length & Sepal.Width & Petal.Length & Petal.Width & Species \\ \midrule %% > TinyTableHeader
5.1 & 3.5 & 1.4 & 0.2 & setosa \\
4.9 & 3.0 & 1.4 & 0.2 & setosa \\
4.7 & 3.2 & 1.3 & 0.2 & setosa \\
4.6 & 3.1 & 1.5 & 0.2 & setosa \\
5.0 & 3.6 & 1.4 & 0.2 & setosa \\
5.4 & 3.9 & 1.7 & 0.4 & setosa \\
\bottomrule
\end{tblr}

\end{table}

[wjschne]

This was caused by a hacky solution of mine to a problem with longtable (the default environment for quarto tables). The longtable environment does not play nicely with the apa7 package that apaquarto depends on to make .pdf via LaTeX. I am not sure what to do about it, but I have inserted a possible fix. By default, apaquarto removes 20pt of extra space (i.e., \vspace{-20pt}) between captions and tables when in manuscript mode. Using tinytable, longtable is not used, and space should not be subtracted. If I can find a way to take care of the problem automatically, I will do it. In the meantime, you can now add after-caption-space: 0pt as a code-chunk option. For example:

---
title: "Test Document"
author:
  - name: Test Author
    affiliations:
      city: Los Angeles
      region: CA
lang: en
format:
  apaquarto-pdf:
    documentmode: man
keep-tex: true
---

```{r}
#| label: "tbl-descriptive-statistics"
#| echo: false
#| tbl-cap: "Summary Statistics"
#| after-caption-space: 0pt

library(tinytable)
tt(head(iris))
```