1  Начало работы

1.1 Установка R и RStudio

Мы будем использовать R, так что для занятий понадобятся:

Мы будем использовать следующую версию R:

R version 4.3.3 (2024-02-29)

Некоторые люди не любят устанавливать лишние программы себе на компьютер, несколько вариантов есть и для них:

  • RStudio cloud — полная функциональность RStudio с некоторыми ограничениями;
  • webR REPL — ограниченная версия компилятора R, которая работает в вашем браузере и не требует никаких установок на компьютер
  • Jupyter ноутбуки;
  • Google Colab (нужно в настройках переключить ядро);
  • VS Code — другое IDE, которое также позволяет работать с R;
  • в принципе, в IDE нет нужды, можно работать из терминала, после установки, нужно всего лишь набрать R.

1.2 Знакомство с RStudio

RStudio — основная среда разработки (IDE) для R. После установки R и RStudio можно открыть RStudio и перед вами предстанет что-то похожее на изображение ниже:

RStudio при первом открытии

После нажатия на двойное окошко чуть левее надписи Environment откроется окно скрипта.

Подокна RStudio

Все следующие команды можно:

  • вводить в окне консоли, и тогда для исполнения следует нажимать клавишу Enter.
  • вводить в окне скрипта, и тогда для исполнения следует нажимать клавиши Ctrl/Cmd + Enter или на команду Run на панели окна скрипта. Все, что введено в окне скрипта можно редактировать как в любом текстовом редакторе, в том числе сохранять Ctrl/Cmd + S.

Для начала попробуйте получить информацию о сессии, введя в консоли такую команду:

sessionInfo()

sessionInfo() – это функция. О функциях можно думать как о глаголах (“сделай то-то!”). За названием функции всегда следуют круглые скобки, внутри которых могут находиться аргументы функции. Аргументы – это что-то вроде дополнений и обстоятельств. Аргументы могут быть обязательные и необязательные. Чтобы узнать, каких аргументов требует функция, надо вызывать help: ?mean(). В правой нижней панели появится техническая документация. Но также можно воспользоваться функцией args(). Попробуйте набрать в консоли args(round).

Вопрос

Сколько аргументов функции round() имеют значения по умолчанию?

1.3 Пакеты

После установки R вы получите доступ к уже готовым методам статистического анализа и инструментам для визуализации. Если в базовой инсталляции R нет нужного решения – надо поискать в библиотеке пакетов. Пакет – это набор функций и иногда датасетов, созданный пользователями. На 1 июля 2023 г. в репозитории CRAN доступно 19789 пакетов. И это далеко не все: многие пакеты доступны только на GitHub.

На заметку

Некоторые функции, которые вы найдете в пакетах, частично дублируют друг друга – это нормально, как и в естественном языке, “сказать” что-то можно разными способами.

По технической документации и так называемым “виньеткам” можно понять, какой пакет вам нужен. Например, вот так выглядит виньетка пакета RPerseus, при помощи которого можно получить доступ к корпусу греческой и латинской литературы.

Бывают еще “пакеты пакетов”, то есть очень большие семейства функций, своего рода “диалекты” R. Таково семейство tidyverse, объединяемое идеологией “опрятных” данных. Про него мы еще будем говорить.

Пакеты для работы устанавливаются один раз, однако подключать их надо во время каждой сессии. Чтобы установить новый пакет, можно воспользоваться меню Tools > Install Packages. Также можно устанавливать пакеты из консоли. Установим пакет с интерактивными уроками программирования на языке R:

install.packages("swirl")

Для подключения используем функцию library(), которой передаем в качестве аргумента название пакета без кавычек:

library(swirl)

1.4 Рабочая директория

Перед началом работы проверьте свою рабочую директорию при помощи getwd(). Для смены можно использовать как абсолютный, так и относительный путь:

setwd("/Users/name/folder")

# искать в текущей директории
setwd("./folder")

# перейти на уровень вверх
setwd("../")

Также для выбора рабочей директории можно использовать меню R Session > Set Working Directory. А теперь – первое задание.

Задание

Установите курс программирования на R: install_course("R Programming"). После этого привяжите пакет командой library(swirl) и наберите: swirl(). Укажите ваше имя. Пройдите урок 2 Workspace and Files.


После выполнения ответьте на несколько вопросов на закрепление материала.

Вопрос

Какие действия в рабочей директории можно совершать из консоли?







Вопрос

Чтобы создать вложенную директорию при помощи функции dir.create(), аргументу recursive следует задать значение…

Если все получилось, двигаемся дальше.

1.5 R как калькулятор

Можно использовать R как калькулятор. Для этого вводим данные рядом с символом приглашения >, который называется prompt.

sqrt(4) # квадратный корень
[1] 2
2^3 # степень
[1] 8
log10(100) #логарифм
[1] 2

