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"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.