Carlisle Rainey carlislerainey

## poisson_mle_sims_bias_comp.R
library(tidyverse)

# set seed
#set.seed(4321)

# set simulation paramters
n <- 100  # sample size
x <- rnorm(n)  # single explanatory variable
n_qi <- 100  # number of points at which to calculate the marginal effect
x0 <- seq(-3, 3, length.out = n_qi)  # points at which to calculate the marginal effect
	library(tidyverse)

	# set seed
	#set.seed(4321)

	# set simulation paramters
	n <- 100 # sample size
	x <- rnorm(n) # single explanatory variable
	n_qi <- 100 # number of points at which to calculate the marginal effect
	x0 <- seq(-3, 3, length.out = n_qi) # points at which to calculate the marginal effect