Části potřebné pro bayesovskou inferenci

Základy bayesovské analýzy dat v R

Rasmus Bååth

Data Scientist

Co je generativní model?

Generativní model zombie léku

# Parameters
prop_success <- ???
n_zombies <- ???

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13
# Simulating data
data <- c()
for(zombie in 1:n_zombies) {
  data[zombie] <- ???
}

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13
# Simulating data
data <- c()
for(zombie in 1:n_zombies) {
  data[zombie] <- runif(1, min = 0, max = 1) < prop_success
}

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13
# Simulating data
data <- c()
for(zombie in 1:n_zombies) {
  data[zombie] <- runif(1, min = 0, max = 1) < prop_success}

data

FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE TRUE FALSE TRUE FALSE FALSE

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13
# Simulating data
data <- c()
for(zombie in 1:n_zombies) {
  data[zombie] <- runif(1, min = 0, max = 1) < prop_success
}
data <- as.numeric(data)

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13
# Simulating data
data <- c()
for(zombie in 1:n_zombies) {
  data[zombie] <- runif(1, min = 0, max = 1) < prop_success
}
data <- as.numeric(data)
data

0 0 0 1 0 0 0 0 1 0 1 0 0

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13
# Simulating data
data <- c()
for(zombie in 1:n_zombies) {
  data[zombie] <- runif(1, min = 0, max = 1) < prop_success
}
data <- as.numeric(data)
data

0 0 1 0 0 0 0 0 0 0 0 0 0

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13
# Simulating data
data <- c()
for(zombie in 1:n_zombies) {
  data[zombie] <- runif(1, min = 0, max = 1) < prop_success
}
data <- as.numeric(data)
data

0 1 0 1 1 0 0 1 0 1 0 0 0

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13
# Simulating data
data <- c()
for(zombie in 1:n_zombies) {
  data[zombie] <- runif(1, min = 0, max = 1) < prop_success
}
data <- as.numeric(data)
data

0 0 0 0 0 0 0 1 0 0 0 0 0

Generativní model zombie léku

# Parameters
prop_success <- 0.15
n_zombies <- 13
# Simulating data
data <- c()
for(zombie in 1:n_zombies) {
  data[zombie] <- runif(1, min = 0, max = 1) < prop_success
}
data <- as.numeric(data)
data

0 0 0 0 1 0 0 0 0 1 0 1 0

Vyzkoušejte tento model!

Základy bayesovské analýzy dat v R