Ποιά είναι η πιθανότητα να κερδίσει τις εκλογές ο Σύριζα ;

[wooded glade]

Στις εκλογές της 26ης Μαϊου είχαμε το αποτέλεσμα ΝΔ = 1,873,080 ψήφοι, ΣΥΡΙΖΑ = 1,343,788 ψήφοι.
Η διαφορά εναι 529,292 ψήφοι.
Άρα 529,293 χρειάζετει ο Σύριζα για να κερδίσει τις εκλογές τώρα.

Γίνεται αυτό ;
Γίνεται, όλα γίνονται.
Κάθε άνθρωπος βλέπει ένα "road to Damascus" μιά φορά στη ζωή του - ή και περισσότερες.
Ή μάλλον δεν είναι σίγουρο ότι βλέπει. Βλέπει από 0 έως μία φορά και σπανιώτατα δύο.
Ας υποθέσουμε ότι η πιθανότητα είναι 1/2, αλλά η πιθανότητα να γίνει αυτό από 27-5-2019 έως 7-7-2019 ;
Δύσκολο.
Ας πούμε όμως ότι είναι της τάξεως του 1/1000, οπότε είναι 1/2000 η πιθανότητα μιάς μεταστροφής.

Το ζητούμενο είναι λοιπόν το άθροισμα (1,873,080 ανά r) x (1 / 2000 )^ r * ( 1999 /2000) ^ (1,873,080 -r) όπου r κυμαίνεται από 529,293 έως 1,873,080.
Όλο αυτό επί ο Σύριζα να μην χάσει ούτε μία ψήφο, ήτοι (1999/2000)^1,343,788.
Συν τα αντίστοιχα αν χάσει 1,2,3 ...

Πόσο βγαίνει ;

[wooded glade]

Δεν ξέρω αυτά τα αθροίσματα.
Το έκανα με random numbers ως εξής:

w! = 0
For i% = 1 To 2000

nd! = 1873080
sy! = 1343788

For i1! = 1 To 1873080
If Rnd! <= 1 / 2000 Then nd! = nd! - 1: sy! = sy! + 1
Next i1!
For i1! = 1 To 1343788
If Rnd! <= 1 / 2000 Then sy! = sy! - 1: nd! = nd! + 1
Next i1!

If sy! > nd! Then w! = w! + 1

Text1.Text = Str$(i%)
Text1.Refresh
DoEvents

Next i%

MsgBox w! / 2000

Χάριν απολουστεύσεως υποθέτω ότι αλλάζουν από ΝΔ σε ΣΥΡΙΖΑ ή από ΣΥΡΙΖΑ σε ΝΔ μόνο.΄
Κάνω 2000 runs και επίσης βάζω να μου κάνει report σε ένα textbox κάθε φορά που αυξάνεται ο δείκτης κατά ένα, γιατί αλλοιώς μπορεί να μου κρεμάσει η basic.

Το αποτέλεσμα έτσι είναι μηδέν.
Δεν ξέρω αν θα αλλάξει μετά το video της Ακριβοπούλου.

[Apergos8]

Δεν υπάρχει πιθανότητα να κερδίσει τις εκλογές ο ΣΥΡΙΖΑ.Το μέγεθος της διαφοράς και η αυτοδυναμία είναι τα ερωτήματα των εκλογών.

[Dante Alighieri]

Δεν θα αυξηθει η διαφορα. Αλλιως ψηφιζει ο κοσμος στις ευρωεκλογες και οι ψηφοφοροι δεν τις θεωρουν ζωτικης σημασιας.
Αυτοδυναμια δεν βλεπω. Κυβερνηση με το ΚΙΝΑΛ ξκαι Βελοπουλο πιστευω θα σχηματισουν.

[Ζενίθεδρος]

Δεν υπάρχει πιθανότητα να κερδίσει τις εκλογές ο ΣΥΡΙΖΑ.Το μέγεθος της διαφοράς και η αυτοδυναμία είναι τα ερωτήματα των εκλογών.

Τα στοιχήματα που παίζονται είναι άμα θα είναι κάτω από 9, μεταξύ 9 και 12 ή πάνω από 12% η διαφορά της ΝΔ μπροστά από τον ΣΥΡΙΖΑ.

[wooded glade]

Θα βάλω 1/50 την παράμετρο road to Damascus να δω τι βγαίνει.

[wooded glade]

Μηδέν βγάζει πάλι.
Τρέξτε το πρόγραμμα με διάφορες τιμές για τα road of Damascus parameters να δούμε τι βγαίνει.

[Δημοκράτης]

Δεν θα αυξηθει η διαφορα. Αλλιως ψηφιζει ο κοσμος στις ευρωεκλογες και οι ψηφοφοροι δεν τις θεωρουν ζωτικης σημασιας.
Αυτοδυναμια δεν βλεπω. Κυβερνηση με το ΚΙΝΑΛ ξκαι Βελοπουλο πιστευω θα σχηματισουν.

Ας το κρατήσουμε αυτό το οοστ

[Dante Alighieri]

