2 + 3
## [1] 5
2 - 3
## [1] -1
2 * 3
## [1] 6
1 Типы данных
1.1 Типы данных
Тип данных — это класс данных, характеризуемый членами класса и операциями, которые могут быть к ним применены1. С помощью типов данных мы можем представлять привычные нам сущности, такие как числа, строки и т.д. В языке R существует 5 базовых типов данных:
Название | Тип данных |
---|---|
complex |
комплексные числа |
character |
символьный (строки) |
integer |
целые числа |
logical |
логические (булевы) |
numeric |
числа с плавающей точкой |
Помимо этого есть тип Date
, который позволяет работать с датами. Рассмотрим использование каждого из перечисленных типов.
1.1.1 Числа
Числа — основной тип данных в R. К ним относятся числа c плавающей точкой и целые числа. В терминологии R такие данные называются интервальными, поскольку к ним применимо понятие интервала на числовой прямой. Целые числа относятся к дискретным интервальным, а числа с плавающей точкой — к непрерывным интервальным. Числа можно складывать, вычитать и умножать:
Разделителем целой и дробной части является точка, а не запятая:
2.5 + 3.1
## [1] 5.6
Существует также специальный оператор для возведения в степень. Для этого вы можете использовать или двойной знак умножения (**
) или циркумфлекс (^
):
2 ^ 3
## [1] 8
2 ** 3
## [1] 8
Результат деления по умолчанию имеет тип с плавающей точкой:
5 / 3
## [1] 1.666667
5 / 2.5
## [1] 2
Если вы хотите чтобы деление производилось целочисленным образом (без дробной части) необходимо использовать оператор %/%
:
5 %/% 3
## [1] 1
Остаток от деления можно получить с помощью оператора %%
:
5 %% 3
## [1] 2
Вышеприведенные арифметические операции являются бинарными, то есть требуют наличия двух чисел. Числа называются “операндами”. Отделять операнды от оператора пробелом или нет — дело вкуса. Однако рекомендуется все же отделять, так как это повышает читаемость кода. Следующие два выражения эквивалентны. Однако сравните простоту их восприятия:
5%/%3
## [1] 1
5 %/% 3
## [1] 1
Как правило, в настоящих программах числа в явном виде встречаются лишь иногда. Вместо этого для их обозначения используют переменные. В вышеприведенных выражениях мы неоднократно использовали число 3. Теперь представьте, что вы хотите проверить, каковы будут результаты, если вместо 3 использовать 4. Вам придется заменить все тройки на четверки. Если их много, то это будет утомительная работа, и вы наверняка что-то пропустите. Конечно, можно использовать поиск с автозаменой, но что если тройки надо заменить не везде? Одно и то же число может выполнять разные функции в разных выражениях. Чтобы избежать подобных проблем, в программе вводят переменные и присваивают им значения. Оператор присваивания значения выглядит как =
= 5
a = 3 b
Чтобы вывести значение переменной на экран, достаточно просто ввести его:
a## [1] 5
b## [1] 3
Мы можем выполнить над переменными все те же операции что и над константами:
+ b
a ## [1] 8
- b
a ## [1] 2
/ b
a ## [1] 1.666667
%/% b
a ## [1] 1
%% b
a ## [1] 2
Легко меняем значение второй переменной с 3 на 4 и выполняем код заново.
= 4
b + b
a ## [1] 9
- b
a ## [1] 1
/ b
a ## [1] 1.25
%/% b
a ## [1] 1
%% b
a ## [1] 1
Нам пришлось изменить значение переменной только один раз в момент ее создания, все последующие операции остались неизменны, но их результаты обновились!
Новую переменную можно создать на основе значений существующих переменных:
= b
c = a+c d
Посмотрим, что получилось:
c## [1] 4
d## [1] 9
Вы можете комбинировать переменные и заданные явным образом константы:
= d + 2.5
e
e## [1] 11.5
Противоположное по знаку число получается добавлением унарного оператора -
перед константой или переменной:
= -2
f
f## [1] -2
= -e
f
f## [1] -11.5
Операция взятия остатка от деления бывает полезной, например, когда мы хотим выяснить, является число четным или нет. Для этого достаточно взять остаток от деления на 2. Если число является четным, остаток будет равен нулю. В данном случае c равно 4, d
равно 9:
%% 2
c ## [1] 0
%% 2
d ## [1] 1
1.1.1.1 Числовые функции
Прежде чем мы перейдем к рассмотрению прочих типов данных и структур данных нам необходимо познакомиться с функциями, поскольку они встречаются буквально на каждом шагу. Понятие функции идентично тому, к чему мы привыкли в математике. Например, функция может называться Z
, и принимать 2 аргумента: x
и y
. В этом случае она записывается как Z(x,y)
. Чтобы получить значение функции, необходимо подставить некоторые значения вместо x
и y
в скобках. Нас даже может не интересовать, как фактически устроена функция внутри, но важно понимать, что именно она должна вычислять. С созданием функций мы познакомимся позднее.
Важнейшие примеры функций — математические. Это функции взятия корня sqrt(x)
, модуля abs(x)
, округления round(x, digits)
, натурального логарифма log(x)
, тригонометрические функции sin(x)
, cos(x)
, tan(x)
, обратные к ним asin(y)
, acos(y)
, atan(y)
и многие другие. Основные математические функции содержатся в пакете base
, который по умолчанию доступен в среде R и не требует подключения.
В качестве аргумента функции можно использовать переменную, константу, а также выражения:
sqrt(a)
## [1] 2.236068
sin(a)
## [1] -0.9589243
tan(1.5)
## [1] 14.10142
abs(a + b - 2.5)
## [1] 6.5
Вы также можете легко вкладывать функции одна в одну, если результат вычисления одной функции нужно подставить в другую:
sin(sqrt(a))
## [1] 0.7867491
sqrt(sin(a) + 2)
## [1] 1.020331
Также как и с арифметическими выражениями, результат вычисления функции можно записать в переменную:
= sin(sqrt(a))
b
b## [1] 0.7867491
Если переменной b ранее было присвоено другое значение, оно перезапишется. Вы также можете записать в переменную результат операции, выполненной над ней же. Например, если вы не уверены, что a
— неотрицательное число, а вам это необходимо в дальнейших расчетах, вы можете применить к нему операцию взятия модуля:
= sin(a)
b
b## [1] -0.9589243
= abs(b)
b
b## [1] 0.9589243
1.1.2 Строки
Строки — также еще один важнейший тип данных. Чтобы создать строковую переменную, необходимо заключить текст строки в кавычки:
= "В историю трудно войти, но легко вляпаться (М.Жванецкий)"
s
s## [1] "В историю трудно войти, но легко вляпаться (М.Жванецкий)"
Строки состоят из символов, и, в отличие от некоторых других языков, в R нет отдельного типа данных для объекта, которых хранит один символ (в C++ для этого используется тип char
). Поэтому при создании строк вы можете пользоваться как одинарными, так и двойными кавычками:
= "Это строка"
s1 s1
[1] "Это строка"
= 'Это также строка'
s2 s2
[1] "Это также строка"
Иногда бывает необходимо создать пустую строку (например, чтобы в нее далее что-то добавлять). В этом случае просто напишите два знака кавычек, идущих подряд без пробела между ними:
= "" # это пустая строка
s1 s1
[1] ""
= '' # это также пустая строка
s2 s2
[1] ""
= ' ' # а это не пустая, тут есть пробел
s3 s3
[1] " "
Длину строки в символах можно узнать с помощью функции nchar()
nchar(s)
## [1] 56
nchar(s1)
## [1] 0
nchar(s3)
## [1] 1
Чтобы извлечь из строки подстроку (часть строки), можно использовать функцию substr()
, указав ей номер первого и последнего символа:
substr(s, 3, 9) # извлекаем все символы с 3-го по 9-й
[1] "историю"
В частности, зная длину строки, можно легко извлечь последние \(k\) символов:
= nchar(s)
n = 7
k substr(s, n - k, n)
[1] "анецкий)"
Строки можно складывать так же как и числа. Эта операция называется конкатенацией. В результате конкатенации строки состыковываются друг с другом и получается одна строка. В отличие от чисел, конкатенация производится не оператором +
, а специальной функцией paste()
. Состыковываемые строки нужно перечислить через запятую, их число может быть произвольно
= "В историю трудно войти,"
s1 = "но легко вляпаться"
s2 = "(М.Жванецкий)" s3
Посмотрим содержимое подстрок:
s1## [1] "В историю трудно войти,"
s2## [1] "но легко вляпаться"
s3## [1] "(М.Жванецкий)"
А теперь объединим их в одну:
= paste(s1, s2)
s
s## [1] "В историю трудно войти, но легко вляпаться"
= paste(s1, s2, s3)
s
s## [1] "В историю трудно войти, но легко вляпаться (М.Жванецкий)"
Настоящая сила конкатенации проявляется когда вам необходимо объединить в одной строке некоторое текстовое описание (заранее известное) и значения переменных, которые у вас вычисляются в программе (заранее неизвестные). Предположим, вы нашли в программе что максимальная численность населения в Детройте пришлась на 1950 год и составила 1850 тыс. человек. Найденный год записан у вас в переменную year
, а население в переменную pop
. Вы их значения пока что не знаете, они вычислены по табличным данным в программе. Как вывести эту информацию на экран “человеческим” образом? Для этого нужно использовать конкатенацию строк.
Условно запишем значения переменных, как будто мы их знаем
= 1950
year = 1850 pop
= "Максимальная численность населения в Детройте пришлась на"
s1 = "год и составила"
s2 = "тыс. чел"
s3 = paste(s1, year, s2, pop, s3)
s
s## [1] "Максимальная численность населения в Детройте пришлась на 1950 год и составила 1850 тыс. чел"
Обратите внимание на то что мы конкатенировали строки с числами. Конвертация типов осуществилась автоматически. Помимо этого, функция сама вставила пробелы между строками.
Функция
paste()
содержит параметрsep
, отвечающий за символ, который будет вставляться между конкатенируемыми строками. По умолчаниюsep = " "
, то есть, между строками будет вставляться пробел. Подобное поведение желательно не всегда. Например, если после переменной у вас идет запятая, то между ними будет вставлен пробел. В таком случае при вызовеpaste()
необходимо указатьsep = ""
, то есть пустую строку:paste(... sep = "")
. Вы также можете воспользоваться функциейpaste0()
, которая делает [почти] то же самое, что иpaste(..., sep = "")
, но избавляет вас от задания параметраsep
.
1.1.3 Даты и длительности
Для работы с временными данными в R существуют специальные типы. Чаще всего используются даты, указанные с точностью до дня. Такие данные имеют тип Date
, а для их создания используется функция as.Date()
. В данном случае точка — это лишь часть названия функции, а не какой-то особый оператор. В качестве аргумента функции необходимо задать дату, записанную в виде строки. Запишем дату рождения автора (можете заменить ее на свою):
= as.Date('1986/02/18')
birth
birth## [1] "1986-02-18"
Сегодняшнюю дату вы можете узнать с помощью специальной функции Sys.Date()
:
= Sys.Date()
current
current## [1] "2023-12-19"
Даты можно вычитать. Результатом выполнения. Например, узнать продолжительность жизни в днях можно так:
= current - birth
livedays
livedays## Time difference of 13818 days
Вы также можете прибавить к текущей дате некоторое значение. Например, необходимо узнать, какая дата будет через 40 дней:
+ 40
current ## [1] "2024-01-28"
Имея дату, вы можете легко извлечь из нее день, месяц и год. Существуют специальные функции для этих целей (описанные в главе 8), но прямо сейчас вы можете сделать это сначала преобразовав дату в строку, а затем выбрав из нее подстроку, соответствующую требуемой компоненте даты:
= as.character(current)
cdate substr(cdate, 1, 4) # Год
[1] "2023"
substr(cdate, 6, 7) # Месяц
[1] "12"
substr(cdate, 9, 10) # День
[1] "19"
Более подробно о преобразованиях типов, аналогичных функции as.character()
, используемой в данном примере, рассказано далее в настоящей главе.
1.1.4 Время и периоды
1.1.5 Логические
Логические переменные возникают там, где нужно проверить условие. Переменная логического типа может принимать значение TRUE
(истина) или FALSE
(ложь). Для их обозначения также возможны более компактные константы T
и F
соответственно.
Следующие операторы приводят к возникновению логических переменных:
- РАВНО (
==
) — проверка равенства операндов - НЕ РАВНО (
!=
) — проверка неравенства операндов - МЕНЬШЕ (
<
) — первый аргумент меньше второго - МЕНЬШЕ ИЛИ РАВНО (
<=
) — первый аргумент меньше или равен второму - БОЛЬШЕ (
>
) — первый аргумент больше второго - БОЛЬШЕ ИЛИ РАВНО (
>=
) — первый аргумент больше или равен второму
Посмотрим, как они работают:
= 1
a = 2
b == b
a ## [1] FALSE
!= b
a ## [1] TRUE
> b
a ## [1] FALSE
< b
a ## [1] TRUE
Если необходимо проверить несколько условий одновременно, их можно комбинировать с помощью логических операторов. Наиболее популярные среди них:
- И (
&&
) - проверка истинности обоих условий - ИЛИ (
||
) - проверка истинности хотя бы одного из условий - НЕ (
!
) - отрицание операнда (истина меняется на ложь, ложь на истину)
= 3
c > a) && (c > b)
(b ## [1] TRUE
> b) && (c > b)
(a ## [1] FALSE
> b) || (c > b)
(a ## [1] TRUE
!(a > b)
## [1] TRUE
Более подробно работу с логическими переменными мы разберем далее при знакомстве с условным оператором if
.
1.2 Манипуляции с типами
1.2.1 Определение типа данных
Определение типа данных осуществляется с помощью функции class()
(см. раздел Диагностические функции во Введении)
class(1)
## [1] "numeric"
class(0.5)
## [1] "numeric"
class(1 + 2i)
## [1] "complex"
class("sample")
## [1] "character"
class(TRUE)
## [1] "logical"
class(as.Date('1986-02-18'))
## [1] "Date"
В вышеприведенном примере видно, что R по умолчанию “повышает” ранг целочисленных данных до более общего типа чисел с плавающей точкой, тем самым закладываясь на возможность точного деления без остатка. Если вы хотите, чтобы данные в явном виде интерпретировались как целочисленные, их нужно принудительно привести к этому типу. Операторы преобразования типов рассмотрены ниже.
1.2.2 Преобразование типов данных
Преобразование типов данных осуществляется с помощью функций семейства as(d, type)
, где d
— это входная переменная, а type
— название типа данных, к которому эти данные надо преобразовать (см. таблицу в начале главы). Несколько примеров:
= 1
k print(k)
## [1] 1
class(k)
## [1] "numeric"
= as(k, "integer")
l print(l)
## [1] 1
class(l)
## [1] "integer"
= as(l, "character")
m print(m)
## [1] "1"
class(m)
## [1] "character"
= as(m, "numeric")
n print(n)
## [1] 1
class(n)
## [1] "numeric"
Для функции as()
существуют обертки (wrappers), которые позволяют записывать такие преобразования более компактно и выглядят как as.<dataype>(d)
, где datatype
— название типа данных:
= 1
k = as.integer(k)
l print(l)
## [1] 1
class(l)
## [1] "integer"
= as.character(l)
m print(m)
## [1] "1"
class(m)
## [1] "character"
= as.numeric(m)
n print(n)
## [1] 1
class(n)
## [1] "numeric"
= as.Date('1986-02-18')
d print(d)
## [1] "1986-02-18"
class(d)
## [1] "Date"
Если преобразовать число c плавающей точкой до целого, то дробная часть будет отброшена:
as.integer(2.7)
## [1] 2
После преобразования типа данных, разумеется, к переменной будут применимы только те функции, которые определены для данного типа данных:
= 2.5
a = as.character(a)
b + 2
b ## Error in b + 2: non-numeric argument to binary operator
nchar(b)
## [1] 3
1.2.3 Проверка типов данных и пустых значений
Для проверки типа данных можно использовать функции семейства is.<datatype>
:
is.integer(2.7)
## [1] FALSE
is.numeric(2.7)
## [1] TRUE
is.character('Привет!')
## [1] TRUE
Особое значение имеют функции проверки пустых переменных (имеющих значение NA
- not available), которые могут получаться в результате несовместимых преобразований или соответствовать пропускам в исходных данных:
as.integer('Привет!')
## [1] NA
is.na(as.integer('Привет!'))
## [1] TRUE
1.3 Ввод и вывод данных в консоли
1.3.1 Ввод данных
Для ввода данных через консоль можно воспользоваться функцией readline()
, которая будет ожидать пользовательский ввод и нажатие клавиши Enter, после чего вернет введенные данные в виде строки. Предположим, пользователь вызывает эту функцию и вводит с клавиатуры 1024
:
= readline() a
Выведем результат на экран:
a## [1] "1024"
Функция
readline()
всегда возвращает строку, поэтому если вы ожидаете ввод числа, полученное значение необходимо явным образом преобразовать к числовому типу.
Весьма полезной особенностью readline()
является возможность указания строки запроса (чтобы пользователь понимал, что от него хотят). Строку запроса можно указать при вызове функции:
= readline('Введите широту точки:')
lat ## Введите широту точки:
## 54
lat## [1] "54"
1.3.2 Вывод данных
Для вывода данных в консоль можно воспользоваться тремя способами:
- Просто напечатать название переменной с новой строки (не работает при запуске программы командой
Source
) - Вызвать функцию
print()
- Вызвать функцию
cat()
- Заключить выражение в круглые скобки
()
Первый способ мы уже регулярно использовали ранее в настоящей главе. Следует обратить внимание на то, что он хорош для отладки программы, но выглядит некрасиво в рабочих программах, поскольку просто печатая название переменной с новой строки вы как бы явно не говорите о том, что хотите вывести ее значение в консоль, а лишь подразумеваете это. Более того, если скрипт запускается командой Source
, данный метод вывода переменной просто не сработает, интерпретатор его проигнорирует.
Поэтому после отладки следует убрать из программы все лишние выводы в консоль, а оставшиеся (действительно нужные) оформить с помощью функций print()
или cat()
.
Функция print()
работает точно так же, как и просто название переменной с новой строки, отличаясь лишь двумя особенностями:
print()
явным образом говорит о том, что вы хотите вывести в консоль некую информациюprint()
работает при любых методах запуска программы, в том числе методомSource
.
Например:
= 1024
a
a## [1] 1024
print(a)
## [1] 1024
= "Fourty winks in progress"
b
b## [1] "Fourty winks in progress"
print(b)
## [1] "Fourty winks in progress"
print(paste("2 в степени 10 равно", 2^10))
## [1] "2 в степени 10 равно 1024"
print(paste("Сегодняшняя дата - ", Sys.Date()))
## [1] "Сегодняшняя дата - 2023-12-19"
Функция cat()
отличается от print()
следующими особенностями:
cat()
выводит значение переменной, и не печатает ее измерения и внешние атрибуты типа двойных кавычек вокруг строки. Это означает, чтоcat()
можно использовать и для записи данных в файл (на практике этим мало кто пользуется, но знать такую возможность надо).cat()
принимает множество аргументов и может осуществлять конкатенацию строк аналогично функции paste()cat()
не возвращает никакого значений, в то время какprint()
возвращает значение, переданное ей в качестве аргумента.cat()
можно использовать только для атомарных типов данных. Для классов (таких как Date) она будет выводит содержимое объекта, которое может не совпадать с тем, что пользователь ожидает вывести
Например:
cat(a)
## 1024
cat(b)
## Fourty winks in progress
cat("2 в степени 10 равно", 2^10)
## 2 в степени 10 равно 1024
cat("Сегодняшнаяя дата -", Sys.Date())
## Сегодняшнаяя дата - 19710
Можно видеть, что в последнем случае cat()
напечатала отнюдь не дату в ее привычном представлении, а некое число, которое является внутренним представлением даты в типе данных Date
. Такие типы данных являются классами объектов в R, и у них есть своя функция print()
, которая и выдает содержимое объекта в виде, который ожидается пользователем. Поэтому пользоваться функцией cat()
надо с некоторой осторожностью.
Заключительная возможность — вывод с помощью заключения выражения в круглые скобки — очень удобна на стадии отладки программы. При этом переменная, которая создается в выражении, остается доступной в программе:
a = rnorm(5)) # сгенерируем 5 случайных чисел, запишем их в переменную a и выведем на экран (
[1] 1.8983975 3.1158498 -0.9761858 0.2970648 1.2309851
b = 2 * a) # переменная a доступна, ее можно использовать и далее для вычислений (
[1] 3.7967951 6.2316996 -1.9523716 0.5941297 2.4619703
1.4 Условный оператор
Проверка условий позволяет осуществлять так называемое ветвление в программе. Ветвление означает, что при определенных условиях (значениях переменных) будет выполнен один программный код, а при других условиях — другой. В R для проверки условий используется условный оператор if — else if — else следующего вида:
if (condition) {
statement1
} else if (condition) {
statement2
} else {
statement3
}
Сначала проверяется условие в выражении if (condition)
, и если оно истинно, то выполнится вложенный в фигурные скобки программный код statement1
, после чего оставшиеся условия не будут проверяться. Если первое условие ложно, программа перейдет к проверке следующего условия else if (condition)
. Далее, если оно истинно, то выполнится вложенный код statement2
, если нет — проверка переключится на следующее условие и так далее. Заключительный код statement3
, следующий за словом else
, выполнится только если ложными окажутся все предыдущие условия.
Конструкций
else if
может быть произвольное количество, конструкцииif
иelse
могут встречаться в условном операторе только один раз, в начале и конце соответственно. При этом условный оператор может состоять только из конструкцииif
, аelse if
иelse
не являются обязательными.
Например, сгенерируем случайное число, округлим его до одного знака после запятой и проверим относительно нуля:
a = round(rnorm(1), 1)) (
[1] 0.9
if (a < 0) {
cat('Получилось отрицательное число!')
else if (a > 0) {
} cat('Получилось положительное число!')
else {
} cat('Получился нуль!')
}
Получилось положительное число!
Условия можно использовать, в частности, для того чтобы обрабатывать пользовательский ввод в программе. Например, охарактеризуем положение точки относительно Полярного круга:
= as.numeric(readline('Введите широту вашей точки:')) phi
Пользователь вводит 68
, а мы оцениваем результат:
if (!is.na(phi)) { # проверяем, является ли введенное значение числом
if (abs(phi) >= 66.562 && abs(phi) <= 90) { # выполняем проверку на заполярность
cat('Точка находится в Заполярье')
else {
} cat('Точка не находится в Заполярье')
}
else {
} cat('Необходимо ввести число!') # оповещаем о некорректном вводе
}
Точка находится в Заполярье
1.5 Оператор переключения
Оператор переключения (switch) является удобной заменой условному оператору в тех случаях, когда надо вычислить значение переменной в зависимости от значения другой переменной, которая может принимать ограниченное (заранее известное) число значений. Например:
= readline('Введите название федерального округа:') name
Пользователь вводит:
Приволжский
# Определим центр в зависимости от названия:
= switch(name,
capital 'Центральный' = 'Москва',
'Северо-Западный' = 'Санкт-Петербург',
'Южный' = 'Ростов-на-Дону',
'Северо-Кавказский' = 'Пятигорск',
'Приволжский' = 'Нижний Новгород',
'Уральский' = 'Екатеринбург',
'Сибирский' = 'Новосибирск',
'Дальневосточный' = 'Хабаровск')
print(capital)
[1] "Нижний Новгород"
1.6 Прерывание программы
В процессе выполнения программы могут возникнуть ситуации, при которых дальнейшее выполнение программы невозможно или недопустимо. Например, пользователь вместо числа ввёл в консоли букву. Хорошим тоном разработчика в данном случае будет не пускать ситуацию на самотёк и ждать пока программа сама споткнется и выдаст системное сообщение об ошибке, а обработать некорректный ввод сразу, сообщить об этом пользователю и остановить программу явным образом.
Прервать выполнение программы можно разными способами. Рассмотрим две часто используемые для этого функции:
stop(...)
выводит на экран объекты, перечисленные через запятую в...
и завершает выполнение программы. При ручном вызове этой функции в...
целесообразно передать текстовую строку с сообщением о причине остановки программы. Вызовstop()
происходит обычно после проверки некоторого условия операторомif-else
.stopifnot(...)
вызываетstop()
, если хотя бы одно из выражений, перечисленных через запятую в...
имеет значениеFALSE
. При этом вstop()
передается первое выражение, которое было оценено вFALSE
.
Реализуем вышеописанный пример с контролем пользовательского ввода:
= as.numeric(readline('Введите число:'))
n stopifnot(is.numeric(n)) # остановим выполнение, если получилось не число
cat(n^2) # возведем в квадрат и выведем на экран, если все ОК
Если пользователь введет abc
, программа остановит выполнение:
Error: is.numeric(n) is not TRUE
Обратите внимание, что R напечатал также и само выражение, которое было оценено как FALSE
. Вышеприведенный код можно сделать более дружелюбным для пользователя, если воспользоваться непосредственно функцией stop()
:
= as.numeric(readline('Введите число:'))
n if (!is.numeric(n)) stop('Введенная строка не является числом') # остановим выполнение
cat(n^2) # возведем в квадрат и выведем на экран, если все ОК
Вывод программы в случае ввода строки abc
будет следующим:
Error in eval(expr, envir, enclos): Введенная строка не является числом
1.7 Технические детали
Когда вы присваиваете значение переменной другой переменной, копирования не происходит. Оба имени будут ссылаться на один и тот же объект, до тех пор, пока через одно из имен не будет предпринята попытка модифицировать объект. Это можно легко проверить с помощью функции tracemem()
:
= 1
a = a
b cat('a:', tracemem(a), '\n')
a: <0x7fda4bbd22e8>
cat('b:', tracemem(b), '\n')
b: <0x7fda4bbd22e8>
= 2
a cat('a:', tracemem(a), '\n') # объект скопирован в другую область памяти
a: <0x7fda4bbe9ee8>
cat('b:', tracemem(b), '\n')
b: <0x7fda4bbd22e8>
Подобное поведение называется copy-on-modify. Оно позволяет экономить на вычислениях в случае, когда копия и оригинал остаются неизменными. Аналогичное правило применяется когда вы копируете структуры данных, такие как векторы, списки и фреймы данных (см. Главу @ref(data-structures)). Более подробно см. параграф 2.3 в (Wickham 2019).
1.8 Краткий обзор
Для просмотра презентации щелкните на ней один раз левой кнопкой мыши и листайте, используя кнопки на клавиатуре:
Презентацию можно открыть в отдельном окне или вкладке браузере. Для этого щелкните по ней правой кнопкой мыши и выберите соответствующую команду.
1.9 Контрольные вопросы и упражнения
1.9.1 Вопросы
- Какие типы данных поддерживаются в R? Каковы их англоязычные наименования?
- Что такое переменная?
- Какой оператор используется для записи значения в переменную?
- С помощью какой функции можно узнать тип переменной?
- С помощью какого семейства функций можно преобразовывать типы переменных?
- Можно ли использовать ранее созданное имя переменной для хранения новых данных другого типа?
- Можно ли записать в переменную результат выполнения выражения, в котором она сама же и участвует?
- Какая функция позволяет прочитать пользовательский ввод с клавиатуры в консоли? Какой тип данных будет иметь возвращаемое значение?
- Какую функцию можно использовать для вывода значения переменной в консоль? Чем отличается использование этой функции от случая, когда вы просто пишете название переменной в строке программы?
- Какой символ является разделителем целой и дробной части при записи чисел с плавающей точкой?
- Что такое операторы и операнды? Приведите примеры бинарных и унарных операторов.
- Какое значение будет имет результат деления на ноль?
- Какие функции выполняют операторы
%%, %/%, ^, **
? - Как проверить, является ли число четным?
- Как определить количество символов в строке?
- Как называется операция состыковки нескольких строк и с помощью какой функции она выполняется? Как добиться того, чтобы при этом не добавлялись пробелы между строками?
- С помощью какой функции можно создать дату из строки?
- Как извлечь из даты год? Месяц? День?
- Какая функция позволяет получить дату сегодняшнего дня?
- Можно ли складывать даты и числа? Если да, то в каких единицах измерения будет выражен результат?
- Какова краткая форма записи логических значений
TRUE
иFALSE
? - Каким числам соответствуют логические значения
TRUE
иFALSE
? - Сколько операндов должно быть верно, чтобы оператор логического И (
&&
) принял значениеTRUE
? Что можно сказать в этом отношении об операторе ИЛИ (||
)? - Можно ли применять арифметические операции к логическим переменным? Что произойдет, если прибавить или вычесть из числа
a
значениеTRUE
? А если заменитьTRUE
наFALSE
? - Что такое условный оператор и для каких сценариев обработки данных необходимы условные операторы?
- Перечислите ключевые слова, которые могут быть использованы для организации условных операторов
- При каких сценариях целесообразно использовать оператор переключения?
1.9.2 Упражнения
Запишите условие проверки неравенства чисел
a
иb
не менее чем тремя способами.Напишите программу, которая запрашивает в консоли целое число и определяет, является ли оно чётным или нечетным. Программа должна предварительно определить, является ли введенное число а) числом и б) целым числом.
Подсказка: результат конвертации строки в целое число и число с плавающей точкой отличается. Вы можете использовать это для проверки, является ли введенное число целым.
Напишите программу, которая считывает из консоли введенную пользователем строку и выводит в консоль количество символов в этой строке. Вывод оформите следующим образом:
"Длина введенной строки равняется ... символам"
, где вместо многоточия стоит вычисленная длина.В программе в виде переменных задайте координаты населенного пункта А (
x1, y1
), а также дирекционный уголD
и расстояниеL
до населенного пункта B. Напишите код, который определяет координаты населенного пункта B (x2, y2
).Функция
atan2()
позволяет найти математический азимут (полярный угол), если известны координаты вектора между двумя точками. Используя эту функцию, напишите программу, которая вычисляет географический азимут между точками А (x1, y1
) и B (x2, y2
). Координаты точек задайте в виде переменных непосредственно в коде.Математический азимут отсчитывается от направления на восток против часовой стрелки. Географический азимут отсчитывается от направления на север по часовой стрелке).
Самсонов Т.Е. Визуализация и анализ географических данных на языке R. М.: Географический факультет МГУ, 2023. DOI: 10.5281/zenodo.901911 |