This commit is contained in:
2025-12-14 16:46:17 +08:00
parent e3780cb4d6
commit c48f783a14
17 changed files with 194 additions and 296 deletions
+7 -7
View File
@@ -1,8 +1,10 @@
---
subtitle: "Report"
subtitle: "Reports"
author: ""
execute:
freeze: false
---
```{r}
#| output: asis
data.frame(fd = dir(".", pattern = "\\d{4}[-_]")) |>
@@ -26,11 +28,9 @@ data.frame(fd = dir(".", pattern = "\\d{4}[-_]")) |>
!grepl("qmd$", .x),
"",
paste0(
"<iframe title='",
gsub("^.*[_-]([^\\/]*)\\/.*$", "\\1", .x),
"' width=800 height=600 src = '",
gsub("qmd$", "html", .x),
"'></iframe>\n\n"
"{{< pdf ",
gsub("qmd$", "pdf", .x),
" width=400 height=510 button=\"Download\" >}}\n\n"
)
)
)