9 ответов в эту тему

[yall]

Приветствую уважаемые форумчане
Не знал в какую ветку отнести эту тему, решил сюда

Вообщем такая просьба , у кого есть возможность предоставить таблицу коридоров коэффициентов для исходов и фор ,
в виде коэф на П1 --- соответствующая фора , до +-4.5

Заранее благодарен

[Bambuk]

yall, on 14 October 2015 - 09:46, сказал:

Приветствую уважаемые форумчане
Не знал в какую ветку отнести эту тему, решил сюда

Вообщем такая просьба , у кого есть возможность предоставить таблицу коридоров коэффициентов для исходов и фор ,
в виде коэф на П1 --- соответствующая фора , до +-4.5

Заранее благодарен

в виде коэф на П1 --- соответствующая фора ....ТАКОГО СООТВЕТСТВИЯ НЕТ (только приближённо)...так как влияет тотал.

Само понятие форы тоже надо как-то ввести. Его можно ввести двумя способоми---например считать форой -- преимущество по голам на дистанции тогда суть фора это МО1-МО2 (тогда БК по идее дать должна с противоположным знаком чтоб выравнить шансы) а за МО взять оценки БК из которой они считают кефы линий. Но можно взять именно фору как ставку с близкими к 2 кефами ---тогда будет градация в 0.25 а не непрерывное значение (как мо1-мо2). Сами-то МО можно определить--например как Сектор писал но можно например и через приближение к линии 1Х2 и ТМ2.5


вот функция которая может на часть матчей это сделать (копируйте все функции и пихайте в модуль VBA )

Function Fmnz(ByVal M1 As Double, ByVal M2 As Double, ByVal K1 As Double, ByVal KX As Double, ByVal K2 As Double, ByVal KTM As Double)

Dim p10, p11, p12, p13, p14, p15, p16, p17, p18 As Double
Dim p20, p21, p22, p23, p24, p25, p26, p27, p28 As Double
Dim PW1, PWX, PW2, PWTM, R_prom As Double
p10 = Exp(-M1)
p11 = M1 * Exp(-M1)
p12 = M1 ^ 2 * Exp(-M1) / 2
p13 = M1 ^ 3 * Exp(-M1) / 6
p14 = M1 ^ 4 * Exp(-M1) / 24
p15 = M1 ^ 5 * Exp(-M1) / 120
p16 = M1 ^ 6 * Exp(-M1) / 720
p17 = M1 ^ 7 * Exp(-M1) / 5040
p18 = M1 ^ 8 * Exp(-M1) / 40320
p20 = Exp(-M2)
p21 = M2 * Exp(-M2)
p22 = M2 ^ 2 * Exp(-M2) / 2
p23 = M2 ^ 3 * Exp(-M2) / 6
p24 = M2 ^ 4 * Exp(-M2) / 24
p25 = M2 ^ 5 * Exp(-M2) / 120
p26 = M2 ^ 6 * Exp(-M2) / 720
p27 = M2 ^ 7 * Exp(-M2) / 5040
p28 = M2 ^ 8 * Exp(-M2) / 40320
PW1 = p18 * (p20 + p21 + p22 + p23 + p24 + p25 + p26 + p27) _
+ p17 * (p20 + p21 + p22 + p23 + p24 + p25 + p26) _
+ p16 * (p20 + p21 + p22 + p23 + p24 + p25) _
+ p15 * (p20 + p21 + p22 + p23 + p24) _
+ p14 * (p20 + p21 + p22 + p23) _
+ p13 * (p20 + p21 + p22) _
+ p12 * (p20 + p21) _
+ p11 * p20
PWX = p10 * p20 + p11 * p21 + p12 * p22 + p13 * p23 + p14 * p24 + p15 * p25 + p16 * p26 + p17 * p27 + p18 * p28
PW2 = 1 - PW1 - PWX
PWTM = p10 * p20 + p11 * p20 + p10 * p21 + p11 * p21 + p12 * p20 + p10 * p22
Fmnz = 1.5 * (1 - 1 / K1 / PW1) ^ 2 + 2 * (1 - 1 / KX / PWX) ^ 2 + (1 - 1 / K2 / PW2) ^ 2 + 2 * (1 - 1 / KTM / PWTM) ^ 2
End Function

