Просмотр кода страницы R-скрипт Петрова Ульяна Павловна

Страница создана Петровой Ульяной Павловной, ИНФА-221.

== Описание датасета ==

Датасет [[Books (dataset)]] содержит метаданные топ-1000 самых скачиваемых книг Project Gutenberg:
библиография (автор, название, год, жанровые теги subjects), метрики 
читаемости и тональности. Файл classics.csv.

== Код R-скрипта ==
<syntaxhighlight lang="R" line>
library(readr)
library(dplyr)
library(tidytext)

# 1. Загрузка
classics <- read_csv("classics.csv")

# 2. Структура
glimpse(classics)

# 3. Подсчёт слов в жанровых тегах
word_counts <- classics %>%
  filter(!is.na(bibliography.subjects)) %>%
  select(bibliography.subjects) %>%
  unnest_tokens(word, bibliography.subjects) %>%
  anti_join(stop_words, by = "word") %>%
  count(word, sort = TRUE)

# 4. Топ-10
top10 <- head(word_counts, 10)
print(top10)
</syntaxhighlight>

[[Файл:Снимок 15.06.2026 в 23.48.jpeg|400px|thumb|right|Код R-скрипта в RStudio (posit.cloud)]]

== Результаты анализа ==
{| class="wikitable"
! Слово !! Частота
|-
| fiction || 1415
|-
| stories || 212
|-
| drama || 206
|-
| english || 178
|-
| england || 155
|-
| poetry || 133
|-
| history || 129
|-
| life || 104
|-
| character || 95
|-
| century || 90
|}

[[Файл:Снимок 15.06.2026 в 23.47.jpeg|600px|center|frameless|Топ-10 самых частых слов в жанровых тегах subjects]]

== Комментарий ==
В выборке из топ-1000 книг Project Gutenberg самый частый жанровый тег — 
fiction (1415), за ним stories и drama. Высокая частота english/england 
показывает, что среди самых скачиваемых книг много английской классики.

[[Категория:CompLing Works]]