Proposta statistica decine

[claudio8]

x Luigi
lo script ultimo, in fase di scrittura del file ccsv x excel non da le date di inizio e fine periodo in modo corretto, ti inserisco una parte di output in excel

Numero	Combinazione	Ruota	R1	R2	R3	R4	R5	R6	R7	R8	R9	R10	R11	Data Inizio	Data Fine	CONS MAX
1	34.50.66.82.8.24.40.56.72.88	Bari	21	18	16	20	14	28	25	13	18	32	12	0,73681713	27.07.1985	11
2	67.78.89.10.21.32.43.54.65.76	Bari	22	17	20	17	23	12	16	17	48	20	0	29.09.1984	0,986203704	10
3	88.22.46.70.4.28.52.76.10.34	Bari	22	13	21	23	14	15	14	36	15	16	10	0,778391204	0,065243056	10
4	87.19.41.63.85.17.39.61.83.15	Bari	16	16	45	20	14	14	21	18	35	13	4	0,52806713	0,114189815	10
5	53.67.81.5.19.33.47.61.75.89	Bari	25	26	20	26	18	41	14	13	15	18	0	0,822060185	0,820717593	10
6	18.46.74.12.40.68.6.34.62.90	Bari	40	33	14	12	17	17	54	24	28	34	4	0,607118056	0,277291667	10
7	19.41.63.85.17.39.61.83.15.37	Bari	16	16	45	20	14	14	21	18	35	13	4	0,52806713	0,114189815	10
8	21.56.1.36.71.16.51.86.31.66	Bari	31	44	18	32	13	13	13	16	12	21	7	29.01.2003	27.11.2004	10
9	38.75.22.59.6.43.80.27.64.11	Bari	15	25	23	19	15	17	12	14	28	6	4	0,857986111	0,150358796	9
10	65.16.57.8.49.90.41.82.33.74	Bari	16	33	22	33	30	27	16	16	23	5	1	0,32037037	0,112083333	9
11	73.5.27.49.71.3.25.47.69.1	Bari	35	18	16	12	15	43	16	15	34	5	0	0,902893519	0,489733796	9
12	81.34.77.30.73.26.69.22.65.18	Bari	16	21	25	17	15	13	16	19	23	0	2	0,192048611	0,317083333	9
13	8.13.28.33.48.53.68.73.88	Bari	13	23	15	26	15	36	27	28	16	0	6	26.06.1948	0,649675926	9

.

