per gli esperti

[genios]

ma la Funzione If SerieFreqSE(es - 9,es,nn,1) su quanti numeri dell' estrazione interviene 6 - 7 - o 8 ?

 

[joe]

SE = SCELTA DELL'ARCHIVIO di Gioco CONSIDERATO

es-9,es = 10 Estrazioni

quanti numeri dipende da quanti numeri contiene il vettore nn

SerieFreq non interviene in nessun modo sui numeri

Restituisce come risultato la quantità di Presenze

delle sorti realizzate, dai numeri, nelle ruote e nelle estrazioni specificate.

 

[genios]

Si ma restituisce la quantità di presenze su quanti numeri dell' estrazione 6 - 7 - o 8 ?

 

[joe]

Non so che gioco è, quale archivio ha, che regole ci sono.

 

[genios]

Seriefrequenza superenalotto

 

[joe]

Ripeto, per me è "gioco" che considero inesistente.

Ne ho ignoranza praticamente assoluta.

 

[genios]

Non si tratta del gioco ma della funzione ?

 

[joe]

Non si tratta del gioco ma della funzione ?

Deve proprio essere come scrivi!

 

[Membro cancellato 19206]

حذف · إزالة · إلغاء · محو · حذفه · مسح · شطب · قم بحذف.

 

[genios]

Bene gcarlo questo se si usa il ciclo per le posizioni delle estrazioni for p = 01 to 8 ma se si usa solo la funzione seriefrequeSE su quali posizioni interviene ? posizioni (1-6 ) (1-7) o (1-8).

 

[Mike58]

Ciao a Tutti
Dovrebbe agire sui primi sei numeri, anche se...vado a memoria qualche codice agisce su tutti 8 numeri.
ad ogni modo lo script di verifica seriefreqse sembra agire sui primi 6 numeri.

verifica

Sub Main
   Dim nu(1),spia(2)
   Ini = EstrazioniArchivioSE
   fin = EstrazioniArchivioSE
   Scrivi StringaEstrattiSE(fin),1
   spia(1) = 9 : spia(2) = 83
   For n = 1 To 90
      nu(1) = n
      '--------------------------------------
      If SerieFreqSE(Ini,fin,nu,1) > 0 Then
      k = k + 1
      ReDim Preserve aNum(k)
      aNum(k) = n
         Scrivi n
      End If
      '--------------------------------------
      If EstrattoFrequenzaSE(n,Ini,fin) > 0 Then
      kk = kk + 1
      ReDim Preserve aN(kk)
      aN(kk) = n
      End If
      '--------------------------------------
   Next
   Scrivi "Numeri con SerieFreq............. " & StringaNumeri(aNum),1
   Scrivi "Numeri con estratto frequenza.... " & StringaNumeri(aN),1
   Scrivi "Freq - Numeri spia : " & StringaNumeri(spia) & " = "  & SerieFreqSE(Ini,fin,spia,1)
End Sub

05.08.18.28.33.59.09.83
5
8
18
28
33
59
Numeri con SerieFreq............. 5.8.18.28.33.59
Numeri con estratto frequenza.... 5.8.18.28.33.59
Freq - Numeri spia : 9.83 = 0

 

[Membro cancellato 19206]

حذف · إزالة · إلغاء · محو · حذفه · مسح · شطب · قم بحذف.