Error in if (length(col) < ncol(x)) col <- rep(col, length.out = ncol(x)) : argument is of length zero [when plotting the graph]

Question

The first approach to the Engle-Granger method is simply to run an OLS with or without intercept without using a specific package OLS without intercept; distinguish between