suppressPackageStartupMessages(library(rgdal))
suppressPackageStartupMessages(library(ggplot2))
suppressPackageStartupMessages(library(dplyr))
suppressPackageStartupMessages(library(lubridate))
suppressPackageStartupMessages(library(lme4))

We are going to do a very basic model here, as a test.

load('../data/rides.RData')
model1 <- glmer(rating ~ (1|rider) + original_trip_length,
               data = rides.binary, family=binomial(link="logit"))


wjones127/thesis documentation built on May 4, 2019, 7:34 a.m.