matchbook
1.0.0
Paket R ini menyediakan beberapa fungsi sederhana untuk mengaktifkan interaksi dengan layanan RESTful API Matchbook.com. Harap baca dokumentasi dengan cermat untuk setiap fungsi sebelum digunakan. Akun Matchbook.com terdaftar diperlukan untuk menggunakan paket ini. Harap baca dokumentasi sepenuhnya sebelum digunakan.
Untuk menginstal paket memerlukan perpustakaan devtools:
library(devtools)
install_github("xanadunf/matchbook")
Dua fungsi berikut membantu verifikasi sesi akun
Fungsi-fungsi berikut memberikan kemampuan untuk mendapatkan informasi tentang olahraga yang tersedia. Ini memberikan id yang digunakan Matchbook untuk setiap olahraga. Dengan ini, Anda bisa mendapatkan semua acara untuk olahraga yang Anda minati. Selanjutnya, Anda bisa mendapatkan id pasar dan id pelari untuk daftar id acara apa pun. Lihat dokumentasi R untuk detail selengkapnya tentang ini.
I Fungsi berikut dapat digunakan untuk mendapatkan rincian taruhan apa pun yang telah dipasang tetapi belum diselesaikan. Baik detail taruhan yang tidak cocok maupun yang cocok dapat diperoleh. Lihat dokumentasi R untuk detail lebih lanjut (mis. ? mb_get_bets)
Fungsi berikut menyediakan fungsionalitas taruhan inti.
Untuk mendapatkan rincian taruhan yang telah diselesaikan dapat digunakan fungsi berikut. Sekali lagi, parameter fungsi lengkap dapat dilihat di dokumentasi R (?mb_get_settled)
Ini akan membantu Anda memulai dan menjalankannya dalam waktu yang sangat singkat, dengan asumsi Anda telah memenuhi prasyarat. Mari kita tetapkan target dalam tutorial ini untuk memasang taruhan pada pertandingan sepak bola pertama yang kita temukan yang mengandung nama 'man'. Kami akan melanjutkan dengan memasang taruhan belakang sebesar 5 EUR (atau berapa pun mata uang akun Anda) pada tim tuan rumah untuk memenangkan pertandingan langsung dengan odds 1,10.
Untuk memulai, Anda harus masuk dengan kredensial akun Matchbook.com Anda.
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)
Karena kita bertaruh pada sepak bola, kita perlu mengetahui id olahraga tersebut.
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
Dari hasil tersebut terlihat bahwa sepak bola memiliki sport ID=15. Kita bisa menggunakan ini untuk mendapatkan acara sepak bola apa pun dengan tim yang berisi string '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
Tentu saja, tergantung kapan Anda menjalankan ini, Anda mungkin mendapatkan banyak hasil atau tidak sama sekali. Jika Anda tidak menemukan hasil yang sukses, tukarkan 'man' dengan nama tim sepak bola yang Anda tahu akan segera bermain. Jadi mari kita dapatkan semua data pasar untuk acara ini. Karena kami ingin bertaruh pada hasil pertandingan, kami akan mencoba mengekstraksi tipe pasar 'pemenang tunggal-menang'.
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
Sekarang kita memiliki pasar yang tepat, mari kita dapatkan informasi untuk semua pelari di pasar ini. Kali ini, kami menyertakan parameter 'include_prices=TRUE' sehingga kami dapat melihat harga yang tersedia untuk setiap pelari. Juga, mari pilih pelari dari data yang dihasilkan.
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
Sekarang kita sudah punya detail semua runnernya, mari kita dapatkan detail harga runner yang sudah kita pilih.
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.
Sekarang kita telah menemukan tingkat harga yang dapat kita kembalikan (volume juga tersedia melalui 'prices_data_back$'available-amount'') kita dapat memasang taruhan pada pelari yang telah kita pilih.
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)
Saat taruhan dipasang, penting untuk memeriksa status taruhan. Jika statusnya 'matched' maka Anda sudah match dengan harga yang diberikan. Jika 'terbuka' maka taruhan belum sepenuhnya cocok. Untuk rincian lebih lanjut tentang taruhan yang dipasang, lihat dokumentasi: ?mb_bet_place
mb_get_bets(session_data=my_session,runner_id=test_runner_id)
Paket ini sedang dalam pengembangan aktif dan masukan serta saran perbaikan sangat diharapkan.
Silakan buat masalah menggunakan area Masalah.
PERANGKAT LUNAK INI DISEDIAKAN "APA ADANYA", TANPA JAMINAN APA PUN, TERSURAT MAUPUN TERSIRAT, TERMASUK NAMUN TIDAK TERBATAS PADA JAMINAN KELAYAKAN UNTUK DIPERDAGANGKAN, KESESUAIAN UNTUK TUJUAN TERTENTU, DAN TIDAK ADA PELANGGARAN. DALAM KEADAAN APA PUN PENULIS ATAU PEMEGANG HAK CIPTA TIDAK BERTANGGUNG JAWAB ATAS KLAIM, KERUSAKAN, ATAU TANGGUNG JAWAB LAINNYA, BAIK DALAM TINDAKAN KONTRAK, HUKUM ATAU LAINNYA, YANG TIMBUL DARI, ATAU SEHUBUNGAN DENGAN PERANGKAT LUNAK ATAU PENGGUNAAN ATAU HAL-HAL LAIN DALAM PERANGKAT LUNAK.
