AMMORTIZZATORI DEL RITARDO

[AndyLotto]

Ciao Mike, lo script che hai realizzato è molto completo dal punto di vista delle informazioni ma forse fuorviante per l'obiettivo preposto. L'immagine postata da kondor13 è molto esplicativa da questo punto di vista. Altro non è che una semplificazione di quella prodotta dal tuo script.
Provo a ripercorrere l'esempio che ho postato inserendo il meccanismo di generazione della scala A, con la speranza di riuscire a darti input più precisi:

All'estrazione di 08.10.2015 si aveva.

Ru Nu RP RC
GE 45 23 81
FI 05 15 96
PA 29 13 67
MI 41.71 11 81
VE 87 10 88
TO 61 6 75
NA 70 4 62
BA 63 2 61
CA 29 1 60
RO 1 0 57

Dopo 2 estrazioni escono il 61 su TO e il 63 su BA, rispettivamente 6° e 8° della classifica; la nuova classifica al 13.10 sarà:

Ru Nu RP RC
GE 45 25 83
FI 5 17 98
PA 29 15 69
MI 41.71 13 83
VE 87 12 90
NA 70 6 64
CA 29 3 62
RO 1 2 59
TO 25 0 72 6
BA 23 0 62 8

Da sottolineare che tra TO e BA viene prima quello a più alto RC.
Passa una sola estrazione ed esce il 23 su Bari, 10° in classifica;quindi al 15.10.2015 il nuovo aggiornamento sarà:

Ru Nu RP RC
GE 45 26 84
FI 05 18 99
PA 29 16 70
MI 41.71 14 84
VE 87 13 91
NA 70 7 65
CA 29 4 63
RO 1 3 60
TO 25 1 73 6
BA 17 0 60 10

Il 17.10 altro avvicendamento dopo solo un colpo, con l'uscita del 29 su Cagliari, 7° della classifica, quindi:

Ru Nu RP RC
GE 45 27 85
FI 05 19 100
PA 29 17 71
MI 41.71 15 85
VE 87 14 92
NA 70 8 66
RO 1 4 61
TO 25 2 74 6
BA 17 1 61 10
CA 62 0 60 7

Passa un'altra estrazione ed esce il 45 su Genova, 1° in classifica. Nuova classifica al 20.10:

Ru Nu RP RC
FI 05 20 101
PA 29 18 72
MI 41.71 16 86
VE 87 15 93
NA 70 9 67
RO 1 5 62
TO 25 3 75 6
BA 17 2 62 10
CA 62 1 61 7
GE 19 0 71 1

Ed ecco al 22.10 altro bel rimpasto; dopo un'estrazione esce l'1 su Roma, 6° in classifica.

Ru Nu RP RC
FI 05 21 102
PA 29 19 73
MI 41.71 17 87
VE 87 16 94
NA 70 10 68
TO 25 4 76
BA 17 3 63 10
CA 62 2 62 7
GE 19 1 72 1
RO 2 0 56 6

Al 30/10 nessuna uscita, quindi classifica aggiornata solo per il +3 di RP e RC:

Ru Nu RP RC
FI 05 24 105
PA 29 22 76
MI 41.71 20 90
VE 87 19 97
NA 70 13 71
TO 25 7 79
BA 17 6 66 10
CA 62 5 65 7
GE 19 4 75 1
RO 2 3 59 6


L'ultima colonna che si sta formando è quella della scala A che segnala la caduta dei vari capilista.
Se non dovesse bastare, inizio il conteggio a mano più a ritroso, riuscendo così a ricostruire tutta la scala A come è oggi, dopo l'estrazione di ieri sera:

Ru Nu RP RC A
FI 05 24 105 2
PA 29 22 76 4
MI 41.71 20 90 9
VE 87 19 97 3
NA 70 13 71 5
TO 25 7 79 8
BA 17 6 66 10
CA 62 5 65 7
GE 19 4 75 1
RO 2 3 59 6

