R Mlogit Error in replacement rows and impossible to coerce choice variable to logical

Question

I want to run the mlogit function on my discrete choice dataset. Below I have provided the data and the lines of R code utilizing the package mlogit that are producing the e