我想動態建立 html 並渲染該 html
在四開本中。
實際應用涉及插入一個iFrame，
但為了簡單起見，我們只建立一個 <img> 標籤。
這是我的 .qmd 程式碼：
```{r}
source("awash-functions.r")
```
How do you inject html text produced in an r function into a **quarto** document?
In R markdown, I had the function `sprintf` a string. That doesn't seem to work here!
Here is `awash-functions.r`:
imageLink <- function(iUrl, iText) {
sprintf("<img src = '%s' width='24'> %s", iUrl, iText)
}
let's call the function and see what appears:
```{r echo=FALSE}
imageLink("https://www.united.com/8cd8323f017505df6908afc0b72b4925.svg", "united logo")
```
and now, here's what it's supposed to look like:
<img src = 'https://www.united.com/8cd8323f017505df6908afc0b72b4925.svg'> united logo
它渲染了，而且該函數顯然被呼叫了， 但它顯示的是 html 程式碼，而不是圖像：
我知道這很簡單，但我找不到。非常感謝！
有兩點要注意：
首先，Quarto 預設將任何程式碼區塊輸出包裝在
中tag. To get the output asis you need to use the chunk optionresults: asis.Secondly,
sprintf(or evenprint) returns output enclosed within quotes. So after usingresults: asis, you would get the html tags but would also get the quotes. So you need to wrap thesprintfwithcatto get intended results.