Spero questa volta di essere riuscito a darti le giuste informazioni.
Una nota aggiuntiva non indifferente. Nel caso esca il 41 o il 71 su Milano, la classifica non muta. La regola seguita infatti è che si cambia solo in caso di sortita del singolo estratto (eventualmente rimasto).

 

[pfca]

Un saluto a tutti, per LottoMusic, la tua spiegazione mi sembra errata, la scala A si comporta differentemente
rispetto a quanto da te esposto, se riesco a trovare un pò di tempo, posterò quanto sò in base a quanto letto.
Francesco

 

[AndyLotto]

Più occhi sono meglio di 2...ma ritengo con ragionevole certezza di conoscere il meccanismo di formazione della scala A. Se comunque a te non torna qualcosa, i confronti servono proprio a questo.

 

[pfca]

Un saluto, purtroppo non riuscendo a trovare dei vecchi appunti sugli Ammortizzatori del Ritardo,
preferisco evitare di esporre qualcosa di errato, chiedo scusa per l'intervento.
Francesco

 

[AndyLotto]

Nessuna scusa! Il confronto è sempre ben accetto
Per quel che è nelle mie modeste conoscenze, la strada intrapresa dallo script creato da Mike58 sembra essere quella giusta.
Quel che serve ora è poter eliminare dall'output le estrazioni che non danno esito e riuscire a inserire una colonna riportante quale riga, e dunque quale posizione della scala A, sortisce di volta in volta.

 

[AndyLotto]

[x Mike58] Ho cercato di modificare il tuo (splendido!) script ma senza successo. Avrei voluto avere un output testuale, o comunque poter avere tutto l'intervallo di statistica analizzato. Per come invece è stato fatto, riesco a farlo solo a video. Salvando infatti i dati con l'opzione "excel" mi trovo solo i risultati dell'estrazione che vedo a video. Sbaglio io qualcosa oppure no? Complimenti ancora per lo script

 

[Mike58]

Ciao Lottomusic, come vedi lo script è in tabellaOrdinabile e consente di esportare in Excel la sola estrazione desiderata, si può ovviare a questo
1- scrivendo il tutto per l'output in formato txt.ma mi manca la voglia ed il tempo.
2 -rendendo la tabella normale sostituendo l'ultima riga CreaTabellaOrdinabile con la sola Creatabella e cosi avrai la tabella senza output formato Excel, fatto ciò,copia ed incolla l'output ottenuto in un foglio Excel.

Niente di + semplice, poi se proprio ti serve la strada è quella di eliminare la scrittura in tabella e riscirivere le righe di sola scrittura in formato txt.

Prova a vedere se riesci.

Ciao

 

[AndyLotto]

Non è stata proprio un passeggiata (per me!), ma alla fine credo di essere riuscito a ricreare lo schema che dovrebbe portare alla costituzione della scala A. Almeno manualmente.
Ho cercato di "asciugare" l'eccellente script fatto da Mike58 per cercare di rendere più snello e controllabile il tutto.

Ora rimarrebbero 2 problemucci da risolvere:

1) nel caso di sortita contemporanea, l'ordinamento dovrebbe seguire l'ordine decrescente per RC.
Tanto per fare un esempio, alla 122 escono i 2 estratti su Torino e Bari ma all'estrazione successiva, proprio per costituire in modo corretto la scala A (anche manualmente ripeto), è necessario che le ruote si posizionino secondo RC, quindi prima Torino e poi Bari, mentre sembra che il tutto si svolga alfabeticamente.