Αν αποτυχει η υποθεση μου απλως θα εχω κανει λαθος αγαπητε. Εσεις θα ικανοιποιηθειτε με αυτο; Ειστε ολιγαρκης βλεπω. Σας φτανουν απλα πραγματακια στη ζωη.

[southern]

Το μίσος για τη κυβέρνηση σπρώχνει όλη τη δεξιά στη ΝΔ μετά από πολλά χρόνια. Θα αγγίξει το 40%. Μιλάμε για αντίστροφο ρεύμα με αυτό που υπήρχε στην κεντροαριστερά το 1993.

[Lord Brum]

Το μίσος για τη κυβέρνηση σπρώχνει όλη τη δεξιά στη ΝΔ μετά από πολλά χρόνια. Θα αγγίξει το 40%. Μιλάμε για αντίστροφο ρεύμα με αυτό που υπήρχε στην κεντροαριστερά το 1993.

Αυτό είναι δευτερεύον, το πρωτεύον είναι να μη ξαναψηφίσουν ανίκανοι ψεύτες προδότες σαν τους ζαιους. Ας ψηφίσουν τα κουμουνια τον γιανη κάποιον με με στοιχ ιώδη συνέπεια και εντιμότητα όσο γίνεται αυτό για αριστερούς. Ψήφο σε ζαιους δίνουν τα λαμόγια και οι ηλίθιοι

[southern]

Το μίσος για τη κυβέρνηση σπρώχνει όλη τη δεξιά στη ΝΔ μετά από πολλά χρόνια. Θα αγγίξει το 40%. Μιλάμε για αντίστροφο ρεύμα με αυτό που υπήρχε στην κεντροαριστερά το 1993.

Αυτό είναι δευτερεύον, το πρωτεύον είναι να μη ξαναψηφίσουν ανίκανοι ψεύτες προδότες σαν τους ζαιους. Ας ψηφίσουν τα κουμουνια τον γιανη κάποιον με με στοιχ ιώδη συνέπεια και εντιμότητα όσο γίνεται αυτό για αριστερούς. Ψήφο σε ζαιους δίνουν τα λαμόγια και οι ηλίθιοι

Ο Βαρουφάκης είναι πολύ πιο επικίνδυνος και από το Τσίπρα στα εθνικά θέματα. Πρέπει να αναστηθεί το κιναλ για να τελειώσει ο ΣΥΡΙΖΑ

[Uppercut]

Δεν θα αυξηθει η διαφορα. Αλλιως ψηφιζει ο κοσμος στις ευρωεκλογες και οι ψηφοφοροι δεν τις θεωρουν ζωτικης σημασιας.
Αυτοδυναμια δεν βλεπω. Κυβερνηση με το ΚΙΝΑΛ ξκαι Βελοπουλο πιστευω θα σχηματισουν.

Θα αυξηθεί. Εδώ θα είμαστε. Εγώ τουλάχιστον θα είμαι, όπως ήμουν πριν και μετά τις ευρωεκλογές, πριν και μετά τις αμερικανικές εκλογές στο προηγούμενο πχώρουμ κι ούτω καθεξής. Εσύ δεν ξέρω να θα σαι βέβαια για να τα λέμε.

[Dante Alighieri]

Δεν θα αυξηθει η διαφορα. Αλλιως ψηφιζει ο κοσμος στις ευρωεκλογες και οι ψηφοφοροι δεν τις θεωρουν ζωτικης σημασιας.
Αυτοδυναμια δεν βλεπω. Κυβερνηση με το ΚΙΝΑΛ ξκαι Βελοπουλο πιστευω θα σχηματισουν.

Θα αυξηθεί. Εδώ θα είμαστε. Εγώ τουλάχιστον θα είμαι, όπως ήμουν πριν και μετά τις ευρωεκλογές, πριν και μετά τις αμερικανικές εκλογές στο προηγούμενο πχώρουμ κι ούτω καθεξής. Εσύ δεν ξέρω να θα σαι βέβαια για να τα λέμε.

Μα δεν θα χασεις και τιποτα αν δεν τα ξαναπουμε. Εσυ κανε το σωστο και θα ευοδωσει ο πολιτικος σου λογος οπως και ολων των ομοιδεατων σου. Εχω βομβαρδιστει με ποιοτικα και αξια επιχειρηματα και αντεπιχειρηματα που εχω γελοιποιηθει πληρως. Να, στο άλλο νημα με ταπωσε ενας ακομα ομοιδεατης σου.

[Dante Alighieri]

Το μίσος για τη κυβέρνηση σπρώχνει όλη τη δεξιά στη ΝΔ μετά από πολλά χρόνια. Θα αγγίξει το 40%. Μιλάμε για αντίστροφο ρεύμα με αυτό που υπήρχε στην κεντροαριστερά το 1993.

Σωστο κι αυτο. Εχει προκαλεσει μισος αυτη η κυβερνηση. Και που; Στις αγνες ψυχες σας που δεν ηξεραν καν τι θα πει αυτη η λεξη.