Этот пакет R предоставляет несколько простых функций для взаимодействия со службой RESTful API Matchbook.com. Перед использованием внимательно прочтите документацию по каждой отдельной функции. Для использования этого пакета необходима зарегистрированная учетная запись Matchbook.com. Пожалуйста, полностью прочтите документацию перед использованием.
Для установки пакета требуется библиотека devtools:
library(devtools)
install_github("xanadunf/matchbook")
Следующие две функции помогают при проверке сеанса учетной записи.
Следующие функции предоставляют возможность получить информацию о доступных видах спорта. Это предоставляет идентификаторы, которые Matchbook использует для каждого вида спорта. С их помощью вы можете получить все события по интересующим вас видам спорта. После этого вы можете получить идентификаторы рынка и идентификаторы бегунов для любого списка идентификаторов событий. Дополнительную информацию об этом смотрите в документации R.
I Следующую функцию можно использовать для получения подробной информации о любых ставках, которые были сделаны, но еще не рассчитаны. Можно получить как подробную информацию о непарных, так и совмещенных ставках. Дополнительную информацию см. в документации R (например, ? mb_get_bets).
Следующие функции обеспечивают основные функции ставок.
Чтобы получить подробную информацию о рассчитанных ставках, можно использовать следующую функцию. Опять же, полные параметры функции можно увидеть в документации R (?mb_get_setled).
Это должно помочь вам приступить к работе за очень короткое время, при условии, что вы выполнили предварительные условия. Давайте поставим цель в этом уроке сделать ставку на первую найденную нами футбольную игру, содержащую имя «человек». Мы продолжим делать ставку «за» в размере 5 евро (или в любой другой валюте вашего счета) на то, что команда хозяев выиграет игру сразу с коэффициентом 1,10.
Для начала вам необходимо войти в систему, используя учетные данные своей учетной записи Matchbook.com.
library(devtools)
install_github("xanadunf/matchbook")
library(matchbook)
username <- "my_user_name" ### replace with your username
password <- "verysafepassword" ### replace with your password
session_details <- mb_login(username,password)
Поскольку мы делаем ставки на футбол, нам необходимо узнать идентификатор этого вида спорта.
sport_id_data <- mb_get_sports(session_details)
sport_id_data
football_sport_id <- sport_id_data$id[which(sport_id_data$name=="Soccer")]
football_sport_id
Из результатов мы видим, что футбол имеет спортивный идентификатор = 15. Мы можем использовать это для получения любых футбольных событий с командой, содержащей строку «man».
event_data <- mb_get_events(session_data=session_details,sport_ids=football_sport_id)
event_data[grep(tolower("man"), tolower(event_data$name)),]
test_event_id <- event_data$id[grep(tolower("man"), tolower(event_data$name))[1]]
test_event_id
Очевидно, что в зависимости от того, когда вы это запустите, вы можете получить много результатов или не получить их. Если вы не нашли успешного результата, замените слово «мужчина» на название футбольной команды, которая, как вы знаете, скоро будет играть. Итак, давайте получим все рыночные данные для этого события. Поскольку мы хотим сделать ставку на исход матча, мы попытаемся выделить тип рынка «победитель один».
market_data <- mb_get_markets(session_data=session_details,event_id=test_event_id,include_runners=TRUE)
market_data
test_market_id <- market_data$id[market_data$'market-type'=="one_x_two"]
test_market_id
Теперь, когда у нас есть правильный рынок, давайте получим информацию обо всех бегунах на этом рынке. На этот раз мы включаем параметр «include_prices=TRUE», чтобы видеть, по какой цене доступен каждый бегун. Также давайте выберем бегуна из полученных данных.
runner_data <- mb_get_runners(session_data=session_details,event_id=test_event_id,market_id=test_market_id,include_prices=TRUE)
runner_data
test_runner_id <- runner_data$id[grep("man", runner_data$name,ignore.case=TRUE)]
test_runner_id
Теперь у нас есть подробная информация обо всех бегунах, давайте посмотрим на цены на бегуна, который мы выбрали.
prices_data <- runner_data$prices[[which(runner_data$id==test_runner_id)]]
prices_data_back <- prices_data[prices_data$side=="back",]
best_available_current_price <- min(prices_data_back$'decimal-odds') # min because we are backing, use the max if you are laying.
Теперь, когда мы нашли уровни цен, на которых мы можем вернуться (объем также доступен через «prices_data_back$'available-amount»), мы можем сделать ставку на выбранного нами участника.
mb_bet_place(session_data=session_details,runner_id=test_runner_id,side='back',stake=5,odds=1.10)
mb_get_bets(session_data=session_details)
Когда ставка сделана, важно проверить ее статус. Если статус «совпадает», значит, вам подошли по указанной цене. Если оно «открыто», то ставка не была полностью учтена. Более подробную информацию о сделанных ставках можно найти в документации: ?mb_bet_place.
mb_get_bets(session_data=my_session,runner_id=test_runner_id)
Этот пакет находится в стадии активной разработки, отзывы и предлагаемые улучшения приветствуются.
Пожалуйста, создайте проблему, используя область «Проблемы».
ПРОГРАММНОЕ ОБЕСПЕЧЕНИЕ ПРЕДОСТАВЛЯЕТСЯ «КАК ЕСТЬ», БЕЗ КАКИХ-ЛИБО ГАРАНТИЙ, ЯВНЫХ ИЛИ ПОДРАЗУМЕВАЕМЫХ, ВКЛЮЧАЯ, НО НЕ ОГРАНИЧИВАЯСЬ, ГАРАНТИЯМИ ТОВАРНОЙ ЦЕННОСТИ, ПРИГОДНОСТИ ДЛЯ ОПРЕДЕЛЕННОЙ ЦЕЛИ И НЕНАРУШЕНИЯ ПРАВ. НИ ПРИ КАКИХ ОБСТОЯТЕЛЬСТВАХ АВТОРЫ ИЛИ ОБЛАДАТЕЛИ АВТОРСКИХ ПРАВ НЕ НЕСУТ ОТВЕТСТВЕННОСТИ ЗА ЛЮБЫЕ ПРЕТЕНЗИИ, УБЫТКИ ИЛИ ДРУГУЮ ОТВЕТСТВЕННОСТЬ, БУДЬ В ДЕЙСТВИЯХ ПО КОНТРАКТУ, ПРАВОНАРУШЕНИЮ ИЛИ ДРУГИМ ОБРАЗОМ, ВОЗНИКАЮЩИЕ ОТ, ИЗ ИЛИ В СВЯЗИ С ПРОГРАММНЫМ ОБЕСПЕЧЕНИЕМ ИЛИ ИСПОЛЬЗОВАНИЕМ ИЛИ ДРУГИМИ СДЕЛКАМИ, ПРОГРАММНОЕ ОБЕСПЕЧЕНИЕ.