2) dopo la sortita di uno o più estratti (diciamo all'estrazione n) è necessario che alla successiva (n+1) nell'apposita colonna, venga riportata la riga corrispondente alla ruota. Ovvero la Scala A. All'estrazione di sabato escono come da prospetto Firenze, Torino e Roma, quindi riga 1, riga 6 e riga 9 che, ordinate con RC decrescente portano a 6, 1 e 9

Option Explicit
Sub Main

Dim ruo(1),num(2),nu(1),num2(1),qt,Ini,fin,fine,es,r,k,k2,rit,rit2
Dim ritmax,freq,freq2,incrritmax,incrritmax2,ritmax2,estratti,estratti2,nliv,prit

qt = 5 'CInt(InputBox("QUANTE ESTRAZIONI A RITROSO",,5))
Ini = EstrazioneIni
fin = EstrazioneFin - 1
fine = EstrazioneFin

'For es = fine To EstrazioneFin - qt Step - 1
For es = 9066 To EstrazioneFin

ReDim atitoli(5)

atitoli(1) = " Ruota "
atitoli(2) = " Num "
atitoli(3) = " RP "
atitoli(4) = " RC "
atitoli(5)= GetInfoEstrazione(es)

Call InitTabella(atitoli,,,4,1)

For r = 1 To 10

For k = 1 To 90

ruo(1) = r

num(1) = k

'num(2) = k

If k = NumeroPosRit(es,r,1) Then

k2 = NumeroPosRit(es,r,2)

nu(1) = k2' = NumeroPosRit(es,r,2)

Call StatisticaFormazioneTurbo(num,ruo,1,rit,ritmax,incrritmax,freq,Ini,es)
Call StatisticaFormazioneTurbo(nu,ruo,1,rit2,ritmax2,incrritmax2,freq2,Ini,es)
Call VerificaEsitoTurbo(num,ruo,es + 1,1,1,,,,estratti)
Call VerificaEsitoTurbo(nu,ruo,es + 1,1,1,,,,estratti2)

ReDim avalori(5)

avalori(1) = NomeRuota(r)

If rit = rit2 Then avalori(2) = k & "." & nu(1)

If rit <> rit2 Then avalori(2) = k

avalori(4) = rit

avalori(3) = RitPosCrono(k,r,es)


If rit = rit2 Then avalori(5) = estratti & estratti2

If rit <> rit2 Then avalori(5) = estratti


Call AddRigaTabella(avalori,,,3)

Call SetColoreCella(2,,2)

Call SetColoreCella(4,,7)

End If

Next

Messaggio "Ruota: " & Format2(r) & ", Numero: " & prit & " Estrazione " &es

Call AvanzamentoElab(1,11,r)

If ScriptInterrotto Then Exit For

Next

CreaTabella(3)

Next
Call PicEsegui
End Sub

Qualche idea?

 

[Joe91]

Buoa sera a tutte/i.

Penso si sia riassunto abbastanza bene ...

ritrovando almeno per sommi capi le linee guida della procedura.

Quindi salvo smentite penso si siano individuati 5 parametri da considerare:

Data / Ruota / Ritardatario / Ritardo / Ritardo Relativo.

Chiaro che la data sarà pre-determinata dal crescere dell'archivio ...

sino a quella ultima in cui si ha la formazione ed il completamento della graduatoria.

Cioè della cosiddetta "Scala A". (Tralasciando per adesso quella "B")

Il mio parere è che pima di considerare le eccezioni ... (isocroni / doppi ... ecc)

si debba individuare il percorso ed il giusto evolvere di codesta scala.

Per questo scopo, reputo anche utile uniformarsi ai dati già evidenziati

e presenti in alcuni siti specializzati ... dai quali sarà possibile ricavare

i "confronti" utili a convalidare questa procedura di calcolo.

Cioè propongo di conteggiare tutti i Ritardi con la stessa metodologia allineandosi a +/- 1 esistenti ...

per non avere risultati costantemente (ed inevitabilmente) diversi.

Quindi ... chi se la sente dovrebbe formulare una descrizione del "come si forma" codesta Scala A ...

Salvo poi, in ultimo, avendo tracciato il percorso (o perlomeno ... uno dei possibili percorsi)

si possa modificare o scrivere le eventuali correzioni alla procedura.

 

[AndyLotto]

Buonasera Joe, pensavo a dire il vero che gli esempi riportati fossero già esaustivi del meccanismo di come si forma la scala A. Se così non fosse, ci riprovo ora, prendendo come riferimento un'estrazione n. Dopo tale estrazione creiamo una tabella utilizzando i parametri da te elencati: ruota, ritardatario, rp, rc. Ordiniamo la tabella x rp in ordine decrescente.

Analizziamo l'estrazione n+1 e vediamo se qualche ritardatario sortisce. Se ciò non accade passiamo all'estrazione successiva n+2. O comunque arriviamo alla prima estrazione utile per cui si avrà la sortita di uno o più ritardatari. Nel frattempo i contatori rc e rp si incrementeranno di tante unità quante sono state le estrazioni senza sortita. Quando si avrà la sortita, vediamo a ke riga delle 10 si trovava l'estratto ritardatario. Il numero di riga è il valore da riportare nella scala A. E così si prosegue.

Pensavo l'iter riportato negli esempi precedenti fosse già chiaro e definito. Ci fossero dubbi sono qui.

 

[Joe91]

Ok ... grazie.

Avevo visto anche un intervento Francesco che non ho avuto il tempo di leggere e memorizzare,

comunque sia ... vi ringrazio per la cortesia, sperando di poterci ricavare qualcosa di utile.

 

[AndyLotto]

Io purtroppo sono molto ma molto limitato nella programmazione. Il mio apporto è pressoché nullo ahimè. Riesco ad adeguare eventuali script o a integrarli a livello formale. Nulla di più. Scusatemi.

 

[Joe91]

Io purtroppo sono molto ma molto limitato nella programmazione. Il mio apporto è pressoché nullo ahimè. Riesco ad adeguare eventuali script o a integrarli a livello formale. Nulla di più. Scusatemi.

Ciao Lottomusic.

Secondo me non è un problema e non servono scuse. Tutti abbiamo dei limiti.

Penso sia anche un bene saperli individuare per stabilirne i confini. Esserne coscienti.

Ciò premesso, il redigere il codice per questa statistica,

avendo già scritto quello per generare l'archivio dinamico ed altri simili ... reputo, mi sia possibile.

Ma ... avendo ricevuto nel tempo "imput" spesso differenti tra loro ...

stavo tentando di capire quale "descrizione" potesse essere il più corrispondente al progetto iniziale.

Questo per evitare di orientare i dati ad un risultato che poi risulterebbe differente ... da quello voluto.

 

[Joe91]

Ho predisposto un simulatore di cui propongo l' output.

Parte con una graduatoria ordinata e ... in essa, a caso,

viene simulata l'estrazione di "un ritardatario" (cominciando dal numeretto 4 poi il 9°, il 5°, il 2°, l' 8° ritardatario ecc ...)

