R4web

Course

Глава 1

Звичайний текст глави

Розділ 1

Звичайний текст розділу

Розділ 1.1

Звичайний текст підрозділу

x^2 + y^2 = z^2

x² + y² = z²

x₂ + y₂ = z₂

Google

Списки

1. Перший
   • підсписок
2. Другий
3. Третій

• Перший
• Другий
  • підсписок
• Третій

1. Список 1

текст

2. Список 2

Таблиці

Заголовок 1	Заголовок 2	Заголовок 3
Клітина 1	Клітина 2	Клітина 3
Клітина 4	Клітина 5	Клітина 6

К-ть змінних	Краща підмножина	Прямий покроковий відбір
1	rating	rating
2	rating, income	rating, income
3	rating, income, student	rating, income, student
4	cards, income	rating, income
	student, limit	student, limit

Формули

Формула у тексті \(x^2 + y^2 = z^2\)

\[e = mc^2 \tag{1}\]

Наскрізні посилання

Рівняння 1

Діаграми

flowchart LR
  A[Квадратна форма] --> B(Кругла форма)
  B --> C{Рішення}
  C --> D[Результат один]
  C --> E[Результат два]

flowchart TD
  A[Квадратна форма] --> B(Кругла форма)
  B --> C{Рішення}
  C --> D[Результат один]
  C --> E[Результат два]

Рисунки

Виноски

Примітка

Зауважте, що існує п’ять типів виносок, зокрема: note, tip, warning, caution та important.

Підказка

Приклад виноски з текстом

Розгорніть, щоб дізнатися про згортання

Це приклад «згорнутої» виноски з попередженням. Використайте collapse="true" щоб згорнути її за замовчуванням та collapse="false" щоб виноска могла бути згорнута, але була розгорнути за замовчуванням.

Використання коду

1 + 1

[1] 2

library(tidyverse)
library(kableExtra)
library(DT)

carat	cut	color	clarity	depth	table	price	x	y	z
0.23	Ideal	E	SI2	61.5	55	326	3.95	3.98	2.43
0.21	Premium	E	SI1	59.8	61	326	3.89	3.84	2.31
0.23	Good	E	VS1	56.9	65	327	4.05	4.07	2.31
0.29	Premium	I	VS2	62.4	58	334	4.20	4.23	2.63
0.31	Good	J	SI2	63.3	58	335	4.34	4.35	2.75
0.24	Very Good	J	VVS2	62.8	57	336	3.94	3.96	2.48

radius <- 7
s <- pi * radius^2
s

[1] 153.938

Якщо радіус кола дорівнює 7, то площа кола дорівнює 153.94.

mtcars[1:8, 1:8] %>%
  kbl() %>%
  kable_paper(full_width = F) %>%
  column_spec(2, color = spec_color(mtcars$mpg[1:8]),
              link = "https://haozhu233.github.io/kableExtra/") %>%
  column_spec(6, color = "white",
              background = spec_color(mtcars$drat[1:8], end = 0.7),
              popover = paste("am:", mtcars$am[1:8]))

	mpg	cyl	disp	hp	drat	wt	qsec	vs
Mazda RX4	21.0	6	160.0	110	3.90	2.620	16.46	0
Mazda RX4 Wag	21.0	6	160.0	110	3.90	2.875	17.02	0
Datsun 710	22.8	4	108.0	93	3.85	2.320	18.61	1
Hornet 4 Drive	21.4	6	258.0	110	3.08	3.215	19.44	1
Hornet Sportabout	18.7	8	360.0	175	3.15	3.440	17.02	0
Valiant	18.1	6	225.0	105	2.76	3.460	20.22	1
Duster 360	14.3	8	360.0	245	3.21	3.570	15.84	0
Merc 240D	24.4	4	146.7	62	3.69	3.190	20.00	1

diamonds %>% 
  datatable()