data {
int<lower=0> N;
vector[N] income;
array[N] int<lower=0, upper=1> vote;
}
transformed data {
matrix[N, 1] x = [income']';
}
parameters {
real alpha;
vector[1] beta;
}
model {
vote ~ bernoulli_logit_glm(x, alpha, beta);
}
data {
int<lower=0> N;
vector[N] income;
array[N] int<lower=0, upper=1> vote;
}
transformed data {
matrix[N, 1] x = [income']';
}
parameters {
real alpha;
vector[1] beta;
}
model {
vote ~ bernoulli_logit_glm(x, alpha, beta);
}