Sicchè questo "quarto" ritardatario viene retrocesso ... al 1° gradino della scala (diventa 1) ... mentre ...

TUTTI gli altri ritardatari sono trattati ... selettivamente ... affinchè si occupi ... lo spazio rimasto vuoto.

Questo avviene ... per riqualificazione considerando la posizione di TUTTI i (10) capolista.

Di questi però, solo alcuni, cioè quelli più piccoli, avanzano nella graduatoria.

Dunque dopo una "tot" di estrazioni ... anche l'ultimo (10) può arrivare ad occupare il primi "gradini" della scala.

4
   1   2   3   0   5   6   7   8   9  10
   2   3   4   1   5   6   7   8   9  10
9
   2   3   4   1   5   6   7   8   0  10
   3   4   5   2   6   7   8   9   1  10
5
   3   4   5   2   0   7   8   9   1  10
   4   5   6   3   1   7   8   9   2  10
2
   4   0   6   3   1   7   8   9   2  10
   5   1   6   4   2   7   8   9   3  10
8
   5   1   6   4   2   7   8   0   3  10
   6   2   7   5   3   8   9   1   4  10
8
   6   2   7   5   3   8   9   0   4  10
   6   2   7   5   3   8   9   1   4  10
9
   6   2   7   5   3   8   9   1   0  10
   6   3   7   5   4   8   9   2   1  10
8
   6   3   7   5   4   8   9   0   1  10
   6   3   7   5   4   8   9   1   2  10
