Πιθανότητα για γενέθλια την ίδια μέρα

[talaipwros]

Ωραίος γιατρέ! Τον κώδικα τον έτρεξες;

Κώδικας: Επιλογή όλων

#R script (use in R studio)
#initilize and pre-allocate for speed
N = 23
Y = 365
L = 10000
result   = rep(0,L)           
#to load necessary libraries/packages from GitHub             
browseURL(url="https://bit.ly/3jqbRWW") 

#Run main loop
for (l in 1:L){
  genethl   = sample(1:Y, N,T)
  Test      = max(table(genethl))>1
  result[l] = Test
}

#Print outcome
table(result)[2]/L

Merci, οχι ακομα, θα ερθει η ωρα του. Θα σε ενημερώσω!

[Yochanan]

[Χαοτικός]

[hellegennes]

Περίμενε 1-2 χρόνια. Παίρνει χρόνο.

[talaipwros]

Δεν εχω R στούντιο ρε συ

Οταν κανω R θα σου πω.

[Yochanan]

Δεν εχω R στούντιο ρε συ

Οταν κανω R θα σου πω.

[Τζιτζιμιτζιχότζιρας]

Παντως γιατρέ σε έχει φοβηθεί το μάτι μου. Είσαι απιστευτα εργατικός και ευρυμαθης. Τι να ψήφισες άραγες στο δημοψήφισμα του 2015?

Υποθέτω το ίδιο με τον υπουργό Ανάπτυξης και τον μαθηματικό αδερφό του.

[I know just what you re sayin]

Παντως γιατρέ σε έχει φοβηθεί το μάτι μου. Είσαι απιστευτα εργατικός και ευρυμαθης. Τι να ψήφισες άραγες στο δημοψήφισμα του 2015?

Υποθέτω το ίδιο με τον υπουργό Ανάπτυξης και τον μαθηματικό αδερφό του.