And here is a more detailed description of the issue and the proposed fix:

The underlying issue is that ggplotly() creates a strip text for facet rows/cols even if these are missing, e.g. in case of facet_wrap a rows text is created in

This does not result in an issue as long as multi_line=TRUE (which is the default for the label_xxx family of functions) as in this case the label_xxx family of functions will return an empty list which gets "coerced" to an empty string. However, with multi_line=FALSE the returned list is wrapped in expression and as a result gets coerced to a string "expression(list())" giving rise to the issue reported in #2341 .

In case of facet_wrap this can be fixed by creating a rows text only if inherits(plot$facet, "FacetGrid") is TRUE. However, the same issue arises with facet_grid when the rows/cols are missing:

library(plotly, warn=FALSE)
#> Loading required package: ggplot2
g <- ggplot(mtcars, aes(mpg, wt)) +
 geom_point() +
 facet_grid(vs + am ~ .,
 labeller = function(x) label_both(x, multi_line = FALSE)
 )
ggplotly()

^{Created on 2024年08月05日 with reprex v2.1.0}

To account for this case the PR adds an if to check that there is anything to label.

Thank you for the detailed explanation and contribution! This is looking very close to mergeable, I just had a couple stylistic suggestions

Looking forward to this getting fixed, currently experiencing the issue with "expression(list())"

@trekonom In addition to the bug you've fixed, there's also an issue where strip.position is not working in plotly.
Considering this issue has been around for awhile now, as seen in this issue:
#2103, and you seem to be the most recent / successful at fixing some of these facet issues, do you think you could take a crack at it?

@kwilson62 Will have a look if I find the time. But first let's finish this PR. (: