Novità

...per Rubino

Perdonami ma io non ho capito.
Puoi farmi un esempio pratico del calcolo da fare?
ci stò provando ma non riesco a risalire.

ESTRATTO 36
RITARDO ATTUALE 42
RITARDO FUTURO ??

...che calcolo in pratica devo fare per risalire al futuro?
 
quote:Abasul usa questo metodo:</u>

media Ritardo attuale + 2 volte scarto medio quadratico attuale</u>

in questo caso genera una proiezione del ritardo futuro

conoscendo il ritardo attuale della combinazione e la proiezione futuro, basta fare la sottrazione e si ha un teorico n.estrazioni future dove è attesa l'uscita della combinazione.



esempio relativo al 36 di Palermo postato:

media attuale all'estraz.8382 = 18,1463 +
scarto med.quad. sqm.ratt = (17,559076 * 2)
ritardo massimo futuro = 53,2645


ritardo massimo futuro = 53,2645
ritardo attuale = 42
Proiezione n.estraz. = 11,2645

---------------------------------------------------------------------





-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

La sistemistica trova il suo fondamento nella matematica, mentre i padri fondatori
hanno proposto come fondamento il fumo aleatorio!
 
questo invece è una mia interpretazione ed impostazione, relativa alla coppia di estratti 36 81 sulla ruota di Palermo:

3681pa.jpg
[/URL]

Uploaded with ImageShack.us[/img]



come lo calcolo?

la proiezione è data dal previsionale incremento della media reale attuale da un 80% ad un 125%

prendo la media reale attuale e ne calcola un range min - max

(min) media reale attuale * 1,08
(max) media reale attuale * 1,125

lo scostamento o il numero delle estrazioni mancanti all'ingresso del range, è sempre dato dai 2 estremi previsionali - ritardo attuale.


in altre parole per la coppia 36 81 di palermo
il ritardo futuro è di 19 20 concorsi di ritardo

attualmente il ritardo è 11

pertanto in 7-9 colpi dovrebbe sortire almeno 1 numero su 2



col metodo abasul invece la proiezione massima del ritardo futuro è di 26/27 concorsi (valori arrotondati)


vedremo, nel tempo quali dei metodi si avvicina di più alla realtà delle uscite, e dove eventualmente ci sarà necessità di fare degli aggiustamenti.</u>















-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

La sistemistica trova il suo fondamento nella matematica, mentre i padri fondatori
hanno proposto come fondamento il fumo aleatorio!
 
Noto ke è un ambo in figura "9"
Mi kiedo ora (..per non impazzire ancora) anche nel
tuo script bisogna inserire il
"ritardo futuro" per avere il calcolo finale o
è automatizzato?
 
nel mio caso il ritardo futuro range min-max è automatizzato
ma anche quello di abasul è automatizzato (ritardo Massimo Futuro)
è dato dalla somme che ti ho specificato precedentemente.

tuttalpiù abasul forse prevede un ritardo futuro che si aggiorna fino a raggiungere il massimo smq.
però bisogna chiedere a lui, che significato può avere.




-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

La sistemistica trova il suo fondamento nella matematica, mentre i padri fondatori
hanno proposto come fondamento il fumo aleatorio!
 
quote:Noto ke è un ambo in figura "9"
Mi kiedo ora (..per non impazzire ancora) anche nel
tuo script bisogna inserire il
"ritardo futuro" per avere il calcolo finale o
è automatizzato?



più che ambo in figura 9

è una coppia di figura prevista per sola ambata 1 su 2</u>






comunque non dare troppo importanza al ritardo futuro è un dato molto teorico, che quasi non ha senso!





-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

La sistemistica trova il suo fondamento nella matematica, mentre i padri fondatori
hanno proposto come fondamento il fumo aleatorio!
 
...l'inserimento è solo quello del ritardo attuale
nello script o bisogna inserire dopo i calcoli
anche quello futuro?
Il mio obiettivo è quello di verificare
l'attendibilità delle cadenze per estratto
da me richieste, di cui notiamo insieme che hanno
una buona valenza d'esiti. Ma prima di
porli ingioco volevo analizzare quale
potrebbe essere quello fututo.
Null'altro...
 
lo script è automatizzato
la velocità di esecuzione è quella che è, ma ci arriva !:D
è senz'altro migliorabile, in seguito!
attenzione particolare è l'inizio dell'archivio estrazioni![8D][8D]
3649 7.12.1940


non serve inserire nessun dato
ritardo attuale lo recupera da solo
ritardo futuro lo calcola da solo
le estrazioni precedenti non serve elaborarle con spaziometria e
leggerle con lo script


lo script chiede solo
la ruota di elaborazione
ed 1 capogioco o 1 numeri
</u>


per comporre la coppia per la sorte di ambata 1 su 2
elabora le 89 coppie che si abbinano al capogioco.

per ogni coppia fa i dovuti calcoli come suggeriti da abasul.

naturalmente, ora come ora, devi scorrere le 89 coppie per vedere le varie situazioni statistiche, ma in futuro sarà possibile parzializzarle in qualche modo e sintetizzarle in un prospetto
solo quelle che hanno evidenze particolari di ritardo o smq o medie etc...

provalo e fammi sapere un tuo parere.


---------------------------------
modificherò in seguito un dato
2° Teorico Prev.caduta
---------------------------------





Codice:
Sub Main
	'''abasul6   automatismo con coppia x Ambata
	Dim sfile
	Dim records
	Dim art(1)
	Dim dif(900)
	Dim t
	Dim Media
	r = InputBox("Ruota ",,2)
	capo = InputBox("Capogioco  ",,"08")
	k1 = Int(capo)
	For k = 1 To 90
		ReDim asvil(900)
		ctr = 0
		Iniz = EstrazioneIni
		ini = EstrazioneIni
		al = Iniz - 1
		Call Messaggio(NomeRuota(r) & "..Estratti....Elabora Coppia....capogioco " & capo & "  " & Format2(k))
		Call AvanzamentoElab(1,90,k)
		tq = 0
		For Ini = Ini + 1 To EstrazioneFin
			ok = 0
			estratti = ""
			des2 = ""
			des1 = ""
			rambo = ""
			ReDim anum(2)
			If k <> Int(k1) Then
				For h = 1 To 5
					If Int(k1) = Estratto(Ini,r,h) Then
						ok = ok + 1
						des2 = des2 & Format2(Estratto(Ini,r,h)) & " "
					End If
					If Int(k) = Estratto(Ini,r,h) Then
						ok = ok + 1
						des2 = des2 & Format2(Estratto(Ini,r,h)) & " "
					End If
					estratti = estratti & Format2(Estratto(Ini,r,h)) & " "
					numeri = capo & " " & Format2(k)
				Next
				If ok >= 1 Then
					al = Ini - 1
					ctr = ctr + 1
					dat = Ini & " " & DataEstrazione(Ini)
					ruota = NomeRuota(r)
					art(1) = r
					anum(1) = k1
					anum(2) = k
					rambo = SerieRitardo(EstrazioneIni,Ini - 1,anum,art,1)
					If ctr = 1 Then
						rambo =(Ini - EstrazioneIni)
					End If
					des1 = "Ambo"
					records = ctr & "," & dat & "," & ruota & "," & estratti & "," & rambo & "," & des1 & "," & des2
					asvil(ctr) = ctr & "," & dat & "," & ruota & "," & estratti & "," & rambo & "," & des1 & "," & des2
					tq = tq + rambo
					rita = SerieRitardo(EstrazioneIni,EstrazioneFin,anum,art,1)
					
					last = Ini
				End If
			End If
		Next
		''''''''-----------------------------------------------------------------------------------------------------------
		If ctr > 0 Then
			Totqua = 0
			tq2 = 0
			tq3 = 0
			t = ctr
			Mediarealep = last / t
			Mediarealea = EstrazioneFin /(t + 1)
			ritf =(Mediarealea*1.08)
			Media = tq / t
			t2 = t + 1
			''' per completare il quadro informazioni
			art(1) = r
			ColoreTesto 2
			Scrivi " Situazione ruota di " & NomeRuota(r)
			Scrivi " Ritardo Attuale...." & rita
			Scrivi " Ritardo Futuro....." & ritf
			Scrivi " Elementi ritardo letti da statistica n. " & t
			ColoreTesto 1
			Scrivi " Per i numeri richiesti...." & numeri
			ColoreTesto 0
			Scrivi " Calcola Scarto Medio Quadratico in 3 Eventi distinti "
			Scrivi "_____________________________________________________________________"
			ReDim atitoli(30)
			' preimposto i titoli delle colonne
			atitoli(1) = "  Ruota           "
			atitoli(2) = "  Numeri          "
			atitoli(3) = "  R.attuale "
			atitoli(4) = "  R.Futuro  "
			atitoli(5) = " Somma RPrec "
			atitoli(6) = " Media Rt.prec."
			atitoli(7) = " Smq Rt.
 
Rubino lo proverò e ti farò sapere.

Ma prima di lasciarti volevo kiederti (se posso)
ma ke lavoro fai?
io presumo: il bankiere, il fisico-matematico,
il prof. d'università o altro di questo genere...
no xkè se non mi senti per un periodo
vuol dire che sto alla neuro, grazie a te!!!
CIAO
 
quote:Rubino lo proverò e ti farò sapere.

Ma prima di lasciarti volevo kiederti (se posso)
ma ke lavoro fai?
io presumo: il bankiere, il fisico-matematico,
il prof. d'università o altro di questo genere...
no xkè se non mi senti per un periodo
vuol dire che sto alla neuro, grazie a te!!!
CIAO





:D:D

il faccanzista pensionato!!!

con diversi hobby
di tutto un po!

:D:D



-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

La sistemistica trova il suo fondamento nella matematica, mentre i padri fondatori
hanno proposto come fondamento il fumo aleatorio!
 
Ciao Rubino complimenti ancora per l'ennesimo lavoro.
Volevo chiederti però alcuni kiarimenti:
Ho visto che il 36.81 a PA il ritardo è superiore a quello
dell'esempio dell'immagione di ieri.
Cmq volevo kiederti
"RIT MAX FUTURO: 26.0768"
1 TEORICO -23,8
2 TEORICO -23,1
in pratica mancano teoricamente 3 estraz alla sortita?
Sono questi i parametri finali da seguire in una coppia?

Nella ricerca di una coppia per estratto, non credo
che bisogna trovarli uno x volta a caso,
quali sono allora le coppie da preferire?
Presumo che bisogna trovare prima l'estratto più ritardato
e verificare poi quale sarebbe il miglior 2 estratto tra gli 89
con miglior TEORICO a meno come nella coppia sopra esposta?



 
quote:---------------------------------
modificherò in seguito un dato
2° Teorico Prev.caduta
---------------------------------


modificherò in seguito un dato
3° Teorico prev.Caduta.


nei prossimi giorni riposterò lo script aggiornato.

il mio metodo prevede 3 livelli di ritardo futuro.
tutti automatizzati e sono da relazionare con il livello raggiunto dal ritardo attuale.
Punto di equilibrio o riequilibrio 1,55 di Fibonacci.

per ora devo verificare bene come si sono comportati esattamente nel passato.
naturalmente il campo di lavoro è nelle estrazioni passate.



-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

La sistemistica trova il suo fondamento nella matematica, mentre i padri fondatori
hanno proposto come fondamento il fumo aleatorio!
 
dovrebbe essere a posto, si può usare e controllare! :D;)



Codice:
Sub Main
	'''abasul6   automatismo con coppia x Ambata
	Dim sfile
	Dim records
	Dim art(1)
	Dim dif(900)
	Dim t
	Dim Media
	r = InputBox("Ruota ",,6)
		''' per nazionale imposta dal conc.n. 7440 altre ruote dal 3950
		If r = 12 Then dal = 7440 Else dal = 3950 End If
		
	capo = InputBox("Capogioco  ",,"15")
	k1 = Int(capo)
	For k = 1 To 90
		ReDim asvil(900)
		ctr = 0
		Iniz = dal
		ini = dal
		al = Iniz - 1
		Call Messaggio(NomeRuota(r) & "..Estratti....Elabora Coppia....capogioco " & capo & "  " & Format2(k))
		Call AvanzamentoElab(1,90,k)
		tq = 0
		For Ini = Ini + 1 To EstrazioneFin
			ok = 0
			estratti = ""
			des2 = ""
			des1 = ""
			rambo = ""
			ReDim anum(2)
			If k <> Int(k1) Then
				For h = 1 To 5
					If Int(k1) = Estratto(Ini,r,h) Then
						ok = ok + 1
						des2 = des2 & Format2(Estratto(Ini,r,h)) & " "
					End If
					If Int(k) = Estratto(Ini,r,h) Then
						ok = ok + 1
						des2 = des2 & Format2(Estratto(Ini,r,h)) & " "
					End If
					estratti = estratti & Format2(Estratto(Ini,r,h)) & " "
					numeri = capo & " " & Format2(k)
				Next
				If ok >= 1 Then
					al = Ini - 1
					ctr = ctr + 1
					dat = Ini & " " & DataEstrazione(Ini)
					ruota = NomeRuota(r)
					art(1) = r
					anum(1) = k1
					anum(2) = k
					rambo = SerieRitardo(dal,Ini - 1,anum,art,1)
					If ctr = 1 Then
						rambo =(Ini - dal)
					End If
					des1 = "Ambo"
					records = ctr & "," & dat & "," & ruota & "," & estratti & "," & rambo & "," & des1 & "," & des2
					asvil(ctr) = ctr & "," & dat & "," & ruota & "," & estratti & "," & rambo & "," & des1 & "," & des2
					tq = tq + rambo
					rita = SerieRitardo(dal,EstrazioneFin,anum,art,1)
					ritsto = SerieStorico(dal,EstrazioneFin,anum,art,1)
					last = Ini
				End If
			End If
		Next
		''''''''-----------------------------------------------------------------------------------------------------------
		If ctr > 0 Then
			Totqua = 0
			tq2 = 0
			tq3 = 0
			t = ctr
			Mediarealep = last / t
			Mediarealea = EstrazioneFin /(t + 1)
			ritf =(Mediarealea*1.08)
			Media = tq / t
			t2 = t + 1
			''' per completare il quadro informazioni
			art(1) = r
			ColoreTesto 2
			Scrivi " Situazione ruota di " & NomeRuota(r)
			Scrivi " Ritardo Attuale...." & rita
			Scrivi " Ritardo Futuro....." & ritf
			ColoreTesto 1
			Scrivi " Per i numeri richiesti...." & numeri,1
			Scrivi " Per la sorte (((((Estratto))))) ",1
			ColoreTesto 0
			Scrivi " Elementi ritardo letti da statistica n. " & t
			Scrivi " Calcola Scarto Medio Quadratico in 3 Eventi distinti "
			Scrivi "_____________________________________________________________________"
			ReDim atitoli(30)
			' preimposto i titoli delle colonne
			atitoli(1) = "  Ruota           "
			atitoli(2) = "  Numeri          "
			atitoli(3) = "  R.attuale "
			atitoli(4) = "  R.Futuro  "
			atitoli(5) = " Somma RPrec "
			atitoli(6) = " Media Rt.prec."
			atitoli(7) = " Smq Rt.Prec."
			atitoli(8) = " Somma RAtt. "
			atitoli(9) = " Media Rt.Att. "
			atitoli(10) = " Smq Rt.Att. "
			atitoli(11) = " Somma RFut. "
			atitoli(12) = " Media Rt.Futuro"
			atitoli(13) = " Smq Rt.Futuro"
			' inizializzo la tabella
			Call InitTabella(atitoli,1,"center",2,5)
			' preimposto un array di comodo per creare la nuova riga da aggiungere alla tabella
			ReDim aValori(30) '
			avalori(1) = NomeRuota(r)
			avalori(2) = numeri
			avalori(3) = rita
			avalori(4) = ritf
			For z = 1 To t
				ReDim av2(0)
				Call SplitByChar(asvil(z),",",av2)
				If Int(Media) > CLng(av2(4)) Then
					dif(z) = Media - CLng(av2(4))
				Else
					dif(z) = CLng(av2(4)) - Media
				End If
				quadro = dif(z) * dif(z)
				Totqua = Totqua + CLng(quadro)
			Next
			''''--------------------------------------------------------------------------------------------------------------------
			'''calcola sqm e medie
			smq1 = Sqr(Totqua/t)
			ColoreTesto 2
			Scr
 
Buongiorno rubino, ancora una volta bravo!
Volevo però capire, oltre al RA di 58 estraz di NA
quali sono i parametri da seguire all'interno
di questi calcoli, per verificare l'attendibilità
delle previsioni?
Questo è l'unico passaggio ke non mi è chiaro...
 
solo per curiosità e test0
coppie x ambata
vicine al limite di rottura teorico
</u>


RUOTA DI NAPOLI</u>
napolig.jpg
[/URL]

Uploaded with ImageShack.us[/img]

-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

La sistemistica trova il suo fondamento nella matematica, mentre i padri fondatori
hanno proposto come fondamento il fumo aleatorio!
 
questa tabellina non la trovi, la sto facendo adesso con lo script,
ma i massimi li trovi in statistica formazioni veloce, inserendo le coppie di numeri per la sorte di ambata. dal 1940 ad oggi







-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

La sistemistica trova il suo fondamento nella matematica, mentre i padri fondatori
hanno proposto come fondamento il fumo aleatorio!
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 19 luglio 2025
    Bari
    70
    37
    36
    68
    01
    Cagliari
    57
    02
    64
    33
    41
    Firenze
    18
    62
    09
    05
    06
    Genova
    36
    10
    74
    37
    42
    Milano
    39
    07
    58
    23
    22
    Napoli
    18
    69
    28
    36
    40
    Palermo
    71
    66
    72
    64
    23
    Roma
    19
    64
    39
    77
    10
    Torino
    83
    63
    71
    08
    72
    Venezia
    51
    83
    26
    50
    74
    Nazionale
    89
    81
    63
    32
    03
    Estrazione Simbolotto
    Nazionale
    16
    32
    21
    19
    03

Ultimi Messaggi

Indietro
Alto