Se puoi vedere il perchè dell'errore sulla data, sarebbe utile in modo che con date, e ruote, possiamo visionare l'andamento precedente della decina per costruirne uno storico delle stesse.
(ho modificato un po lo script per poterne elencare sino a 200 colonne di ritardi e allego esempio:

N°	Combinazione	Ruota	R1	R2	R3	R4	R5	R6	R7	R8	R9	R10	R11	R12	R13	R14	R15	R16	R17	R18	R19	R20	R21	R22	R23	R24	R25	R26	R27	R28	R29	R30	R31	R32	R33	R34	R35	R36	R37	R38	R39	R40	R41	R42	R43	R44	R45	R46	R47	R48	R49	R50	R51	R52	R53	R54	R55	R56	R57	R58	R59	R60	R61	R62	R63	R64	R65	R66	R67	R68	R69	R70	R71	R72	R73	R74	R75	R76	R77	R78	R79	R80	R81	R82	R83	R84	R85	R86	R87	R88	R89	R90	R91	R92	R93	R94	R95	R96	R97	R98	R99	R100	R101	R102	R103	R104	R105	R106	R107	R108	R109	R110	R111	R112	R113	R114	R115	R116	R117	R118	R119	R120	R121	R122	R123	R124	R125	R126	R127	R128	R129	R130	R131	R132	R133	R134	R135	R136	R137	R138	R139	R140	R141	R142	R143	R144	R145	R146	R147	R148	R149	R150	R151	R152	R153	R154	R155	R156	R157	R158	R159	R160	R161	R162	R163	R164	R165	R166	R167	R168	R169	R170	R171	R172	R173	R174	R175	R176	R177	R178	R179	R180	R181	R182	R183	R184	R185	R186	R187	R188	R189	R190	R191	R192	R193	R194	R195	R196	R197	R198	R199	R.A.	Tot.R193-R199	Data analisi	RitCons	StoRit Cons	STATO	Esito	Colpi	Numeri
																																																																																																																																																																																																																		
1	90.7.14.21.28.35.42.49.56.63	Bari	4	1	6	40	3	4	0	17	6	8	7	9	2	13	23	9	3	1	13	10	17	4	1	32	7	2	9	26	5	1	10	31	9	17	7	0	23	1	12	17	0	11	18	3	40	8	9	17	9	1	6	2	32	7	10	39	20	9	8	20	0	1	9	11	3	2	11	26	5	51	17	16	4	6	15	26	7	0	8	18	23	15	15	2	10	14	0	5	4	8	1	3	3	0	13	6	2	1	16	17	1	7	23	6	4	27	34	0	22	15	1	37	3	6	14	4	0	14	7	14	5	21	2	11	7	9	9	0	0	7	3	22	7	6	21	7	6	8	29	6	3	4	17	11	22	0	7	2	25	13	15	13	5	17	16	7	2	2	4	6	20	12	0	25	5	7	3	17	1	8	8	3	20	21	6	6	16	6	1	18	8	0	1	5	2	1	11	3	3	10	8	0	33	23	14	13	18	52	16	9	169	12/03/2011	7	7	In corso		18	
2	38.75.22.59.6.43.80.27.64.11	Bari	16	0	2	7	2	3	9	10	3	5	0	4	3	7	3	6	1	15	41	6	6	0	37	21	14	10	7	5	11	41	20	0	7	25	1	6	20	2	38	12	19	2	0	15	24	2	2	2	0	21	1	4	14	2	2	11	4	13	10	5	13	12	0	8	11	21	24	24	4	15	28	27	2	0	27	22	0	10	15	0	12	0	1	9	15	23	13	20	2	1	7	8	4	10	4	13	10	5	7	11	0	9	4	25	7	0	23	4	14	0	13	0	2	13	0	25	7	0	11	12	0	6	23	4	5	10	13	21	32	5	20	7	7	21	7	0	1	8	18	1	7	20	4	7	2	2	18	15	0	10	11	13	4	19	16	6	10	25	12	4	6	0	17	0	1	26	3	11	8	2	3	5	0	0	39	2	20	14	15	3	2	9	6	3	2	1	15	5	25	2	15	25	23	19	15	17	12	14	28	3	128	1

 

[claudio8]

quote:Originally posted by claudio8

x Lippo

Ti allego il link di un file per visionare tutti i casi delle ruote di bari e napoli dal 1939 ad oggi.
A quanto mi è parso di capire, premettendo che il lavoro è stato fatto su solo 2 ruote, i casi con valori consecutivi di ritardo
superiori a 11 >= 7 (sino ad 11) sono per bari 290 e per Napoli 232
rispettivamente 77(26.5% con media uscita di 20.37 colpi) x BA e 70(30% x NA con media di 21.95 colpi)superano il valore 7 per arrivare a 8 - 9 -10 e 11 , non so se esistono anche casi con valori
maggiori, ma penso che siano pochissimie quindi poco rilevanti al fine di questa analisi.
La media di sortita per BA , con valore 7 che rappresentante il 74% circa è di 4,26 colpi, mentre per NA la medidia a valore 7 , il 79% circa è di 4.56.
Detto questo ritengo che occorre selezionare con molta accuratezza le decine altrimenti anche un gioco con progressioni è rischioso.

http://www.megaupload.com/?d=WFOBJZ1Q

Attendo tue analisi e valutazioni


Lo spot che conosciamo dice "Ti Piace vincere facile ? " che tradotto in pratica significa "Ti Piace..rebbe vincere facile !!!"

 

[lippo]

x Cludio8

Prima di conoscere questo forum ho sempre fatto
ricerche" a mano" perchè non so scrivere listati
a ho fatto ricerche solo sulla decine tradizionali
trovando come massimo storico solo 1 caso di decina
naturale con ritardo di ciclo pari a 8 e siccome le
decine erano poche le occasioni di gioco erano poche
nacque l'esigenza di aumentarne il numero ma non mi
aspettavo che lo storico arrivasse a 12 cicli consecutivi
di ritardo >11. Questo chiaramente rivoluziona un pò
le cose e sono d'accordo con te Claudio8 che la ricerca
deve essere molto accurata ( tu avresti qualche idea a
proposito?). Ho visto che sei riuscito ad avere gli storici
di 2 ruote dal 1939 cosa molto interessante potrei avere
questi storici ma incolonnati in modo verticale anzichè in orizzontale?
Sarebbe interessante averne di almeno 400/500
decine quindi 400/500 colonne di ritardi dal 1939 in poi.

x LuigiB

Ho notato che nell'elenco delle decine ci sono anche una
cinquantina di novine ( 9 numeri) che vanno a distorcere
un pò anche i rusultati dei test si possono togliere
( e metterle magari in un elenco chiamato NovineLippo che
poi magari aggiornemremo) in modo da avere solo ed esclusivamente decine? Grazie
Lippo


Saluti

 

[LuigiB]

Ciao , ok per le novine le tolgo oggi pomeriggio , per lo storico
col nuovo setup nella directory SCRIPT\VARI\ c'è il file
Lippo4 , questo script consente di esportare gli storici di tutte le dcine in un file xls
Purtroppo execel ha una limitazione delle colonne e si possono vedere solo gli ultimi 245 ritardi , ma nel file
che viene creato ci sono comunque tutti e volendo si puo importare a
mano in excel come uno vuole.
Il problema delle date dipende da excel , claudio apri excel e importa il file csv facendo importa file cosi imposti il tipo dati per le celle
e la data compare giusta.

 

[lippo]

Ciao LugiB
scusami se ti disturbo ancora, ho visto il file
ed è ottimo ma sono molto limitato perchè se il
file generato fosse la contrario era perfetto
cioè i ritardi anziché disposti in orizzontale si
disponessero in verticale ; esempio: prime 2 decine
su bari

Bari Bari
n1 38 34
n2 52 50
n3 66 66
n4 80 82
n5 4 8
n6 18 24
n7 32 40
n8 46 56
n9 60 72
n10 74 88
r1 34 25
r2 2 4
r3
ecc.ecc. perchè dovendo usare la funzione frequenza mi
è scomodo in orizzontale e poi se non dovesse farcela
a mettere tutti i ritardi in verticale su potrebbero
usare più fogli sul foglio 1 le prime 1000 sul secondo
foglio le altre 1000 ecc.
Grazie Lippo




Saluti

 

[claudio8]

x Lippo
prova acecare nel web una versione del 2007, ha oltre 4000 colonne.

ciao

Lo spot che conosciamo dice "Ti Piace vincere facile ? " che tradotto in pratica significa "Ti Piace..rebbe vincere facile !!!"

 

[lippo]

Ciao Cludio8
problema colonne risolto ma mi resta
da risolvere l'ordinamento in colonne.
Lippo

Saluti

 

[claudio8]

x Lippo
Se non ricordomale ci dovrebbe essere una funzione in excell che traspone le righe in colonne. Non so più dove trovarla.

Ciao

 

[lippo]

Grazie delle dritta Claudio8
l'ho trovato su internet come si fa
e ho risolto il problema.Adesso mi metto al lavoro.
Lippo

Saluti

 

[lippo]

x LuigiB

Ho notato che il file Lippo4 per l'export di tutti
i ritardi in excel mi da 3353 decine mentre su Spaziometria
ce ne sono 3300 decine perchè questa differenza? Hai avuto
il tempo di togliere le novine e aggiornare il file un modo
da avere solo ed escusivamente decine?
Grazie Lippo

Saluti

 

[LuigiB]

in spaziometria se ti riferisci alla funzione formazioni registrate le decine sono 3300 perche sono realmente univoche infatti prima di inserire la singola formazione viene costruita una chiave costituita dalla sequenza
dei numeri che la compongono e tale sequenza viene preventivamente ordinata sicche due formazioni diverese ma uguali come
queste : 1-2-3-4-5 e un'altra 5-4-3-2-1 vengono identificate come la stessa medesima formazione , nello script invece la famosa chiave univoca è si costituita dalla sequenza dei numeri però nell'ordine in cui compaiono senza nessun ordinamento preventivo , in parole povere il file che mi hai dato è sporcato da tutte queste situazioni che lo script non gestisce il programma si.

 

[lippo]

Salve a tutti
Ho finalmente finito la ricerca dettagliata delle
decine grazie al programma Spaziometria e alla pazienza
di LuigiB che ringrazio. Non so allegare l’immagine della
tabella e quindi vi metto il link della tabella dei dati

http://www.megaupload.com/?d=N6GWW45S

(senza tutte le formule che al momento non servono ma se
volete maggiori informazioni potete chiedere) che ho
ricavato e ve lo commento: i numeri a sinistra della tabella
da 1 a14 sono i ritardi consecutivi > di 11 e in alto le
ruote.Si può subito notare che solo 1 decina su 33530
(3353 decine per 10 ruote) ha avuto 13 ritardi consecutivi
> di 11 estrazioni 8 decine hanno avuto 12 ritardi > di 11,
17 decine 11 ritardi > 11,50 decine 10 ritardi >11 ecc.
Come potete notare sono un numero molto esiguo e che non
dovrebbero ripetersi molto facilmente,
mentre la stragrande maggioranza delle decine hanno uscite
con 1 e 2 ritardi consecutivi maggiori di 11 estrazioni e in percentuale rappresentano
rispettivamente il 69,13% e il 21,35%.Prendendo
per esempio solo la ruota di Firenze
vi faccio notare che su 3353 decine solo 594 decine ( lo
0,19% circa)hanno avuto 6 ritardi consecutivi > di 11 e
di queste 594 decine 510 solo una volta dal 1936 a oggi
hanno avuto uscite >11 consecutive e 40 decine 2 volte !
Questo significa che se una decina fa segnare una serie si
6 ritardi consecutivi maggiore di 11 difficilmente lo
rifarà e questo potrebbe essere un buon sistema per la
scelta delle decine da giocare.
Il numero 69,80% evidenziato ci fa capire che la
probabilità più alta per la scelta delle decine
da mettere in gioco sono proprio quelle che si
trovano al ritardo 6 e che se vogliamo, possiamo
aumentare la probabilità al 90,69% giocando le
decine che si trovano al ritardo 5 e inseguirle fino al
ritardo 6. Ogni decina ha una frequenza media di uscite di
circa 450 estrazioni ( dal 08/07/1939 a oggi) e il 67,7%
esce proprio nella fascia di ritardi da 1 a 11 mentre si
arriva all’ 85% circa allargando la fascia da 1 a 20
estrazioni e tenete presente che se trovate una decina
che ha un ritardo consecutivo > di 20 per 4 o 5 volte
consecutive è una buona occasione di gioco. Per esempio
io ieri ho giocato le 5 decine che si trovano facendo la
seguente ricerca su spaziometria: andate su statistica ->
cicli di ritardo poi mettete la spunta sulle DecineLippo
poi mettere sorte ambo, Ritardo minimo maggiore di 11 ,
Ultimi cicli da mostrare 11, Cicli consecutivi al ritardo
minimo >= a 11, Cicli consecutivi al ritardo minimo >=a
6 e mettere la spunta al quadratino a fianco e poi mettere
la spunta anche al quadratino in basso vi mostrerà una
serie di decina cha hanno un ritardo consecutivo >di
11 pari a 6 ma solo 5 hanno un ritardo vicino a 11 e
sono 3 di Roma 1 di Palermo e 1 di Cagliari ebbene ieri
a colpo ne ho prese 2 delle 5. Resto a disposizione per
eventuali vostre informazioni mentre attendo vostri
commenti o suggerimenti in merito.
X Luigi
Facendo girare il programma con il file Lippo4 su firenze
e lasciando i parametri di default la prima decina delle
50 degli storici ha un il numero 44 riportato 2 volte.
Da cosa è dovuto?
Ho avuto nuovamente il problema che non ho trovato la
formazioni nei parametri di ritardo di cicli, non si
potrebbe risolvere?
Ti avevo fatto 2 richieste la prima di togliere le
formazioni composte da 9 numeri invece di 10 (novine)
in modo da avere solo ed esclusivamente decine e l’altra
avere la possibilità di avere una ricerca di ciclo non
“fisso” ma mobile ma entro in dettaglio se tu vuoi perché
sicuramente molto interessante se lo si fa.

Saluti

 

[lippo]

Scusa LuigiB
intanto grazie per la modifica delle decine ma
ho visto che con la nuova versione 1.2.53 lanciando
il file Lippo4 l'export in excel del file
Decinecontuttiiritardi la colonna L dove sta il N10
riporta tutti zero invece dell'ultimo numero che
compone la decina. Potresti corregerlo?
Inoltre il file esporta 3297 decine mentre nelle
formazioni le decine Lippo classe 10 ne sono 3278.
Quali sono giuste?
Grazie
Lippo

Saluti

 

[LuigiB]

lippo4

Option Explicit
Class clsCombinazione

	Public Classe ' numeri contenuti nella formazione
	Public aNumeri ' numeri che compongono la combinazione
	Public aRitardi ' i ritardi negli ultimi cicli voluti dall'utente
	Public aRitardiGlob ' ritardi globali della combinazione calcolati da 1 al maxRange
	Public aIdEstrRitardi ' contiene gli id delle estrazioni alle quali si è calcolato il ritardo
	Public nIdPrimoRitCons ' indice per l'array aRitardiGlob che indica il punto di inizio della serie consecutiva
	Public nIdUltimoRitCons' indice per l'array aRitardiGlob che indica il punto di fine  della serie consecutiva
	Public nSommaUltim5
	Public bUltimi5ritMaggDi11
	Public bRitCorrMinoreDi12
	Public Ruota
	Public nRitConsecutiviMax
	Public nIdEstrIni ' id Estrazione da cui parrte la serie consecutiva storica
	Public nIdEstrFin ' id Estrazione in cui termina la serie consecutiva storica
	Public EstrazioneInizio
	Public EstrazioneFine
	Public UltimiRitCons
	Sub SetNumeriFromRigaCsv(sRiga)
		Dim k
		ReDim aV(0)
		Call SplitByChar(sRiga,";",aV)
		ReDim aNumeri(10)
		For k = 0 To 9
			If k+1 <= UBound(aV) Then
				If IsNumeric(aV(k)) Then
					If isNumeroValidoLotto(aV(k)) Then
						aNumeri(k+1) = CInt(aV(k))
						Classe = Classe + 1
					End If
				Else
					aNumeri(k+1) = 0
				End If
			End If
		Next
		ReDim Preserve aNumeri(Classe)
		
		Call OrdinaMatrice(aNumeri,1)
		
	End Sub
	Sub CalcolaTuttiRitardi(inizio,fine,Sorte,aRuote)
		ReDim aRitardiGlob(0)
		ReDim aIdEstrRitardi(0)
		Call ElencoRitardi(aNumeri,aRuote,Sorte,inizio,fine,aRitardiGlob,aIdEstrRitardi)
	End Sub
	Sub CalcolaRitardi(inizio,fine,Sorte,aRuote,RitardoMinimo,CicliDiRitardo,UltimiRitardiDaConsiderare)
		Dim nCicli
		Dim k,n
		Dim nRitTrovati
		EstrazioneInizio = inizio
		EstrazioneFine = fine
		Call CalcolaTuttiRitardi(inizio,fine,Sorte,aRuote)
		Call GetRitardiConsecMaggioriDiX(RitardoMinimo)
		Call GetQUltimiRitCons(RitardoMinimo)
		nRitTrovati = UBound(aRitardiGlob)
		ReDim aRitardi(CiclidiRitardo)
		nCicli = nRitTrovati
		For k = CicliDiRitardo To 1 Step - 1
			aRitardi(k) = aRitardiGlob(nCicli)
			nCicli = nCicli - 1
			If nCicli = 0 Then Exit For
		Next
		nSommaUltim5 = 0
		bUltimi5ritMaggDi11 = True
		n = 0
		For k = CicliDiRitardo - UltimiRitardiDaConsiderare To CicliDiRitardo - 1
			n = n + 1
			If aRitardi(k) <= RitardoMinimo Then
				bUltimi5ritMaggDi11 = False
			End If
			nSommaUltim5 = nSommaUltim5 + aRitardi(k)
		Next
		If n < UltimiRitardiDaConsiderare Then
			bUltimi5ritMaggDi11 = False
		End If
		If aRitardi(CicliDiRitardo) > RitardoMinimo Then
			bRitCorrMinoreDi12 = False
		Else
			bRitCorrMinoreDi12 = True
		End If
	End Sub
	Sub GetRitardiConsecMaggioriDiX(RitardoMinimo)
		Dim k
		Dim nConsec
		Dim nConsecMax
		Dim nIdEstrA,nIdEstrB
		Dim nIdRitA,nIdRitB
		Dim nIdEstrATmp,nIdEstrBTmp
		Dim nIdRitATmp,nIdRitBTmp
		For k = 1 To UBound(aRitardiGlob)
			If aRitardiGlob(k) > RitardoMinimo Then
				nIdEstrATmp = aIdEstrRitardi(k)
				nIdRitATmp = k
				nConsec = 0
				Do While aRitardiGlob(k) > RitardoMinimo
					nConsec = nConsec + 1
					nIdEstrBTmp = aIdEstrRitardi(k)
					nIdRitBTmp = k
					k = k + 1
					If k > UBound(aRitardiGlob) Then Exit Do
				Loop
				If nConsec > nConsecMax Then
					nConsecMax = nConsec
					nIdEstrA = nIdEstrATmp
					nIdEstrB = nIdEstrBTmp
					nIdRitA = nIdRitATmp
					nIdRitB = nIdRitBTmp
				End If
				k = k - 1
			End If
			If ScriptInterrotto Then Exit For
		Next
		nRitConsecutiviMax = nConsecMax
		nIdEstrIni = nIdEstrA
		nIdEstrFin = nIdEstrB
		nIdPrimoRitCons = nIdRitA
		nIdUltimoRitCons = nIdRitB
	End Sub
	Sub CalcolaEsito(Sorte,RetEsito,RetColpi,RetEstratti)
		ReDim aRuote(1)
		aRuote(1) = Ruota
		RetEsito = ""
		RetColpi = 0
		RetEstratti = ""
		Call VerificaEsito(aNumeri,aRuote,EstrazioneFine + 1,Sorte,,,RetEsito,RetColpi,RetEstratti)
	End Sub
	Sub GetQUltimiRitCons(RitardoMinimo)
		Dim k
		Dim nCons
		k = UBound(aRitardiGlob) - 1
		D

 

[lippo]

Ciao LuigiB
lo script Lippo4 funziona benissimo e ritengo che contenga
solo ed escusivamente formazioni da 10 numeri e non ripetuti
perchè ho visto che dai la possibilità di selezionare alla
fine 10 o 9 numeri.Ho notato però che nel pannello delle formazioni
hai inserito anche delle formazioni chiamateLippoClasse_10->classe9
e LippoClasse_9->classe8 che sono rispettivamente formazioni composte
da 9 numeri e da 8 numeri ma forse ci sarà un errore perchè io volevo che sulle formazioni
ci fosse la stessa lista di decine che sta sullo script Lippo4 cioè solo decine e non ripetute.
Puoi inserirle per favore e cancellare a questo punto le altre?
E' comoda averle nelle formazioni perchè molto veloci da
eleborare e anche a tutte le ruote in un unica eleborazione.
Vorrei aggiungere una cosa:
perchè dare la possibilità di esportare in excel per lo studio
tutto quello che già c'è o che uno inserisce nelle formazioni ( così come fa il file Lippo4)
magari aggiungendo un pulsante "Esporta Storico" in modo che chi interessato clicca e si esporta
la/le formazioni di suo interesse altrimenti non clicca.
Un ringraziamento per la tua pazienza, bravura e velocità.
Lippo

Saluti

 

[lippo]

Ciao a tutti
mi permetto di consigliarvi questa novina molto probabile:
1.26.27.28.34.42.50.75.83 e tentando un ristretto 28.34.42
da giocare solo per 3 estrazioni a partire da oggi.
Lippo


Saluti