library(tidyverse)
library(rdracor)
library(plotly)Example of Quarto
Quarto
Quarto enables you to weave together content and executable code into a finished document. To learn more about Quarto see https://quarto.org.
Running Code
When you click the Render button a document will be generated that includes both content and the output of embedded code. You can embed code like this:
rus <- get_dracor("rus")
rus_gender <- rus %>%
mutate(female_ratio = numOfSpeakersFemale/(numOfSpeakersFemale + numOfSpeakersMale)) %>%
select(playName, firstAuthorName, yearNormalized, female_ratio, numOfSpeakers) %>%
ggplot(aes(x = yearNormalized, y = female_ratio)) +
geom_hline(yintercept = c(0, 1), colour = "grey55") +
geom_hline(yintercept = .5, linetype = "dotted", colour = "grey55") +
geom_point(alpha = .6, aes(size = numOfSpeakers)) +
labs(x = "Год", y = "Доля женщин в пьесе",
title = "Динамика гендерного баланса в пьесах русской классики") +
scale_y_continuous(labels = scales::percent) +
hrbrthemes::theme_ipsum()
ggplotly(rus_gender)You can add options to executable code like this
2 * 2[1] 4
The echo: false option disables the printing of code (only output is displayed).
Список:
раз
два
три
Новый абзац