Function NURMOD(ByRef rah1 As Range, ByRef rahx As Range, ByRef rah2 As Range, ByRef rahtm As Range, Optional VolatileOn As Boolean = True) As Variant
Application.Volatile VolatileOn
Set Win1 = rah1
Set HX = rahx
Set Win2 = rah2
Set TM = rahtm
Dim ax, bx, ay, by As Variant
Dim i, j, N, A, B As Integer
Dim X1, X2, Y1, Y2 As Double
Dim Ex, Ey, E, R1, R2 As Double
Dim REZ(1) As Double
ax = 0.2
bx = 5.2
ay = 0.1
by = 5.1
E = 0.0001
KX = HX.Value
KTM = TM.Value
N = 4

Ey = 1
Ex = 1
If Win1.Value < Win2.Value Then
K1 = Win1.Value
K2 = Win2.Value
Else
K1 = Win2.Value
K2 = Win1.Value
End If
R2 = Fmnz(5, 5, K1, KX, K2, KTM)
Do While Ex > E Or Ey > E
i = 0
j = 0

For A = 0 To N
Ex = (bx - ax) / N
X1 = ((ax + bx) + j * Ex) / 2
R1 = Fmnz(X1, Y2, K1, KX, K2, KTM)
If R2 > R1 Then
R2 = R1
X2 = X1
End If
X1 = ((ax + bx) - j * Ex) / 2
R1 = Fmnz(X1, Y2, K1, KX, K2, KTM)
If R2 > R1 Then
R2 = R1
X2 = X1

End If
i = i + 1

Ey = (by - ay) / N
Y1 = ((ay + by) - j * Ey) / 2
R1 = Fmnz(X2, Y1, K1, KX, K2, KTM)
If R2 > R1 Then
R2 = R1
Y2 = Y1
End If
Y1 = ((ay + by) + j * Ey) / 2
R1 = Fmnz(X2, Y1, K1, KX, K2, KTM)
If R2 > R1 Then
R2 = R1
Y2 = Y1
End If

j = j + 1

Next A
ax = X2 - Ex
bx = X2 + Ex
ay = Y2 - Ey
by = Y2 + Ey
Loop
If Win1.Value < Win2.Value Then
REZ(0) = X2
REZ(1) = Y2
Else
REZ(0) = Y2
REZ(1) = X2
End If
NURMOD = REZ

End Function


Function POIS_BAMBU(ByRef rah1 As Range, ByRef rah2 As Range, ByVal rah3 As Integer, Optional VolatileOn As Boolean = True) As Variant
Application.Volatile VolatileOn
Set MO1 = rah1
Set MO2 = rah2
Dim FUNC As Integer
Dim M1, M2 As Double
Dim p10, p11, p12, p13, p14, p15, p16, p17, p18 As Double
Dim p20, p21, p22, p23, p24, p25, p26, p27, p28 As Double
Dim REZ As Double
FUNC = rah3
M1 = MO1.Value
M2 = MO2.Value
p10 = Exp(-M1)
p11 = M1 * Exp(-M1)
p12 = M1 ^ 2 * Exp(-M1) / 2
p13 = M1 ^ 3 * Exp(-M1) / 6
p14 = M1 ^ 4 * Exp(-M1) / 24
p15 = M1 ^ 5 * Exp(-M1) / 120
p16 = M1 ^ 6 * Exp(-M1) / 720
p17 = M1 ^ 7 * Exp(-M1) / 5040
p18 = M1 ^ 8 * Exp(-M1) / 40320
p20 = Exp(-M2)
p21 = M2 * Exp(-M2)
p22 = M2 ^ 2 * Exp(-M2) / 2
p23 = M2 ^ 3 * Exp(-M2) / 6
p24 = M2 ^ 4 * Exp(-M2) / 24
p25 = M2 ^ 5 * Exp(-M2) / 120
p26 = M2 ^ 6 * Exp(-M2) / 720
p27 = M2 ^ 7 * Exp(-M2) / 5040
p28 = M2 ^ 8 * Exp(-M2) / 40320
If FUNC = 1 Then
REZ = p18 * (p20 + p21 + p22 + p23 + p24 + p25 + p26 + p27) _
+ p17 * (p20 + p21 + p22 + p23 + p24 + p25 + p26) _
+ p16 * (p20 + p21 + p22 + p23 + p24 + p25) _
+ p15 * (p20 + p21 + p22 + p23 + p24) _
+ p14 * (p20 + p21 + p22 + p23) _
+ p13 * (p20 + p21 + p22) _
+ p12 * (p20 + p21) _
+ p11 * p20
ElseIf FUNC = 2 Then
REZ = p10 * p20 + p11 * p21 + p12 * p22 + p13 * p23 + p14 * p24 + p15 * p25 + p16 * p26 + p17 * p27 + p18 * p28
Else
REZ = p10 * p20 + p11 * p20 + p10 * p21 + p11 * p21 + p12 * p20 + p10 * p22
End If
POIS_BAMBU = REZ