Если в начале консольной строки стоит +, значит предыдущий код не завершен. Например, вы забыли закрыть скобку функции. Ее можно дописать на следующей строке. Попробуйте набрать sqrt(2 в консоли.

1.6 Операторы присваивания

Чтобы в окружении появился новый объект, надо присвоить результат вычислений какой-нибудь переменной при помощи оператора присваивания <- (Alt + - (Windows) или Option + - (Mac)). Знак = также работает как оператор присваивания, но не во всех контекстах, поэтому им лучше не пользоваться.

x <- 2 + 2 # создаем переменную
y <- 0.1 # создаем еще одну переменную
x <- y # переназначаем  
x + y
[1] 0.2

Сочетание клавиш для оператора присваивания: Option/Alt + -. Имя переменной, как и имя функции, может содержать прописные и строчные буквы, точку и знак подчеркивания.

Теперь небольшое упражнение.

Задание

Запустите swirl(). Укажите ваше имя. Пройдите урок 1 Basic Building Blocks.

Если все получилось, можно двигаться дальше! Но сначала зафиксируем несколько новых функций из этих первого урока.

Вопрос

Что вычисляет функция abs()?




Вопрос

Сколько значений вернет функция, если разделить c(2, 4, 6) на 2?

Вопрос

Буква “c” в названии функции c() означает…




1.7 Пайпы (конвееры)

В нашем коде мы часто будем использовать знаки конвеера (или пайпы): |> (в вашей версии он может выглядить иначе: %>%; переключить оператор можно в Global Options). Они призваны показывать последовательность действий. Сочетание клавиш: Ctrl/Cmd + Shift + M.

mean(sqrt(abs(sin(1:100)))) 
[1] 0.7654264
1:100 |> 
  sin() |> 
  abs() |> 
  sqrt() |> 
  mean()
[1] 0.7654264

1.8 Векторы

Вектор – это объект, предназначенный для хранения данных. К таким же объектам относятся также матрицы, списки, таблицы данных и др. Заметим, что в языке R нет скаляров (отдельных чисел). Числа считаются векторами из одного элемента.

x <- 2
class(x) # числовой вектор
[1] "numeric"
length(x) # длина вектора
[1] 1

Как вы уже поняли, функция c() позволяет собрать несколько элементов в единый вектор:

x <- c(3, 5, 7)
x_mean <- mean(x) 
x_mean
[1] 5


Над векторами можно совершать арифметические операции, но будьте внимательны, применяя операции к векторам разной длины: в этом случае более короткий вектор будет переработан, то есть повторен до тех пор, пока его длина не сравняется с длиной вектора большей длины.

x <- 2
y <- c(10, 20, 30)
y / x 
[1]  5 10 15
x + y 
[1] 12 22 32

Векторы можно индексировать, то есть забирать из них какие-то элементы:

x <- seq(1, 5, 0.5)
x[4:5] # индексы начинаются с 1 (в отличие от Python)
[1] 2.5 3.0

Вектор может хранить данные разных типов:

  • целое число (integer);
  • число с плавающей точкой (numeric, также называются double, то есть число двойной точности);
  • строку (character);
  • логическую переменную (logical);
  • категориальную переменную, или фактор (factor).
# проверить тип данных 
x <- sqrt(2)
class(x)
[1] "numeric"
is.integer(x)
[1] FALSE
is.numeric(x)
[1] TRUE

Создавать векторы можно не только при помощи c(). Вот еще два способа.

seq(1, 5, 0.5)
[1] 1.0 1.5 2.0 2.5 3.0 3.5 4.0 4.5 5.0
rep("foo", 5)
[1] "foo" "foo" "foo" "foo" "foo"

Научиться генерировать векторы поможет небольшое упражнение.

Задание

Запустите swirl() и пройдите урок 3 Sequences of Numbers.

Проверьте свои знания, прежде чем двигаться дальше.

Вопрос

Какие числа вернет команда pi:10?






Вопрос

Какие функции могут использоваться для создания символьных векторов?




Вопрос

Сколько значений вернет команда rep(c(0, 1, 2), times = 10)? Посчитайте в уме, не выполняя код.


Факторы внешне похожи на строки, но в отличие от них хранят информацию об уровнях категориальных переменных. Уровень может обозначаться как числом (например, 1 и 0), так и строкой.

t <- factor(c("A", "B", "C"), levels = c("A", "B", "C"))
t
[1] A B C
Levels: A B C

Важно: вектор может хранить данные только одного типа. При попытке объединить в единый вектор данные разных типов они будут принудительно приведены к одному типу:

x <- c(TRUE, 1, 3, FALSE)
x # логические значения приведены к числовым
[1] 1 1 3 0
y <- c(1, "a", 2, "лукоморье") 
y # числа превратились в строки
[1] "1"         "a"         "2"         "лукоморье"
Задание

Запустите swirl() и пройдите урок 4 Vectors. Это позволит больше узнать про логические и символьные векторы.

Несколько вопросов для самопроверки.

Вопрос

Какие значение вернет команда (3 > 5) & (4 == 4)?

Вопрос

Какие значения вернет команда (TRUE == TRUE) | (TRUE == FALSE)?

Вопрос

Команда paste(LETTERS, 1:4, sep = "-") вернет…







Логические векторы можно получить в результате применения логических операторов (== “равно”, != “не равно”, <= “меньше или равно”) к данным других типов:

x <- c(1:10) # числа от 1 до 10
y <- x > 5
y # значения TRUE соответствуют единице, поэтому их можно складывать
 [1] FALSE FALSE FALSE FALSE FALSE  TRUE  TRUE  TRUE  TRUE  TRUE
sum(y)
[1] 5


Задание

Здесь можно запустить swirl() и пройти урок 8 Logic. Это не обязательно, но очень полезно, если хотите разобраться в операторах!


Вопрос

Попробуйте посчитать в уме: какое из выражений ниже вернет значение TRUE?





Функции all() и any() также возвращают логические значения:

x <- 10:20 
any(x == 15)
[1] TRUE
all(x > 9)
[1] TRUE

Отсутствие данных любого типа в R передается двумя способами. NULL означает, что значение не существует. Например, если мы создадим пустой вектор, то при попытке распечатать его получим NULL. А вот длина пустого вектора равна нулю!

y <- c() 
y 
NULL
length(y) 
[1] 0

NA (not available) указывает на то, что значение существует, но оно неизвестно. Любые операции с NA приводят к появлению новых NA! Сравните:

x <- c(1, NA, 2)
mean(x)
[1] NA
y <- c(1, NULL, 2)
mean(y)
[1] 1.5

Как проверить, есть ли в данных NA или NULL? Знак == здесь не подойдет.

x <- NA
x == NA
[1] NA
y <- NULL
y == NULL
logical(0)

Для этого есть специальные функции.

is.na(x)
[1] TRUE
is.null(y)
[1] TRUE

When some people first get to R, they spend a lot of time trying to get rid of NAs. People probably did the same sort of thing when zero was invented. NA is a wonderful thing to have available to you. It is seldom pleasant when your data have missing values, but life if much better with NA than without.

Burns (2012)

Как избавиться от NA? В некоторых случаях достаточно аргумента функции.

mean(c(1, NA, 2), na.rm=T) 
[1] 1.5

Чуть более сложные способы вы узнаете из урока swirl ниже.

Задание

Запустите swirl() и пройдите урок 5 Missing Values.

Готово? Тогда попробуйте ответить на вопрос ниже, не выполняя вычислений в R.

Вопрос

Дан вектор x <- c(44, NA, 5, NA). Сколько NA вернет команда x == NA?


Задание

Запустите swirl() и пройдите урок 6 Subsetting Vectors.

Проверьте, все ли вы поняли из этого урока.

Вопрос

Если вектор x содержит числовые значения и некоторое количество NA, то что вернет команда x[is.na(x)]?






Что надо изменить в этом коде, чтобы получить все, кроме NA?

1.9 Списки

В отличие от векторов списки могут хранить данные разных типов.

list = list(a = c("a", "b", "c"), b = c(1, 2, 3), c = c(TRUE, FALSE, TRUE))
list
$a
[1] "a" "b" "c"

$b
[1] 1 2 3

$c
[1]  TRUE FALSE  TRUE

Можно получить доступ как к элементам списка целиком, так и к их содержимому.

list$a # обращение к поименованным элементам 
[1] "a" "b" "c"
list[2] # одинарные квадратные скобки извлекают элемент списка целиком
$b
[1] 1 2 3
class(list[2])
[1] "list"
list[[2]] #  элементы второго элемента 
[1] 1 2 3
class(list[[2]])
[1] "numeric"
list$c[1]# первый элемент второго элемента
[1] TRUE

Обратите внимание, что list[2] и list[[2]] возвращают объекты разных классов. Нам это еще понадобится при работе с XML.

Индексирование списка в R. Источник 🧂


Задание

Установите библиотеку rcorpora и загрузите список с названиями хлеба и сладкой выпечки.

library(rcorpora)
my_list <-  corpora("foods/breads_and_pastries")


Вопрос

Узнайте длину my_list и введите ее в поле ниже.

Вопрос

Достаньте из my_list элемент pastries и узнайте его длину.

Вопрос

А теперь извлеките пятый элемент из pastries и введите ниже его название.

Со списками покончено. Теперь можно пойти выпить кофе с my_list$pastries[13]. Дальше будет сложнее, но интереснее.