Error with Propensity score matching. Please help

[Cgreen042389]

If someone could please help me, I am trying my hand at propensity score matching and cannot figure out why I keep getting this error:

Error in Match(Y = Y, Tr = Tr, X = X, M = 1) : length(Tr) != nrow(X)

This is panel data looking at how the effects of a law going away effected Y.

##Propensity Score

Tr <- cbind(MasterSheet$repeals_after_2001)
Y <- cbind(MasterSheet$Days_perweek)
X <- cbind(MasterSheet$OFFP_Hours_Sunday, MasterSheet$OFFP_Hours_weekdays, MasterSheet$State_control_liquor,
MasterSheet$Age_group, MasterSheet$Education, MasterSheet$Income,
MasterSheet$Race, MasterSheet$Gender)

##Descriptive Statistics for Treated, Outcome and Matching Variables

summary(Tr)
summary(Y)
summary(X)

##Propensity Score Model

##Binge Drinking

glm1 <- glm(Tr ~ X, data = MasterSheet)

summary(glm1)

X <- glm1$fitted
Y <- MasterSheet$Binge_drinkers
Tr <- MasterSheet$repeals_after_2001

matched1 <- Match(Y=Y, Tr=Tr, X=X, M=1)

[williaml]

Hi, can you provide a reproducible example of your dataset? We have no idea what your dataset looks like and can't really help with your question.

FAQ: How to do a minimal reproducible example ( reprex ) for beginners

A minimal reproducible example consists of the following items: A minimal dataset, necessary to reproduce the issue The minimal runnable code necessary to reproduce the issue, which can be run on the given dataset, and including the necessary information on the used packages. Let's quickly go over each one of these with examples: Minimal Dataset (Sample Data) You need to provide a data frame that is small enough to be (reasonably) pasted on a post, but big enough to reproduce your issue. Let's say, as an example, that you are working with the iris data frame head(iris) #> Sepal.Length Sepal.Width Petal.Length Petal.Width Species #> 1 5.1 3.5 1.4 0.…