Rmd Qmd notebooks: inline preview HTML

[vincentarelbundock]

No description provided.

[vincentarelbundock]

posit.R with is_posit_script() and is_posit_notebook(), returning FALSE whenever rstudioapi is unavailable.

Notebook inline:

    if (isTRUE(check_dependency("rstudioapi"))) {
      tinytable_print_rstudio <- getOption("tinytable_print_rstudio", default = "inline")
      assert_choice(tinytable_print_rstudio, c("inline", "viewer"))
      if (tinytable_print_rstudio == "inline") {
        tab = sprintf("\n```{=html}\n%s\n```\n`", tab)
        print(knitr::asis_output(tab))
        return(invisible(x))
      }
    }

[vincentarelbundock]

inline display does not appear to be available in Positron, and we need a hack to detect Rstudio, but this seems to work. rstudio/rstudioapi#310

c24a7f7