8
   6   3   7   5   4   8   9   0   2  10
   6   3   7   5   4   8   9   1   2  10
2
   6   0   7   5   4   8   9   1   2  10
   6   1   7   5   4   8   9   2   3  10
1
   0   1   7   5   4   8   9   2   3  10
   1   2   7   6   5   8   9   3   4  10
7
   1   2   7   6   5   8   0   3   4  10
   2   3   8   7   6   9   1   4   5  10
5
   2   3   8   7   0   9   1   4   5  10
   3   4   8   7   1   9   2   5   6  10
8
   3   4   8   7   1   9   2   0   6  10
   4   5   8   7   2   9   3   1   6  10
3
   4   5   0   7   2   9   3   1   6  10
   5   6   1   8   3   9   4   2   7  10
10
   5   6   1   8   3   9   4   2   7   0
   6   7   2   9   4  10   5   3   8   1
4
   6   7   2   0   4  10   5   3   8   1
   7   8   3   1   5  10   6   4   9   2
2
   7   0   3   1   5  10   6   4   9   2
   8   1   4   2   6  10   7   5   9   3
1
   0   1   4   2   6  10   7   5   9   3
   1   2   5   3   7  10   8   6   9   4
3
   1   2   0   3   7  10   8   6   9   4
   2   3   1   4   7  10   8   6   9   5
8
   2   3   1   4   7  10   8   0   9   5
   3   4   2   5   7  10   8   1   9   6
7
   3   4   2   5   7  10   0   1   9   6
   4   5   3   6   8  10   1   2   9   7
8
   4   5   3   6   8  10   1   0   9   7
   4   5   3   6   8  10   2   1   9   7
3
   4   5   0   6   8  10   2   1   9   7
   4   5   1   6   8  10   3   2   9   7
7
   4   5   1   6   8  10   0   2   9   7
   4   5   2   6   8  10   1   3   9   7
10
   4   5   2   6   8  10   1   3   9   0
   5   6   3   7   8  10   2   4   9   1
9
   5   6   3   7   8  10   2   4   0   1
   6   7   4   8   9  10   3   5   1   2
2
   6   0   4   8   9  10   3   5   1   2
   7   1   5   8   9  10   4   6   2   3
2
   7   0   5   8   9  10   4   6   2   3
   7   1   5   8   9  10   4   6   2   3
3
   7   1   0   8   9  10   4   6   2   3
   7   2   1   8   9  10   5   6   3   4
7
   7   2   1   8   9  10   0   6   3   4
   7   3   2   8   9  10   1   6   4   5
2
   7   0   2   8   9  10   1   6   4   5
   7   1   3   8   9  10   2   6   4   5
6
   7   1   3   8   9   0   2   6   4   5
   8   2   4   9  10   1   3   7   5   6
6
   8   2   4   9  10   0   3   7   5   6
   8   2   4   9  10   1   3   7   5   6
7
   8   2   4   9  10   1   0   7   5   6
   8   3   4   9  10   2   1   7   5   6
9
   8   3   4   9  10   2   1   7   0   6
   8   4   5   9  10   3   2   7   1   6
10
   8   4   5   9  10   3   2   7   1   0
   8   5   6   9  10   4   3   7   2   1
6
   8   5   6   9  10   0   3   7   2   1
   8   5   6   9  10   1   4   7   3   2
5
   8   5   6   9   0   1   4   7   3   2
   9   6   7  10   1   2   5   8   4   3
8
   9   6   7  10   1   2   5   0   4   3
   9   7   8  10   2   3   6   1   5   4
7
   9   7   8  10   2   3   0   1   5   4
   9   7   8  10   3   4   1   2   6   5
7
   9   7   8  10   3   4   0   2   6   5
   9   7   8  10   3   4   1   2   6   5
4
   9   7   8   0   3   4   1   2   6   5
  10   8   9   1   4   5   2   3   7   6
5
  10   8   9   1   0   5   2   3   7   6
  10   8   9   2   1   5   3   4   7   6

