steven-tey

#Question 1a

foo <- read.csv("https://tinyurl.com/yb4phxx8")

names(foo)
dim(foo)
head(foo)
data.columns = c(11, 12, 14, 15, 16, 17, 18, 25)
for(i in data.columns)
{

steven-tey

##########################
# QUESTION 1 - Debugging #
##########################

# (1a)

# genout <- GenMatch(Tr=treat, X=X)

# summary(mout)

steven-tey

{
 "cells": [
  {
   "cell_type": "markdown",
   "metadata": {},
   "source": [
    "Before you turn this problem in, make sure everything runs as expected. First, **restart the kernel** (in the menubar, select Kernel$\\rightarrow$Restart) and then **run all cells** (in the menubar, select Cell$\\rightarrow$Run All).\n",
    "\n",
    "Make sure you fill in any place that says `YOUR CODE HERE` or \"YOUR ANSWER HERE\", as well as your name and collaborators below:"
   ]

steven-tey

steven-tey

steven-tey

steven-tey

steven-tey

steven-tey

steven-tey