INNOVATIVA RICERCA STATISTICA

numerico · 19 Settembre 2016

Beppignello Nello scrpt relativo al 10 e lotto, se optiamo per ''x'' numeri anziché ''0'' per tutti, l'output non dà alcun risultato. Cosa voluta o bug dello script? Grazie per il notevole contributo che stai dando.

numerico · 19 Settembre 2016

inoltre se l'ampiezza dell'archivio, la riduco a 5 estrazioni (dato che 4,5 è il ciclo teorico) lo script mi dà un errore

Beppignello · 19 Settembre 2016

ciao Numerico

la riga d'istruzione dello script, rende chiaro lo scopo:

lo script esegue per i 90 nr. la statistica ed accorpa e conta per ritardo e per frequenza
i numeri con medesima doppia sincronia

così, come per lo scrip precedente, quello del lotto, abbiamo la possibilità di parzializzare
le eventuali combinazioni con un tot.minimo di numeri in sincronia doppia in output.

facciamo la scelta rispondendo diversamente a questa domanda:
yz = CInt(InputBox("Vuoi combinazioni composta da n.Numeri? 0=Tutti ",,0))

> 0 = tutti, ci da una visione totale del ritardo/frequenza di tutti i 90(anche singoli numeri)

> 1= numeri minimo richiesti al quel ritardo/frequenza (ciò corrisponde al voler vedere
i ritardi/frequenza di una coppia di numeri.

>2 etc.....per altri casi di parzializzazione della lista di output

il problema è, come nelle info date per paolo,
" ci sono poche combinazioni con la doppia sincronia per il 10 e lotto."

il parametro che conta di più è il periodo preso in esame, la quantità di estrazioni diventa
fondamentale.

meno e grande questo periodo, più si trovano insiemi di numeri con medesime condizioni,
più il periodo si allunga, meno insiemi di numeri troviamo con la doppia sincronia.

ho fatto esempi, postando degli output, per rendere l'idea di come cambiano. purtroppo
di poco.

questa metodologia trova poche combinazioni da porre in gioco, ma i risultati se fate delle prove
arretrate, vedrete che sono quasi immediate.

non dimenticate che 20 numeri vengono estratti ogni concorsi, sono tantissimi, ed il ciclo
è già rapidissimo di suo, di solito troviamo da 1-7 numeri che si ripetono a colpo.

la doppia sincronia trova quasi sempre solo questi frequenti.

Beppignello · 19 Settembre 2016

okey, in questo caso ho capito.

c'è l'errore che si risolve modificando questa riga

deve diventare così

ReDim av(90),av5(90)

avevo previsto che per ritardo/frequenza ci fossero al massimo 20 numeri.

in caso di lunghezze corte, di 5 che è ciclo del 10 e lotto, abbiamo in alcuni casi più di 20 numeri.

con la modifica che potete fare anche voi, portandoli ad un massimo di 90 non si sbaglia più.

non dovrebbe ripetersi l'errore.

Beppignello · 19 Settembre 2016

con il periodo di 5 estrazioni otteniamo questo output:
Situazione 10 e LOTTO rit/freq. Periodo Inizio : 9210 fine : 9214/17.09.2016
Rit Freque Numeri
000 / 0001 11.37.57.58.61.63.74.
000 / 0002 02.09.13.34.38.73.76.89.
000 / 0003 03.16.21.29.82
001 / 0001 10.30.32.35.39.81.
001 / 0002 23.25.26.36.47.50.
001 / 0003 20.78.80.85.
002 / 0001 08.12.18.51.53.56.68.70.87.
002 / 0002 62.66.84.
003 / 0001 04.19.28.64.69.79.83.86.
003 / 0002 07.
004 / 0001 01.05.15.40.52.60.77.
005 / 0000 06.14.17.22.24.27.31.33.41.42.43.44.45.46.48.49.54 .55.59.65.67.71.72.75.88.90.

numerico · 19 Settembre 2016

Grazie...... ora effettuo la correzione.

Beppignello · 19 Settembre 2016

Codice:

Option Explicit
Sub Main
       Dim fine,ne,Ini,sor,n,ritardo,ritardomax,Incrritmax,frequenza,ix,y,retcolpi,retestratti,retidestr,t,last,yz,ciclo
       Dim rtfr(999999,2),an(1)
       ne = EstrazioniArchivioSE    
       fine = InputBox("Estrazione n.",,ne)
 ciclo = CInt(InputBox("Parzializzo Grandezza Archivio, n.estraz. - ciclo(periodo)",,30))
       yz = CInt(InputBox("Vuoi combinazioni composta da n.Numeri? 0=Tutti ",,0))
       sor = CInt(InputBox("Verifi esiti per sorte 1.2.3.4.5...",,2))
  Ini = fine - ciclo
       For n = 1 To 90
             an(1) = n
             Call StatisticaFormazioneSE(an,1,ritardo,ritardomax,Incrritmax,frequenza,Ini,fine)
             ix = FormattaStringa(ritardo,"000") & FormattaStringa(frequenza,"0000")
             rtfr(ix,1) = rtfr(ix,1) & Format2(n) & "."
             rtfr(ix,2) = rtfr(ix,2) + 1
       Next
       Scrivi "Situazione S U P E R E N A L O T T O  doppia Sincronia  (rit/freq.)  ",1
       Scrivi "Periodo  Inizio : " & Ini & "    fine : " & fine & "/" & DataEstrazioneSE(fine),1
       Scrivi "Rit   Freque  Numeri ",1
       Messaggio("Attendere elaborazione in corso")
       For y = 0 To 999999
             If rtfr(y,1) <> "" And rtfr(y,2) > yz Then
                    ColoreTesto(2)
                    Scrivi FormattaStringa(y,"000 / 0000") & "    " & rtfr(y,1),1
                    ColoreTesto(0)
                    ''''verificaesiti
                    ReDim av(20),av5(90)
                    Call SplitByChar(rtfr(y,1),".",av)
                    last = UBound(av)
                    For t = 0 To last - 1
                           av5(t + 1) = av(t)
                    Next
                    Call VerificaEsitoSE(av,fine + 1,sor,,,retcolpi,retestratti,retidestr)
                    If retestratti <> "" Then
                           Scrivi "-------" & retidestr & "..colpo n." & Format2(retcolpi) & "    " & retestratti
                    End If
             End If
       Next
End Sub

questo è lo script per il superenalotto, il montepremi è molto interessante e quindi vale la pena
predisporre qualcosa che possa aiutare

numerico · 19 Settembre 2016

No Title

10 e lotto: impostando l'archivio a sole 18 estrazioni e scegliendo l'opzione >4 si è ottenuto il 10 al primo colpo (vedasi foto)

Beppignello · 19 Settembre 2016

Codice:

Option Explicit
Sub Main
 Dim fine,ne,Ini,sor,n,ritardo,ritardomax,Incrritmax,frequenza,ix,y,retcolpi,retestratti,retidestr,t,last,yz,ciclo
 Dim rtfr(999999,2),an(1)
 Call ImpostaArchivio10ELotto(1)
 Ini = EstrazioneIni
 ne = EstrazioniArchivioDL
 fine = InputBox("Estrazione n.",,ne)
 ciclo = CInt(InputBox("Parzializzo Grandezza Archivio, n.estraz. - ciclo(periodo)",,18))
 yz = CInt(InputBox("Vuoi combinazioni composta da n.Numeri? 0=Tutti ",,4))
 sor = CInt(InputBox("Verifi esiti per sorte 1.2.3.4.5...",,2))
 Ini = fine - ciclo
 For n = 1 To 90
  an(1) = n
  Call StatisticaFormazioneDL(an,1,ritardo,ritardomax,Incrritmax,frequenza,Ini,fine)
  ix = FormattaStringa(ritardo,"000") & FormattaStringa(frequenza,"0000")
  rtfr(ix,1) = rtfr(ix,1) & Format2(n) & "."
  rtfr(ix,2) = rtfr(ix,2) + 1
 Next
 Scrivi "Situazione 10 e LOTTO  rit/freq.  ",1
 Scrivi "Periodo  Inizio : " & Ini & "    fine : " & fine & "/" & DataEstrazioneDL(fine),1
 Scrivi "Rit   Freque  Numeri ",1
 Messaggio("Attendere elaborazione in corso")
 For y = 0 To 999999
  If rtfr(y,1) <> "" And rtfr(y,2) > yz Then
   ColoreTesto(2)
   Scrivi FormattaStringa(y,"000 / 0000") & "    " & rtfr(y,1),1
   ColoreTesto(0)
   ''''verificaesiti
   ReDim av(20),av5(90)
   Call SplitByChar(rtfr(y,1),".",av)
   last = UBound(av)
   For t = 0 To last - 1
    av5(t + 1) = av(t)
   Next
   Call VerificaEsitoDL(av,fine + 1,sor,,,retcolpi,retestratti,retidestr)
   If retestratti <> "" Then
    Scrivi "-------" & retidestr & "..colpo n." & Format2(retcolpi) & "    " & retestratti
   End If
  End If
 Next
End Sub

ho ripostato lo script 10 e lotto

i legend · 19 Settembre 2016

NESSUNA GARANZIA DI VINCITA

Ciao a tutti
potrebbero secondo voi essere interessanti queste formazioni?
TO-RO-GE : 65.51.38 freq=299, rit Iso = 8
PA-CA-GE : 82.13.63 freq=279 , rit Iso =9( ++)

Purtroppo ci sono troppo incertezze ci sono tre numeri su tre ruote.
Sto pensando ,se ne viene fuori qualcosa vi aggiorno

Ciao

Beppignello · 19 Settembre 2016

ciao I-Legend
PA-CA-GE : 82.13.63 freq=279 , rit Iso =9( ++)

CA 13
GE 63
PA 82

3 numeri con doppia sincronia
al ritardo 9 sul tabellone ci sono 36 numeri, i teorici dovrebbero essere 32,8814, quindi ci sono 4 numeri
in eccesso sulle 11 ruote

per me è probabile che 1 numero cada a ruota
----------------------------------------------------------

TO-RO-GE : 65.51.38 freq=299, rit Iso = 8

io ho anche 84 a Bari, che tu non hai o non hai scritto oppure ho io un errore.

BA 84
GE 38
RO 51
TO 65

4 numeri con doppia sincronia
al ritardo 8 abbiamo sul tabellone 40 numeri, i teorici dovrebbero essere 34,8156
quindi abbiamo circa 6 numeri in eccesso

anche in questo caso è probabile che 1 numero cada a ruota

la quartina 84 38 51 65 può produrre anche l'ambo sulle ruote di rilevamento

ciao.

isabel · 19 Settembre 2016

Ciao i legend, il 38 della prima formazione lo vedo possibile a RO/TO/VE Isabel

i legend · 19 Settembre 2016

Ciao Beppe.
Considero solo le terne
In effetti è molto interessante
TO-GE-BA 65.38.84 IL RIt. Sto.15 contro il 12 Dell
altra formazione mi aveva fatto optare verso l altra.
Avendo in comune il 65.38
Se restringiamo ?
Vediamo cosa accade nelle prossime estrazioni.
Ciao

i legend · 19 Settembre 2016

Ciao Isabel grazie mille .le tue informazioni sono preziose.
Beppe ottima analisi.
Ciao a tutti

Beppignello · 19 Settembre 2016

con lo spunto dato da ILegend

c'è questa situazione in completo al ritardo 8

38 CA : 05 MI : 78 MI : 01 PA
84 BA : 38 GE : 51 RO : 65 TO
05 BA : 66 MI : 69 RO :

al ritardo 8 abbiamo sul tabellone 40 numeri, i teorici dovrebbero essere 34,8156
quindi abbiamo circa 6 numeri in eccesso

BA 84 05
CA 38
GE 38
MI 05 78 66
PA 01
RO 51 69
TO 65

2 volte il 38 e 05

a volte gli ambi in cinquina estratti non vanno lontani, perché si ripetono (CSI)
potrebbe essere il caso di

BA 84 05
MI 05 78 66
RO 51 69

i legend · 19 Settembre 2016

Beppe io considero anche il rit della terzina a ruota e a tutte e la frequenza.
Ti posto i dati.
PA-CA-GE 82-13-63
freqR= 121 freqT =383 ritR =55 ritT=33 ritS= 96
To-Ge-Ba 65-38-84
freqR= 116 freqT =432 ritR =11 ritT=4 ritS= 72
Ciao

i legend · 19 Settembre 2016

Scusa non avevo visto il tuo post.
Se si considerano i numeri come su ruota singola il rit reale è più basso di quello isocrono.

Su Fi-Mi-Ro 49.25.87.
Rit.Iso. =ritR.
Potrebbe essere anche questo uno spunto.
Vediamo nei prossimi 3 ,5 colpi che succede
Ciao

skygirl · 19 Settembre 2016

Ciao a tutti/e
io ho scelto questa combinazione

019/281 005/037....42 BA01 : 42 RO08 : 22 TO09

ritardo 19 frequenza 281

opto per il 42 su RO per il fatto che appartiene ad una terzina con ritardo 19 che potrebbe sfaldarsi in quanto sulla ruota di RO sono presenti 9 terzine mentre le teoriche dovrebbero essere 5.90

inoltre il numero 42 è assente su Tutte da 5 estrazioni

ho pensato di associare al 42 RO il 29 RO che ha la stessa frequenza ovvero f= 281
inoltre il 29 fa parte di una cinquina su RO che potrebbe sfaldarsi dato che sono presenti sulla ruota di RO 4 cinquine contro le teoriche che dovrebbero essere 3.95

riassumento provo a testare

42.29 RO

i legend · 19 Settembre 2016

Bellissimo. ...
Questo è un esempio di collaborazione che piace a me .si lavora tutti su un idea e tutti danno una visione.
Magari una soluzione sarà un mix di tutti.
Questa è condivisione. Lavorare tutti assieme.
Grazie e ciao a tutti

Beppignello · 19 Settembre 2016

Analisi n.1 per Superenalotto

44 67
08 39
63 73
25 72 87 89
42
19 56
52
75
41
70
50
05
11
24
33
80
03
20

sono in tutto 25 Numeri

provo a scartare il nr.33
[TABLE="border: 0, cellpadding: 0, cellspacing: 0, width: 193"]
[TR]
[TD="align: right"]25[/TD]
[TD="align: right"]87[/TD]
[TD="align: right"]42[/TD]
[TD="align: right"]67[/TD]
[TD="align: right"]39[/TD]
[TD="align: right"]73[/TD]
[/TR]
[TR]
[TD="align: right"]25[/TD]
[TD="align: right"]87[/TD]
[TD="align: right"]42[/TD]
[TD="align: right"]52[/TD]
[TD="align: right"]41[/TD]
[TD="align: right"]50[/TD]
[/TR]
[TR]
[TD="align: right"]25[/TD]
[TD="align: right"]87[/TD]
[TD="align: right"]42[/TD]
[TD="align: right"]11[/TD]
[TD="align: right"]80[/TD]
[TD="align: right"]20[/TD]
[/TR]
[TR]
[TD="align: right"]5[/TD]
[TD="align: right"]24[/TD]
[TD="align: right"]3[/TD]
[TD="align: right"]72[/TD]
[TD="align: right"]89[/TD]
[TD="align: right"]19[/TD]
[/TR]
[TR]
[TD="align: right"]5[/TD]
[TD="align: right"]24[/TD]
[TD="align: right"]3[/TD]
[TD="align: right"]52[/TD]
[TD="align: right"]41[/TD]
[TD="align: right"]50[/TD]
[/TR]
[TR]
[TD="align: right"]5[/TD]
[TD="align: right"]24[/TD]
[TD="align: right"]3[/TD]
[TD="align: right"]67[/TD]
[TD="align: right"]39[/TD]
[TD="align: right"]73[/TD]
[/TR]
[/TABLE]
[TABLE="border: 0, cellpadding: 0, cellspacing: 0, width: 184"]
[TR]
[TD="align: right"]56[/TD]
[TD="align: right"]75[/TD]
[TD="align: right"]70[/TD]
[TD="align: right"]11[/TD]
[TD="align: right"]80[/TD]
[TD="align: right"]20[/TD]
[/TR]
[TR]
[TD="align: right"]56[/TD]
[TD="align: right"]75[/TD]
[TD="align: right"]70[/TD]
[TD="align: right"]72[/TD]
[TD="align: right"]89[/TD]
[TD="align: right"]19[/TD]
[/TR]
[TR]
[TD="align: right"]56[/TD]
[TD="align: right"]75[/TD]
[TD="align: right"]70[/TD]
[TD="align: right"]67[/TD]
[TD="align: right"]39[/TD]
[TD="align: right"]73[/TD]
[/TR]
[TR]
[TD="align: right"]44[/TD]
[TD="align: right"]8[/TD]
[TD="align: right"]63[/TD]
[TD="align: right"]72[/TD]
[TD="align: right"]89[/TD]
[TD="align: right"]19[/TD]
[/TR]
[TR]
[TD="align: right"]44[/TD]
[TD="align: right"]8[/TD]
[TD="align: right"]63[/TD]
[TD="align: right"]11[/TD]
[TD="align: right"]19[/TD]
[TD="align: right"]52[/TD]
[/TR]
[TR]
[TD="align: right"]44[/TD]
[TD="align: right"]8[/TD]
[TD="align: right"]63[/TD]
[TD="align: right"]52[/TD]
[TD="align: right"]41[/TD]
[TD="align: right"]50[/TD]
[/TR]
[/TABLE]
[TABLE="border: 0, cellpadding: 0, cellspacing: 0, width: 399"]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"]provo a scartare il 33[/TD]
[TD] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"]attualmente pochi nr.con doppia sincronia, escono con ritardo dal rilevamento[/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD="align: right"] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[/TABLE]

INNOVATIVA RICERCA STATISTICA

Super Member >GOLD<

Super Member >GOLD<

Beppignello

Guest

Beppignello

Guest

Beppignello

Guest

Super Member >GOLD<

Beppignello

Guest

Super Member >GOLD<

Allegati

Beppignello

Guest

Premium Member

Beppignello

Guest

Premium Member

Premium Member

Premium Member

Beppignello

Guest

Premium Member

Premium Member

Advanced Member >GOLD<

Premium Member

Beppignello

Guest