Attendo duque di conoscere, gli eventuali commenti ... al riguardo.

Cordiali saluti

 

[AndyLotto]

Ciao joe91, meccanismo ineccepibile. Se l'ordinamento attuato è riconducibile al ritardo di posizione, direi lavoro eccezionale.

 

[pfca]

Un saluto a tutti, scusate il mio intervento ma la sensazione, posso aver capito male è differente.
Joe scrive: Sicchè questo "quarto" ritardatario viene retrocesso ... al 1° gradino della scala (diventa 1)
per quanto sò io dovrebbe diventare 10 nella scala A, per cui la nuova scala sarebbe:
esce il 4° 1 2 3 4 5 6 7 8 9 10 dopo 1 2 3 10 4 5 6 7 8 9
esce il 9° 1 2 3 10 4 5 6 7 8 9 dopo 1 2 3 9 4 5 6 7 8 10
Per joe, puoi anche partire come hai fatto da una prima scala in base al ritardo,
poi una volta usciti tutti e 10 i ritardi la scala si sarà allineata a quanto dovrebbe
essere.
Francesco

 

[AndyLotto]

Ciao, ho notato anch'io ma credo sia solo un problema di ordinamento. E per il fatto che manca un contatore "ritardo" che restituisca una fotografia realistica dei movimenti.

 

[Joe91]

Buon giorno a tutte/i.

Vi ringrazio e confermo per vere le impressioni che avete riportato.

Si, l'ordine qui è inverso. Del resto comunemente l'ultimo di 10 ... è il decimo.

Dunque chi finisce ultimo dovrebbe avere come "distintivo" il numero 10

piuttosto che ... il numero "1".

Ma non è questo!

Il problema è molto piu complicato ... per questa "eccezione" bastrebbe girare la scala.

Dicevo: la descrizione è incompleta.

Poi ... questa graduatoria si applica bene a qualsiasi cosa non lottologica

(dalla formula1 ... alla staffetta passando per la roulette) qui invece, farebbe disastri.

Dunque proprio perchè funziona ... non va bene!

Ovvero fa cose molto "diverse" da quelle volute.

Mi riservo dunque di riferire appena ci saranno sviluppi.

Cordiali saluti.

 

[AndyLotto]

Ciao joe91, credo sia utile forse rispiegare da parte mia passo dopo passo il procedimento che porta alla formazione della scala A. Sfruttero' il tuo schema passo passo, usando la simulazione dei tuoi ritardatari ma andando a creare la scala in modo corretto. Non ora purtroppo perché non sto scrivendo dal PC abituale.

 

[Joe91]

Ciao Lottomusic, ti ringrazio.

Vedi ... il vero problema, è che nel lotto non si costruisce, una graduatoria in "tempo reale"

per cui appena un numero viene estratto questa graduatoria si modifica ...

e si creano ripercussioni su tutto il resto che sarà a seguire.

Ma nello stesso "quadro estrazionale" (cioè nella stessa estrazione) possono cadere

Zero tanto come 1 / 2 / 4 / 5 o più ritardatari.

E ... nel lotto ... la graduatoria, si modifica solo dopo che sono estratte tutte le 10 ruote.

(Per 11 ruote cambia tutto ed è ancora diverso. Bisogna attendere anche i risultati della Nazionale)

Quindi lo script che ho utilizzato ... è giusto di per sè ...funziona per tutto il resto

ma non funziona per il lotto.

Se vuoi descrivere ... non c'è problema. Sarà utile a tutti.

Ma sintetizzare una buona soluzione ... non è semplicissimo.

Giusto per questo ... da qualche tempo sto organizzando un algoritmo che mi soddisfi.

Siccome vorrei che esso fosse, anche, efficiente, oltre che funzionante,

anche per evitare di "lasciare giù" molti script ... sbagliati e quindi inutili o dannosi ...

mi sono riservato il tempo necessario per organizzarlo.

E' una bella sfida ... che penso di saper superare.

(Avendo già proposto e suggerito lo schema necessario per redigere una soluzione)