polarolouis/synapses-carousel
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Gestion petit MIA-PS
Some checks failed
ci/woodpecker/push/woodpecker Pipeline failed
Details

Browse source
This commit is contained in:
Louis 2025-07-08 14:48:27 +02:00
parent 79f3c39901
commit 69140abcf1
1 changed files with 10 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
index.qmd
View file

@ -37,9 +37,10 @@ quotes_list <- readLines("quotes.txt")
for (img in img_files) { for (img in img_files) {
for (back in back_files) { for (back in back_files) {
for (quote in quotes_list) { for (quote in quotes_list) {
cat("# ", quote, "{background-image='",back,"'}", "\n", cat("# ", quote, " {background-image='", back, "' background-repeat='", ifelse(back == "background/miaps.png", "repeat", "no-repeat"), "' background-size='", ifelse(back == "background/miaps.png", "400px", "100%"), "'}", "\n",
glue::glue("![]({img})"), "{fig-align='center' .r-stretch}\n\n", glue::glue("![]({img})"), "{fig-align='center' .r-stretch}\n\n",
sep = "") sep = ""
)
} }
} }
} }