End Function






Вводится как формула для массивов сразу в две выделенные ячейки листа ексель (по аналогии с функцией типа ТРАНСП()….)
{=NURMOD(BK2;BL2;BM2;CV2)}
Указываете адреса яч где кефы П1 Х П2 и ТМ2.5
Но тут желательно маржу убрать ну примитивно только в кефах 1Х2 можно---выделить ещё ячейки и там умножить на 1.06 1.09 и 1.07 соответственно кефы линии 1Х2 и вот их пихать
Расчёт потом немного занижает кефф ТМ но можно допустим умножить там на 1.04 ТМ кефф

Восстанавливаем линию для проверки

К1=(1/POIS_BAMBU(CW2;CX2;1))/1,06

POIS_BAMBU—возвращает вероятности в зависимости от 1, 2 или 3 в функции
1-Р1
2-РХ
3-Р_ТМ2.5


CW2;CX2—это ячейки где МО1 МО2

С маржой там дело вот в чём—БК закладывает разное знач. в % в зависимости от кефа на П1 по идее
На оч малые там тупо 2-3% а допустим на 1.8 уже 6% ну итд…по идее там можно поточнее через линейную функцию сделать но для фор это не обязательно
А дальше можете в в POIS_BAMBU—прописать ваши форы да и всё….

Р2 разумеется это 1-Р1-РХ
а Р_ТБ=1-Р_ТМ

Отредактировано Bambuk, 14 October 2015 - 12:38.

[Noname]

yall, on 14 October 2015 - 09:46, сказал:

Приветствую уважаемые форумчане
Не знал в какую ветку отнести эту тему, решил сюда

Вообщем такая просьба , у кого есть возможность предоставить таблицу коридоров коэффициентов для исходов и фор ,
в виде коэф на П1 --- соответствующая фора , до +-4.5

Заранее благодарен

Лови вот такую штучку
https://yadi.sk/d/UA-9AtIHjjQL3

Не совсем то, что ты просил и на первый взгляд довольно страшное чудо-юдо.
Но, если освоишь его, вполне подойдет под твою задачу

[Bambuk]

В небо голову задрав, я машу Вам не один.....
Журавли над лагерем...---радостная весть...
Птицы, бедолаги Вы не садитесь здесь......

Товарищи.....поймите простую веЩь---что знают двое--знает и свинья.....надеяться что будет ++++ ---есть такая птица "НАИВНЯК"которая живёт на ивах, наверно......

[Noname]

Bambuk, on 14 October 2015 - 15:54, сказал:

В небо голову задрав, я машу Вам не один.....
Журавли над лагерем...---радостная весть...
Птицы, бедолаги Вы не садитесь здесь......

Я тоже очень люблю японскую поэзию
По теме могу сказать:
" В маленьком моем доме
комары почти не кусают.
Вот и все угощение для друга"

Отредактировано Noname, 14 October 2015 - 16:53.

[Staller]

П

оза, где женщина сверху

Меня вдохновила сегодня

Побелить потолок.

[Noname]

Staller, on 14 October 2015 - 19:12, сказал:

П

оза, где женщина сверху

Меня вдохновила сегодня

Побелить потолок.

А вот тут ты соврал
У меня на вилле потолки мраморные

[alexandr201]

Может человек имел ввиду баскетбол. То тут еще зависит от бк и самого матча.

[Председатель]

Noname, on 14 October 2015 - 19:47, сказал:

А вот тут ты соврал
У меня на вилле потолки мраморные

Кто сказал что нельзя побелить мраморный потолок?
...а потом нарисовать на нем "таблицу коридоров коэффициентов для исходов и фор" ...

[Noname]

Пакет, on 18 October 2015 - 12:30, сказал:

Кто сказал что нельзя побелить мраморный потолок?
...а потом нарисовать на нем "таблицу коридоров коэффициентов для исходов и фор" ...

Да! Об этом я как-то не подумал